Sat Apr 13 12:26:21 UTC 2024 I: starting to build cafeobj/trixie/i386 on jenkins on '2024-04-13 12:26' Sat Apr 13 12:26:21 UTC 2024 I: The jenkins build log is/was available at https://jenkins.debian.net/userContent/reproducible/debian/build_service/i386_8/23625/console.log Sat Apr 13 12:26:21 UTC 2024 I: Downloading source for trixie/cafeobj=1.6.0-2 --2024-04-13 12:26:21-- http://deb.debian.org/debian/pool/main/c/cafeobj/cafeobj_1.6.0-2.dsc Connecting to 78.137.99.97:3128... connected. Proxy request sent, awaiting response... 200 OK Length: 1515 (1.5K) [text/prs.lines.tag] Saving to: ‘cafeobj_1.6.0-2.dsc’ 0K . 100% 204M=0s 2024-04-13 12:26:21 (204 MB/s) - ‘cafeobj_1.6.0-2.dsc’ saved [1515/1515] Sat Apr 13 12:26:21 UTC 2024 I: cafeobj_1.6.0-2.dsc -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA512 Format: 3.0 (quilt) Source: cafeobj Binary: cafeobj, cafeobj-mode Architecture: any all Version: 1.6.0-2 Maintainer: Norbert Preining Homepage: http://cafeobj.org/ Standards-Version: 4.5.0 Vcs-Browser: https://github.com/CafeOBJ/cafeobj Vcs-Git: https://github.com/CafeOBJ/cafeobj.git Build-Depends: debhelper (>= 10), sbcl Package-List: cafeobj deb science optional arch=any cafeobj-mode deb science optional arch=all Checksums-Sha1: 0e154b4b1b61c871491882b14911548e1dc65f5d 8468232 cafeobj_1.6.0.orig.tar.gz 9d3fe7ed9c6091f97e44ed16ba722eb4fe52b97e 6832 cafeobj_1.6.0-2.debian.tar.xz Checksums-Sha256: ab97d3cf22d8556524c86540cbb11d4e2eb1ba38cb0198eb068a4493b745d560 8468232 cafeobj_1.6.0.orig.tar.gz 3151920bbd74a69c881d41d437a3618ff9e5ebb6213456e87a9f05a81fc0c302 6832 cafeobj_1.6.0-2.debian.tar.xz Files: 100d2b48686f9a80506235d9e2bc7528 8468232 cafeobj_1.6.0.orig.tar.gz 48d8b00182a0898965ad7fc4f3c671c5 6832 cafeobj_1.6.0-2.debian.tar.xz -----BEGIN PGP SIGNATURE----- iQEzBAEBCgAdFiEE68ws0vrA2voQX53I2A4JsIcUAGYFAl5MSfIACgkQ2A4JsIcU AGZBoQf/SRDc5bQKbXx+w1hnrNWLCDKs36KgKEq6vygNtmZUu00oCizw3Sy6YrlU jwdDuZ8RV2jNQKYBaI9lDOJLRbyCmx+Uc79VeR9xoeX5Kzw7IurTtkRhHDth4vvX Gd0glSxtOVefvw8jwxll3/iqd5oGmvnQzc5CZRXrWPD32TSupjKgmh3h5chLFKU8 9VYTVWqf1aVlRVgh+Qygf8M038AsKbbWw3v59jReFrljnhEYJu7n95tPk+OXmRkT mcR9YnFbUkN3pwIFwtcSDNZeui/TOZStdmlAwa3RIX0zLcK5A59m/jYflCXTnKt3 Aeeogv+SdW9EfG7AKmyE5iGHkAGF1Q== =TxBv -----END PGP SIGNATURE----- Sat Apr 13 12:26:21 UTC 2024 I: Checking whether the package is not for us Sat Apr 13 12:26:21 UTC 2024 I: Starting 1st build on remote node ionos16-i386.debian.net. Sat Apr 13 12:26:21 UTC 2024 I: Preparing to do remote build '1' on ionos16-i386.debian.net. Sat Apr 13 12:27:42 UTC 2024 I: Deleting $TMPDIR on ionos16-i386.debian.net. I: pbuilder: network access will be disabled during build I: Current time: Fri May 16 06:49:24 -12 2025 I: pbuilder-time-stamp: 1747421364 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/trixie-reproducible-base.tgz] I: copying local configuration W: --override-config is not set; not updating apt.conf Read the manpage for details. I: mounting /proc filesystem I: mounting /sys filesystem I: creating /{dev,run}/shm I: mounting /dev/pts filesystem I: redirecting /dev/ptmx to /dev/pts/ptmx I: policy-rc.d already exists I: using eatmydata during job I: Copying source file I: copying [cafeobj_1.6.0-2.dsc] I: copying [./cafeobj_1.6.0.orig.tar.gz] I: copying [./cafeobj_1.6.0-2.debian.tar.xz] I: Extracting source gpgv: Signature made Tue Feb 18 20:32:50 2020 gpgv: using RSA key EBCC2CD2FAC0DAFA105F9DC8D80E09B087140066 gpgv: Can't check signature: No public key dpkg-source: warning: cannot verify inline signature for ./cafeobj_1.6.0-2.dsc: no acceptable signature found dpkg-source: info: extracting cafeobj in cafeobj-1.6.0 dpkg-source: info: unpacking cafeobj_1.6.0.orig.tar.gz dpkg-source: info: unpacking cafeobj_1.6.0-2.debian.tar.xz dpkg-source: info: using patch list from debian/patches/series dpkg-source: info: applying armhf-remove-buildopts I: using fakeroot in build. I: Installing the build-deps I: user script /srv/workspace/pbuilder/82797/tmp/hooks/D02_print_environment starting I: set BUILDDIR='/build/reproducible-path' BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other' BUILDUSERNAME='pbuilder1' BUILD_ARCH='i386' DEBIAN_FRONTEND='noninteractive' DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all parallel=22 ' DISTRIBUTION='trixie' HOME='/root' HOST_ARCH='i386' IFS=' ' INVOCATION_ID='ea1fd4d04f3a4f48a1496e9984126e6b' LANG='C' LANGUAGE='en_US:en' LC_ALL='C' LD_LIBRARY_PATH='/usr/lib/libeatmydata' LD_PRELOAD='libeatmydata.so' MAIL='/var/mail/root' OPTIND='1' PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games' PBCURRENTCOMMANDLINEOPERATION='build' PBUILDER_OPERATION='build' PBUILDER_PKGDATADIR='/usr/share/pbuilder' PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' PBUILDER_SYSCONFDIR='/etc' PPID='82797' PS1='# ' PS2='> ' PS4='+ ' PWD='/' SHELL='/bin/bash' SHLVL='2' SUDO_COMMAND='/usr/bin/timeout -k 18.1h 18h /usr/bin/ionice -c 3 /usr/bin/nice /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/r-b-build.NJZ5Qidq/pbuilderrc_eO7g --distribution trixie --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/trixie-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/r-b-build.NJZ5Qidq/b1 --logfile b1/build.log cafeobj_1.6.0-2.dsc' SUDO_GID='112' SUDO_UID='107' SUDO_USER='jenkins' TERM='unknown' TZ='/usr/share/zoneinfo/Etc/GMT+12' USER='root' _='/usr/bin/systemd-run' http_proxy='http://85.184.249.68:3128' I: uname -a Linux ionos16-i386 6.1.0-20-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.85-1 (2024-04-11) x86_64 GNU/Linux I: ls -l /bin lrwxrwxrwx 1 root root 7 May 15 17:46 /bin -> usr/bin I: user script /srv/workspace/pbuilder/82797/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy Version: 0.invalid.0 Architecture: i386 Maintainer: Debian Pbuilder Team Description: Dummy package to satisfy dependencies with aptitude - created by pbuilder This package was created automatically by pbuilder to satisfy the build-dependencies of the package being currently built. Depends: debhelper (>= 10), sbcl dpkg-deb: building package 'pbuilder-satisfydepends-dummy' in '/tmp/satisfydepends-aptitude/pbuilder-satisfydepends-dummy.deb'. Selecting previously unselected package pbuilder-satisfydepends-dummy. (Reading database ... 19874 files and directories currently installed.) Preparing to unpack .../pbuilder-satisfydepends-dummy.deb ... Unpacking pbuilder-satisfydepends-dummy (0.invalid.0) ... dpkg: pbuilder-satisfydepends-dummy: dependency problems, but configuring anyway as you requested: pbuilder-satisfydepends-dummy depends on debhelper (>= 10); however: Package debhelper is not installed. pbuilder-satisfydepends-dummy depends on sbcl; however: Package sbcl is not installed. Setting up pbuilder-satisfydepends-dummy (0.invalid.0) ... Reading package lists... Building dependency tree... Reading state information... Initializing package states... Writing extended state information... Building tag database... pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) The following NEW packages will be installed: autoconf{a} automake{a} autopoint{a} autotools-dev{a} bsdextrautils{a} debhelper{a} dh-autoreconf{a} dh-strip-nondeterminism{a} dwz{a} file{a} gettext{a} gettext-base{a} groff-base{a} intltool-debian{a} libarchive-zip-perl{a} libdebhelper-perl{a} libelf1{a} libfile-stripnondeterminism-perl{a} libicu72{a} libmagic-mgc{a} libmagic1{a} libpipeline1{a} libsub-override-perl{a} libtool{a} libuchardet0{a} libxml2{a} m4{a} man-db{a} po-debconf{a} sbcl{a} sensible-utils{a} The following packages are RECOMMENDED but will NOT be installed: binfmt-support curl libarchive-cpio-perl libltdl-dev libmail-sendmail-perl lynx systemd wget 0 packages upgraded, 31 newly installed, 0 to remove and 0 not upgraded. Need to get 28.2 MB of archives. After unpacking 108 MB will be used. Writing extended state information... Get: 1 http://deb.debian.org/debian trixie/main i386 sensible-utils all 0.0.22 [22.4 kB] Get: 2 http://deb.debian.org/debian trixie/main i386 libmagic-mgc i386 1:5.45-2+b1 [314 kB] Get: 3 http://deb.debian.org/debian trixie/main i386 libmagic1 i386 1:5.45-2+b1 [114 kB] Get: 4 http://deb.debian.org/debian trixie/main i386 file i386 1:5.45-2+b1 [43.0 kB] Get: 5 http://deb.debian.org/debian trixie/main i386 gettext-base i386 0.21-14+b1 [162 kB] Get: 6 http://deb.debian.org/debian trixie/main i386 libuchardet0 i386 0.0.8-1+b1 [69.1 kB] Get: 7 http://deb.debian.org/debian trixie/main i386 groff-base i386 1.23.0-3 [1195 kB] Get: 8 http://deb.debian.org/debian trixie/main i386 bsdextrautils i386 2.39.3-6 [93.3 kB] Get: 9 http://deb.debian.org/debian trixie/main i386 libpipeline1 i386 1.5.7-2 [39.7 kB] Get: 10 http://deb.debian.org/debian trixie/main i386 man-db i386 2.12.0-3 [1413 kB] Get: 11 http://deb.debian.org/debian trixie/main i386 m4 i386 1.4.19-4 [293 kB] Get: 12 http://deb.debian.org/debian trixie/main i386 autoconf all 2.71-3 [332 kB] Get: 13 http://deb.debian.org/debian trixie/main i386 autotools-dev all 20220109.1 [51.6 kB] Get: 14 http://deb.debian.org/debian trixie/main i386 automake all 1:1.16.5-1.3 [823 kB] Get: 15 http://deb.debian.org/debian trixie/main i386 autopoint all 0.21-14 [496 kB] Get: 16 http://deb.debian.org/debian trixie/main i386 libdebhelper-perl all 13.15.3 [88.0 kB] Get: 17 http://deb.debian.org/debian trixie/main i386 libtool all 2.4.7-7 [517 kB] Get: 18 http://deb.debian.org/debian trixie/main i386 dh-autoreconf all 20 [17.1 kB] Get: 19 http://deb.debian.org/debian trixie/main i386 libarchive-zip-perl all 1.68-1 [104 kB] Get: 20 http://deb.debian.org/debian trixie/main i386 libsub-override-perl all 0.10-1 [10.6 kB] Get: 21 http://deb.debian.org/debian trixie/main i386 libfile-stripnondeterminism-perl all 1.13.1-1 [19.4 kB] Get: 22 http://deb.debian.org/debian trixie/main i386 dh-strip-nondeterminism all 1.13.1-1 [8620 B] Get: 23 http://deb.debian.org/debian trixie/main i386 libelf1 i386 0.190-1+b1 [182 kB] Get: 24 http://deb.debian.org/debian trixie/main i386 dwz i386 0.15-1 [118 kB] Get: 25 http://deb.debian.org/debian trixie/main i386 libicu72 i386 72.1-4+b1 [9549 kB] Get: 26 http://deb.debian.org/debian trixie/main i386 libxml2 i386 2.9.14+dfsg-1.3+b2 [727 kB] Get: 27 http://deb.debian.org/debian trixie/main i386 gettext i386 0.21-14+b1 [1311 kB] Get: 28 http://deb.debian.org/debian trixie/main i386 intltool-debian all 0.35.0+20060710.6 [22.9 kB] Get: 29 http://deb.debian.org/debian trixie/main i386 po-debconf all 1.0.21+nmu1 [248 kB] Get: 30 http://deb.debian.org/debian trixie/main i386 debhelper all 13.15.3 [901 kB] Get: 31 http://deb.debian.org/debian trixie/main i386 sbcl i386 2:2.3.7-2 [8913 kB] Fetched 28.2 MB in 0s (92.3 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package sensible-utils. (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 19874 files and directories currently installed.) Preparing to unpack .../00-sensible-utils_0.0.22_all.deb ... Unpacking sensible-utils (0.0.22) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../01-libmagic-mgc_1%3a5.45-2+b1_i386.deb ... Unpacking libmagic-mgc (1:5.45-2+b1) ... Selecting previously unselected package libmagic1:i386. Preparing to unpack .../02-libmagic1_1%3a5.45-2+b1_i386.deb ... Unpacking libmagic1:i386 (1:5.45-2+b1) ... Selecting previously unselected package file. Preparing to unpack .../03-file_1%3a5.45-2+b1_i386.deb ... Unpacking file (1:5.45-2+b1) ... Selecting previously unselected package gettext-base. Preparing to unpack .../04-gettext-base_0.21-14+b1_i386.deb ... Unpacking gettext-base (0.21-14+b1) ... Selecting previously unselected package libuchardet0:i386. Preparing to unpack .../05-libuchardet0_0.0.8-1+b1_i386.deb ... Unpacking libuchardet0:i386 (0.0.8-1+b1) ... Selecting previously unselected package groff-base. Preparing to unpack .../06-groff-base_1.23.0-3_i386.deb ... Unpacking groff-base (1.23.0-3) ... Selecting previously unselected package bsdextrautils. Preparing to unpack .../07-bsdextrautils_2.39.3-6_i386.deb ... Unpacking bsdextrautils (2.39.3-6) ... Selecting previously unselected package libpipeline1:i386. Preparing to unpack .../08-libpipeline1_1.5.7-2_i386.deb ... Unpacking libpipeline1:i386 (1.5.7-2) ... Selecting previously unselected package man-db. Preparing to unpack .../09-man-db_2.12.0-3_i386.deb ... Unpacking man-db (2.12.0-3) ... Selecting previously unselected package m4. Preparing to unpack .../10-m4_1.4.19-4_i386.deb ... Unpacking m4 (1.4.19-4) ... Selecting previously unselected package autoconf. Preparing to unpack .../11-autoconf_2.71-3_all.deb ... Unpacking autoconf (2.71-3) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../12-autotools-dev_20220109.1_all.deb ... Unpacking autotools-dev (20220109.1) ... Selecting previously unselected package automake. Preparing to unpack .../13-automake_1%3a1.16.5-1.3_all.deb ... Unpacking automake (1:1.16.5-1.3) ... Selecting previously unselected package autopoint. Preparing to unpack .../14-autopoint_0.21-14_all.deb ... Unpacking autopoint (0.21-14) ... Selecting previously unselected package libdebhelper-perl. Preparing to unpack .../15-libdebhelper-perl_13.15.3_all.deb ... Unpacking libdebhelper-perl (13.15.3) ... Selecting previously unselected package libtool. Preparing to unpack .../16-libtool_2.4.7-7_all.deb ... Unpacking libtool (2.4.7-7) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../17-dh-autoreconf_20_all.deb ... Unpacking dh-autoreconf (20) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../18-libarchive-zip-perl_1.68-1_all.deb ... Unpacking libarchive-zip-perl (1.68-1) ... Selecting previously unselected package libsub-override-perl. Preparing to unpack .../19-libsub-override-perl_0.10-1_all.deb ... Unpacking libsub-override-perl (0.10-1) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../20-libfile-stripnondeterminism-perl_1.13.1-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.13.1-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../21-dh-strip-nondeterminism_1.13.1-1_all.deb ... Unpacking dh-strip-nondeterminism (1.13.1-1) ... Selecting previously unselected package libelf1:i386. Preparing to unpack .../22-libelf1_0.190-1+b1_i386.deb ... Unpacking libelf1:i386 (0.190-1+b1) ... Selecting previously unselected package dwz. Preparing to unpack .../23-dwz_0.15-1_i386.deb ... Unpacking dwz (0.15-1) ... Selecting previously unselected package libicu72:i386. Preparing to unpack .../24-libicu72_72.1-4+b1_i386.deb ... Unpacking libicu72:i386 (72.1-4+b1) ... Selecting previously unselected package libxml2:i386. Preparing to unpack .../25-libxml2_2.9.14+dfsg-1.3+b2_i386.deb ... Unpacking libxml2:i386 (2.9.14+dfsg-1.3+b2) ... Selecting previously unselected package gettext. Preparing to unpack .../26-gettext_0.21-14+b1_i386.deb ... Unpacking gettext (0.21-14+b1) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../27-intltool-debian_0.35.0+20060710.6_all.deb ... Unpacking intltool-debian (0.35.0+20060710.6) ... Selecting previously unselected package po-debconf. Preparing to unpack .../28-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../29-debhelper_13.15.3_all.deb ... Unpacking debhelper (13.15.3) ... Selecting previously unselected package sbcl. Preparing to unpack .../30-sbcl_2%3a2.3.7-2_i386.deb ... Unpacking sbcl (2:2.3.7-2) ... Setting up libpipeline1:i386 (1.5.7-2) ... Setting up libicu72:i386 (72.1-4+b1) ... Setting up bsdextrautils (2.39.3-6) ... Setting up libmagic-mgc (1:5.45-2+b1) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up libdebhelper-perl (13.15.3) ... Setting up libmagic1:i386 (1:5.45-2+b1) ... Setting up gettext-base (0.21-14+b1) ... Setting up m4 (1.4.19-4) ... Setting up file (1:5.45-2+b1) ... Setting up autotools-dev (20220109.1) ... Setting up autopoint (0.21-14) ... Setting up autoconf (2.71-3) ... Setting up sbcl (2:2.3.7-2) ... Setting up sensible-utils (0.0.22) ... Setting up libuchardet0:i386 (0.0.8-1+b1) ... Setting up libsub-override-perl (0.10-1) ... Setting up libelf1:i386 (0.190-1+b1) ... Setting up libxml2:i386 (2.9.14+dfsg-1.3+b2) ... Setting up automake (1:1.16.5-1.3) ... update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode Setting up libfile-stripnondeterminism-perl (1.13.1-1) ... Setting up gettext (0.21-14+b1) ... Setting up libtool (2.4.7-7) ... Setting up intltool-debian (0.35.0+20060710.6) ... Setting up dh-autoreconf (20) ... Setting up dh-strip-nondeterminism (1.13.1-1) ... Setting up dwz (0.15-1) ... Setting up groff-base (1.23.0-3) ... Setting up po-debconf (1.0.21+nmu1) ... Setting up man-db (2.12.0-3) ... Not building database; man-db/auto-update is not 'true'. Setting up debhelper (13.15.3) ... Processing triggers for libc-bin (2.37-15) ... Reading package lists... Building dependency tree... Reading state information... Reading extended state information... Initializing package states... Writing extended state information... Building tag database... -> Finished parsing the build-deps Reading package lists... Building dependency tree... Reading state information... fakeroot is already the newest version (1.33-1). 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. I: Building the package I: Running cd /build/reproducible-path/cafeobj-1.6.0/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../cafeobj_1.6.0-2_source.changes dpkg-buildpackage: info: source package cafeobj dpkg-buildpackage: info: source version 1.6.0-2 dpkg-buildpackage: info: source distribution unstable dpkg-buildpackage: info: source changed by Norbert Preining dpkg-source --before-build . 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 /build/reproducible-path/cafeobj-1.6.0/tmpcache dh_clean debian/rules build dh_testdir ./configure --prefix=/usr --with-lisp=sbcl checking for a BSD-compatible install... /usr/bin/install -c 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)... yes checking for a thread-safe mkdir -p... /usr/bin/mkdir -p 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 gcc... gcc checking whether the C compiler works... yes checking for C compiler default output file name... a.out checking for suffix of executables... checking whether we are cross compiling... no checking for suffix of object files... o checking whether we are using the GNU C compiler... yes checking whether gcc accepts -g... yes checking for gcc option to accept ISO C89... none needed checking how to run the C preprocessor... gcc -E checking for grep that handles long lines and -e... /usr/bin/grep checking for egrep... /usr/bin/grep -E checking for ANSI C header files... yes checking for sys/types.h... yes checking for sys/stat.h... yes checking for stdlib.h... yes checking for string.h... yes checking for memory.h... yes checking for strings.h... yes checking for inttypes.h... yes checking for stdint.h... yes checking for unistd.h... yes checking size of long... 4 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 config.status: creating doc/search/Makefile #./configure --prefix=/usr --with-lisp=sbcl --enable-rebuild-doc # 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 '/build/reproducible-path/cafeobj-1.6.0' mkdir -p dumps/sbcl/ sbcl --dynamic-space-size 2048 < make-cafeobj.lisp This is SBCL 2.3.7.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 :X86 :GENCGC :ANSI-CL :COMMON-LISP :ELF :IEEE-FLOATING-POINT :LINUX :LITTLE-ENDIAN :PACKAGE-LOCAL-NICKNAMES :SB-CORE-COMPRESSION :SB-LDB :SB-PACKAGE-LOCKS :SB-THREAD :SB-UNICODE :SBCL :UNIX) * NIL * ; in: DEFUN MAKE-EXEC-IMAGE ; (SETQ *CHAOS-NEW* T) ; ; caught WARNING: ; undefined variable: COMMON-LISP-USER::*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 WARNING: System definition file #P"/build/reproducible-path/cafeobj-1.6.0/sysdef.asd" contains definition for system "chaosx". Please only define "sysdef" and secondary systems with a name starting with "sysdef/" (e.g. "sysdef/test") in that file. WARNING: System definition file #P"/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file. WARNING: System definition file #P"/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file. .) ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/packages.lisp" (written 15 NOV 2018 12:48:56 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/packages-tmp7LQ0A0VI.fasl ; compilation finished in 0:00:00.000 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/specials.lisp" (written 15 NOV 2018 12:48:56 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/specials-tmp74KGUNRZ.fasl ; compilation finished in 0:00:00.008 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/util.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/util.lisp ; in: DEFUN STRING-LIST-TO-SIMPLE-STRING ; (REPLACE CL-PPCRE::RESULT-STRING STRING :START1 CL-PPCRE::CURR-POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a SIMPLE-BASE-STRING. ; in: DEFUN COMPLEMENT* ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/util-tmpCEL1YIM2.fasl ; compilation finished in 0:00:00.032 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/errors.lisp" (written 15 NOV 2018 12:48:56 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/errors-tmpHAMQABTV.fasl ; compilation finished in 0:00:00.012 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/charset.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/charset.lisp ; in: DEFUN MIX ; (+ CL-PPCRE::CODE CL-PPCRE::HASH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 ; &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; in: DEFUN COMPUTE-INDEX ; (LENGTH VECTOR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-536870907) (536870907))), not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a (OR FLOAT ; (RATIONAL (-536870907) ; (536870907))), not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR FLOAT (RATIONAL (-536870907) (536870907))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL (-536870906) (536870908))) ; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR FLOAT (RATIONAL (-536870907) (536870907))), not a FIXNUM. ; The result is a (VALUES (OR FLOAT (RATIONAL (-536870906) (536870908))) ; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN %ADD-TO-CHARSET/EXPAND ; (* 2 CL-PPCRE::NEW-SIZE) ; ; 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). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (>= CL-PPCRE::NEW-SIZE 371370) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (* 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 &OPTIONAL). ; 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 &OPTIONAL). ; 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 ; in: DEFUN MAP-CHARSET ; (DECF CL-PPCRE::N) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER * 536870911), not a FIXNUM. ; The result is a (VALUES (INTEGER * 536870910) &OPTIONAL), not a (VALUES ; FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER * 536870911), not a FIXNUM. ; The result is a (VALUES (INTEGER * 536870910) &OPTIONAL), not a (VALUES ; FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN CREATE-CHARSET-FROM-TEST-FUNCTION ; (LOOP CL-PPCRE::WITH CL-PPCRE::CHARSET = (CL-PPCRE::MAKE-CHARSET) ; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW ; CL-PPCRE::END ; CL-PPCRE::FOR ...) ; --> LET LET LET TAGBODY WHEN IF ; ==> ; (>= CL-PPCRE::CODE #:LOOP-LIMIT-0) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/charset-tmpUPMG0IBO.fasl ; compilation finished in 0:00:00.036 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/charmap.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/charmap.lisp ; in: DEFUN MAKE-CHARMAP ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; in: DEFUN CREATE-CHARMAP-FROM-TEST-FUNCTION ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW ; CL-PPCRE::END ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> LET LET TAGBODY WHEN IF ; ==> ; (>= CL-PPCRE::CODE #:LOOP-LIMIT-0) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (1- CL-PPCRE::END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1- ; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> LET LET TAGBODY WHEN IF ; ==> ; (< CL-PPCRE::CODE #:LOOP-LIMIT-17) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (1- CL-PPCRE::END) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1- ; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START ; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE) ; CL-PPCRE::UNTIL ...) ; --> LET LET TAGBODY WHEN IF ; ==> ; (< CL-PPCRE::CODE #:LOOP-LIMIT-17) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/charmap-tmpAKM32D0F.fasl ; compilation finished in 0:00:00.040 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/chartest.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/chartest.lisp ; in: DEFUN CREATE-HASH-TABLE-FROM-TEST-FUNCTION ; (LOOP CL-PPCRE::WITH HASH-TABLE = (MAKE-HASH-TABLE) ; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW ; CL-PPCRE::END ; CL-PPCRE::FOR ...) ; --> LET LET LET TAGBODY WHEN IF ; ==> ; (>= CL-PPCRE::CODE #:LOOP-LIMIT-0) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; in: DEFUN CREATE-OPTIMIZED-TEST-FUNCTION ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; convert division by 2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; ; note: unable to ; convert division by 2^k to shift ; due to type uncertainty: ; The first argument is a REAL, not a INTEGER. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (<= (HASH-TABLE-COUNT HASH-TABLE) ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (<= (CL-PPCRE::CHARSET-COUNT CL-PPCRE::CHARSET) ; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a INTEGER, not a FIXNUM. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/chartest-tmp8UG37QJ5.fasl ; compilation finished in 0:00:00.012 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/lexer.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/lexer.lisp ; in: DEFUN NEXT-CHAR ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* CL-PPCRE::ERROR-POS ; "Comment group not closed.") ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN UNESCAPE-CHAR ; (CHAR-UPCASE CL-PPCRE::NEXT-CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; in: DECLAIM (INLINE UNGET-TOKEN) ; (DECLAIM (INLINE CL-PPCRE::UNGET-TOKEN)) ; ==> ; (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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/lexer-tmp65YV5VYW.fasl ; compilation finished in 0:00:00.092 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/parser.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/parser.lisp ; in: DEFUN GROUP ; (CL-PPCRE::SIGNAL-SYNTAX-ERROR* (+ CL-PPCRE::OPEN-PAREN-POS 2) ; "Opening paren has no matching closing paren.") ; ; note: doing signed word to integer coercion (cost 20) ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/parser-tmpGO4MNX7G.fasl ; compilation finished in 0:00:00.016 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/regex-class.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/regex-class.lisp ; in: DEFMETHOD INITIALIZE-INSTANCE :AFTER (STR) ; (COERCE CL-PPCRE::STR-SLOT 'SIMPLE-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; (LENGTH (CL-PPCRE::STR CL-PPCRE::STR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/regex-class-tmp9NXH2K1.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/regex-class-util.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/regex-class-util.lisp ; in: DEFMETHOD CASE-MODE (STR T) ; (ZEROP (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; in: DEFMETHOD EVERYTHINGP (SEQ) ; (LENGTH CL-PPCRE::CLEANED-ELEMENTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; in: DEFMETHOD EVERYTHINGP (ALTERNATION) ; (LENGTH CL-PPCRE::CHOICES) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFMETHOD EVERYTHINGP (REPETITION) ; (= 1 CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (OR ; (COMPLEX ; SINGLE-FLOAT) ; (COMPLEX ; DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX ; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX ; DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a (OR (INTEGER 1 1) (SINGLE-FLOAT 1.0 1.0) ; (DOUBLE-FLOAT 1.0d0 1.0d0) ; (COMPLEX (INTEGER 1 1)) ; (COMPLEX (SINGLE-FLOAT 1.0 1.0)) ; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; in: DEFMETHOD REGEX-LENGTH (SEQ) ; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::ELEMENTS ; CL-PPCRE::SEQ) ; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-LENGTH ; CL-PPCRE::SUB-REGEX) ; IF (NOT CL-PPCRE::LEN) ; DO ...) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-5 CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFMETHOD REGEX-LENGTH (ALTERNATION) ; (/= CL-PPCRE::LEN CL-PPCRE::OLD-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; 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 SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; in: DEFMETHOD REGEX-LENGTH (BRANCH) ; (EQL CL-PPCRE::THEN-LENGTH ; (CL-PPCRE::REGEX-LENGTH (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: forced to do GENERIC-EQL (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; in: DEFMETHOD REGEX-LENGTH (REPETITION) ; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: forced to do 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. ; (* CL-PPCRE::MINIMUM 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 ; &OPTIONAL). ; 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 ; &OPTIONAL). ; etc. ; in: DEFMETHOD REGEX-MIN-LENGTH (SEQ) ; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::ELEMENTS ; CL-PPCRE::SEQ) ; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-MIN-LENGTH ; CL-PPCRE::SUB-REGEX) ; CL-PPCRE::SUM CL-PPCRE::LEN) ; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:LOOP-SUM-5 CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFMETHOD REGEX-MIN-LENGTH (ALTERNATION) ; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::CHOICES ; CL-PPCRE::ALTERNATION) ; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-MIN-LENGTH ; CL-PPCRE::SUB-REGEX) ; CL-PPCRE::MINIMIZE CL-PPCRE::LEN) ; --> LET LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY ; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF < IF ; ==> ; (< #:LOOP-MAXMIN-TEMP-9 #:LOOP-MAXMIN-8) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; in: DEFMETHOD REGEX-MIN-LENGTH (BRANCH) ; (MIN (CL-PPCRE::REGEX-MIN-LENGTH (CL-PPCRE::THEN-REGEX CL-PPCRE::BRANCH)) ; (CL-PPCRE::REGEX-MIN-LENGTH (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; in: DEFMETHOD REGEX-MIN-LENGTH (REPETITION) ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 ; &OPTIONAL). ; 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 ; &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (ALTERNATION T) ; (/= CL-PPCRE::CURR-OFFSET CL-PPCRE::OLD-OFFSET) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; 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 SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; in: DEFMETHOD COMPUTE-OFFSETS (BRANCH T) ; (EQL CL-PPCRE::THEN-OFFSET ; (CL-PPCRE::COMPUTE-OFFSETS (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH) ; CL-PPCRE::START-POS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: forced to do GENERIC-EQL (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (NOT NULL), not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; in: DEFMETHOD COMPUTE-OFFSETS (REPETITION T) ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ CL-PPCRE::START-POS (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN) ; ; note: forced to do 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 ; &OPTIONAL). ; 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 ; &OPTIONAL). ; etc. ; (+ CL-PPCRE::START-POS (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (CHAR-CLASS T) ; (1+ CL-PPCRE::START-POS) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (EVERYTHING T) ; (1+ CL-PPCRE::START-POS) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (STR T) ; (+ CL-PPCRE::START-POS (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-OFFSETS (FILTER T) ; (+ CL-PPCRE::START-POS CL-PPCRE::LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/regex-class-util-tmp6B86GLV2.fasl ; compilation finished in 0:00:00.140 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/convert.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/convert.lisp ; in: DEFUN CONVERT-CHAR-CLASS-TO-TEST-FUNCTION ; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-DOWNCASE CHAR)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (CHAR-DOWNCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-UPCASE CHAR)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (CHAR-UPCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-DOWNCASE CHAR)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (CHAR-DOWNCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-UPCASE CHAR)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (CHAR-UPCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (CHAR-DOWNCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (CHAR-UPCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-DOWN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-UP) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (CHAR-DOWNCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (CHAR-UPCASE CHAR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-DOWN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-UP) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST-FUNCTION is not known to be a function ; in: DEFUN MAYBE-SPLIT-REPETITION ; (- CL-PPCRE::MAXIMUM CL-PPCRE::MINIMUM) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN MAYBE-ACCUMULATE ; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (SETF (SUBSEQ (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR) ; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) ; (CL-PPCRE::LEN CL-PPCRE::STR))) ; (CL-PPCRE::STR CL-PPCRE::STR) ; (CL-PPCRE::SKIP CL-PPCRE::STR) T) ; --> SETF LET* ; ==> ; (REPLACE #:SEQUENCE #:NEW1 :START1 #:START :END1 NIL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY * (*)) ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING ; &REST T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING. ; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES ; (SIMPLE-ARRAY CHARACTER ; (*)) ; &REST T). ; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; 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 fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; etc. ; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :BRANCH) T) ; (LENGTH (CL-PPCRE::CHOICES CL-PPCRE::ALTERNATIONS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :GREEDY-REPETITION) T) ; (ZEROP LENGTH) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, 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. ; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :NAMED-REGISTER) T) ; (COPY-SEQ (SECOND CL-PPCRE::PARSE-TREE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :BACK-REFERENCE) T) ; (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; The second argument is a (OR STRING (AND SYMBOL (NOT NULL)) ; CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING (AND SYMBOL (NOT NULL)) ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; The second argument is a (OR STRING (AND SYMBOL (NOT NULL)) ; CHARACTER), not a (SIMPLE-ARRAY CHARACTER (*)). ; (- CL-PPCRE::REG-NUM CL-PPCRE::REG-INDEX) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (1- CL-PPCRE::BACKREF-NUMBER) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (COPY-SEQ CL-PPCRE::BACKREF-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; (- CL-PPCRE::REG-NUM CL-PPCRE::REG-INDEX) ; ; note: forced to do 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 &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (LOOP CL-PPCRE::FOR CL-PPCRE::NAME CL-PPCRE::IN CL-PPCRE::REG-NAMES ; CL-PPCRE::FOR CL-PPCRE::REG-INDEX CL-PPCRE::FROM 0 ; WHEN (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME) ; CL-PPCRE::COLLECT ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (1- CL-PPCRE::BACKREF-NUMBER) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN CONVERT ; (COERCE (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR) 'SIMPLE-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/convert-tmpZWLLOVAH.fasl ; compilation finished in 0:00:00.164 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/optimize.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/optimize.lisp ; in: DEFMETHOD GATHER-STRINGS (SEQ) ; (MAKE-ARRAY CL-PPCRE::COLLECTOR-LENGTH :INITIAL-CONTENTS CL-PPCRE::COLLECTOR ; :ELEMENT-TYPE 'CHARACTER :FILL-POINTER T :ADJUSTABLE T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a VECTOR, not a (SIMPLE-ARRAY * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a VECTOR, not a SIMPLE-BASE-STRING. ; (INCF CL-PPCRE::COLLECTOR-LENGTH (CL-PPCRE::LEN CL-PPCRE::ELEMENT)) ; --> THE ; ==> ; (+ (CL-PPCRE::LEN CL-PPCRE::ELEMENT) CL-PPCRE::COLLECTOR-LENGTH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; in: DEFMETHOD START-ANCHORED-P (REPETITION) ; (PLUSP (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; in: DEFMETHOD START-ANCHORED-P (REGEX) ; (ZEROP (CL-PPCRE::LEN CL-PPCRE::REGEX)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, 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. ; in: DEFMETHOD END-STRING-AUX (SEQ) ; (ZEROP (CL-PPCRE::LEN CL-PPCRE::ELEMENT-END)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (MAKE-ARRAY CL-PPCRE::CONCATENATED-LENGTH :INITIAL-CONTENTS ; (REVERSE (CL-PPCRE::STR CL-PPCRE::CONCATENATED-START)) ; :ELEMENT-TYPE 'CHARACTER :FILL-POINTER T :ADJUSTABLE T) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a SIMPLE-BASE-STRING. ; (CHAR CL-PPCRE::STR CL-PPCRE::I) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; in: DEFMETHOD COMPUTE-MIN-REST (ALTERNATION T) ; (LOOP CL-PPCRE::FOR CL-PPCRE::CHOICE CL-PPCRE::IN (CL-PPCRE::CHOICES ; CL-PPCRE::ALTERNATION) ; CL-PPCRE::MINIMIZE (CL-PPCRE::COMPUTE-MIN-REST CL-PPCRE::CHOICE ; CL-PPCRE::CURRENT-MIN-REST)) ; --> LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY ; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF < IF ; ==> ; (< #:LOOP-MAXMIN-TEMP-10 #:LOOP-MAXMIN-9) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (BRANCH T) ; (MIN ; (CL-PPCRE::COMPUTE-MIN-REST (CL-PPCRE::THEN-REGEX CL-PPCRE::BRANCH) ; CL-PPCRE::CURRENT-MIN-REST) ; (CL-PPCRE::COMPUTE-MIN-REST (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH) ; CL-PPCRE::CURRENT-MIN-REST)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; in: DEFMETHOD COMPUTE-MIN-REST (STR T) ; (+ CL-PPCRE::CURRENT-MIN-REST (CL-PPCRE::LEN CL-PPCRE::STR)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (FILTER T) ; (+ CL-PPCRE::CURRENT-MIN-REST (OR (CL-PPCRE::LEN CL-PPCRE::FILTER) 0)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (REPETITION T) ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ CL-PPCRE::CURRENT-MIN-REST ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)) ; ; note: forced to do 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 ; &OPTIONAL). ; 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 ; &OPTIONAL). ; etc. ; (+ CL-PPCRE::CURRENT-MIN-REST ; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION) ; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (LOOKBEHIND T) ; (+ CL-PPCRE::CURRENT-MIN-REST (CL-PPCRE::LEN CL-PPCRE::LOOKBEHIND)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFMETHOD COMPUTE-MIN-REST (REGEX T) ; (1+ CL-PPCRE::CURRENT-MIN-REST) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/optimize-tmpS9M8BVBG.fasl ; compilation finished in 0:00:00.080 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/closures.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/closures.lisp ; in: DEFUN *STRING*-EQUAL ; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX) ; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; in: DEFMETHOD CREATE-MATCHER-AUX (LOOKBEHIND T) ; (FUNCALL CL-PPCRE::TEST-MATCHER (- CL-PPCRE::START-POS CL-PPCRE::LEN)) ; ; note: doing signed word to integer coercion (cost 20) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFMETHOD CREATE-MATCHER-AUX (CHAR-CLASS T) ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::CHAR-CLASS ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::START-POS)) ; (LAMBDA (CL-PPCRE::START-POS) ; (DECLARE (FIXNUM CL-PPCRE::START-POS)) ; (AND (< CL-PPCRE::START-POS CL-PPCRE::*END-POS*) ; (CL-PPCRE::CHAR-CLASS-TEST) ; (FUNCALL CL-PPCRE::NEXT-FN (1+ CL-PPCRE::START-POS))))) ; --> LET LAMBDA FUNCTION AND IF IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFMETHOD CREATE-MATCHER-AUX (STR T) ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::START-POS ; CL-PPCRE::NEXT-POS 0 CL-PPCRE::LEN) ; --> LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::START-POS) CL-PPCRE::CHR) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (LENGTH CL-PPCRE::END-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::END-STRING CL-PPCRE::START-POS ; CL-PPCRE::TEST-END-POS 0 CL-PPCRE::END-STRING-LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (FUNCALL CL-PPCRE::NEXT-FN (+ CL-PPCRE::START-POS CL-PPCRE::LEN)) ; ; note: doing signed word to integer coercion (cost 20) ; ; note: doing signed word to integer coercion (cost 20) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFMETHOD CREATE-MATCHER-AUX (BACK-REFERENCE T) ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::*STRING* CL-PPCRE::START-POS ; CL-PPCRE::NEXT-POS CL-PPCRE::REG-START CL-PPCRE::REG-END) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; in: DEFMETHOD CREATE-MATCHER-AUX (FILTER T) ; (FUNCALL CL-PPCRE::FN CL-PPCRE::START-POS) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; FN is not known to be a function ; (FUNCALL CL-PPCRE::NEXT-FN CL-PPCRE::NEXT-POS) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; NEXT-FN is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/closures-tmp205IFRLS.fasl ; compilation finished in 0:00:00.096 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/repetition-closures.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/repetition-closures.lisp ; in: DEFMETHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T) ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST))) ; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET BLOCK ; --> TAGBODY WHEN IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN) ; --> LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; in: DEFMETHOD CREATE-GREEDY-NO-ZERO-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; in: DEFMETHOD CREATE-GREEDY-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0 ; (SVREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL) ; --> SETF LET* FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; in: DEFMETHOD CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T) ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST))) ; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET ; --> LOOP BLOCK LET LET TAGBODY UNLESS IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN) ; --> LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS ; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 ; CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; in: DEFMETHOD CREATE-NON-GREEDY-NO-ZERO-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; in: DEFMETHOD CREATE-NON-GREEDY-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0 ; (SVREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL) ; --> SETF LET* FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; in: ; DEFMETHOD CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER (REPETITION T) ; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX ; (SCHAR CL-PPCRE::*STRING* ; CL-PPCRE::CURR-POS)) ; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE ; (AND (CL-PPCRE::CHAR-CLASS-TEST) (1+ CL-PPCRE::CURR-POS)))) ; --> LET CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE LAMBDA FUNCTION ; --> LET AND IF IF LOOP BLOCK LET TAGBODY UNLESS IF AND IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS CL-PPCRE::NEXT-POS ; 0 CL-PPCRE::LEN) ; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; in: DEFMETHOD CREATE-CONSTANT-REPETITION-MATCHER (REPETITION T) ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0 ; (AREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL) ; --> SETF LET* FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (ZEROP (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> + AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)) ; --> SB-IMPL::XSUBTRACT AREF ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a (VECTOR FIXNUM), not a SIMPLE-ARRAY. ; in: DEFMETHOD CREATE-MATCHER-AUX (REPETITION T) ; (ZEROP CL-PPCRE::MAXIMUM) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; (PLUSP CL-PPCRE::MIN-LEN) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (PLUSP CL-PPCRE::LEN) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (PLUSP CL-PPCRE::MIN-LEN) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; (EQL CL-PPCRE::MINIMUM 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. ; ; 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. ; (PLUSP CL-PPCRE::MIN-LEN) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a 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) ; ; 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::MIN-LEN) ; ; 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/repetition-closures-tmpBW6GBZVX.fasl ; compilation finished in 0:00:00.220 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/scanner.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/scanner.lisp ; in: DEFUN CREATE-BMH-MATCHER ; (CL-PPCRE::BMH-MATCHER-AUX :CASE-INSENSITIVE-P T) ; --> FUNCTION IF LOOP BLOCK LET TAGBODY LOOP BLOCK LET LET TAGBODY UNLESS IF ; --> AND IF CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; (LENGTH CL-PPCRE::PATTERN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CHAR-UPCASE (SCHAR CL-PPCRE::PATTERN CL-PPCRE::K)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (CHAR-DOWNCASE (SCHAR CL-PPCRE::PATTERN CL-PPCRE::K)) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; (SEARCH CL-PPCRE::PATTERN CL-PPCRE::*STRING* :START2 CL-PPCRE::START-POS ; :END2 CL-PPCRE::*END-POS* :TEST CL-PPCRE::TEST) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN CREATE-CHAR-SEARCHER ; (CL-PPCRE::CHAR-SEARCHER-AUX :CASE-INSENSITIVE-P T) ; --> FUNCTION AND IF LOOP BLOCK LET LET TAGBODY WHEN IF SETQ THE AND IF ; --> CHAR-EQUAL ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; in: DEFUN CREATE-SCANNER-AUX ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF ; --> NOT ; ==> ; 1 ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a CHARACTER, not a BASE-CHAR. ; The second argument is a CHARACTER, not a BASE-CHAR. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*)) ; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS)) ; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #) ; (RETURN-FROM CL-PPCRE:SCAN NIL)) ; CL-PPCRE::POS)) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN) ; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (CL-PPCRE::INSERT-ADVANCE-FN ; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) ; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET) ; (FUNCTION CL-PPCRE::END-STRING-TEST)) ; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL)) ; (LOCALLY ; (DECLARE #) ; (WHEN # #) ; (LET # ; #))))) ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF < ; ==> ; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF AND IF ; ==> ; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN) ; CL-PPCRE::*END-POS*) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a REAL, not a FIXNUM. ; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY ; --> PROGN LET COND IF IF INCF SETQ THE ; ==> ; (+ 1 CL-PPCRE::*END-STRING-POS*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (FUNCALL CL-PPCRE::END-STRING-TEST CL-PPCRE::TRY-POS) ; ; note: doing signed word to integer coercion (cost 20) from TRY-POS ; ; note: doing signed word to integer coercion (cost 20) from TRY-POS ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/scanner-tmpMDMI656Q.fasl ; compilation finished in 0:00:00.584 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/api.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cl-ppcre/api.lisp ; in: DEFMETHOD CREATE-SCANNER (STRING) ; (COPY-SEQ CL-PPCRE::QUOTED-REGEX-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; in: DEFMETHOD CREATE-SCANNER (T) ; (PLUSP (CL-PPCRE::LEN CL-PPCRE::END-STRING)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= 1 (CL-PPCRE::LEN CL-PPCRE::END-STRING)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (PLUSP (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (= 1 (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (PLUSP (CL-PPCRE::LEN CL-PPCRE::END-STRING)) ; ; note: forced to do 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)) ; ; 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. ; in: DEFMETHOD SCAN (STRING T) ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (FUNCALL (CL-PPCRE:CREATE-SCANNER CL-PPCRE::REGEX-STRING) ; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING) ; CL-PPCRE::START CL-PPCRE::END) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; in: DEFMETHOD SCAN #'T ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; in: DEFMETHOD SCAN (T T) ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (FUNCALL (CL-PPCRE:CREATE-SCANNER CL-PPCRE::PARSE-TREE) ; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING) ; CL-PPCRE::START CL-PPCRE::END) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; in: DEFUN SCAN-TO-STRINGS ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (MAP 'VECTOR ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (IF CL-PPCRE::REG-START ; (FUNCALL CL-PPCRE::SUBSTR-FN CL-PPCRE::TARGET-STRING ; CL-PPCRE::REG-START CL-PPCRE::REG-END) ; NIL)) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFMACRO DO-SCANS ; (DEFMACRO CL-PPCRE:DO-SCANS ; ( ; (CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS ; CL-PPCRE::REG-ENDS ; CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING ; &OPTIONAL ; CL-PPCRE::RESULT-FORM ; &KEY ; CL-PPCRE::START ; CL-PPCRE::END) ; &BODY CL-PPCRE::BODY &ENVIRONMENT CL-PPCRE::ENV) ; #<(SIMPLE-ARRAY CHARACTER ; (495)) Iterates over TARGET-STRING and tries to match REGEX as often as ; possible evaluating BODY with MATCH-START, MATCH-END, REG-STARTS, and ; REG-ENDS bound to the four return values of each match in turn. ... {7BF7680F}> ; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING) ; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::%START CL-PPCRE::%END ; CL-PPCRE::%REGEX CL-PPCRE::SCANNER) ; (DECLARE (IGNORABLE CL-PPCRE::%REGEX CL-PPCRE::SCANNER)) ; `(BLOCK NIL ; (LET* # ; # ; #))))) ; ; caught STYLE-WARNING: ; &OPTIONAL and &KEY found in the same lambda list: (MATCH-START MATCH-END ; REG-STARTS REG-ENDS REGEX ; TARGET-STRING &OPTIONAL ; RESULT-FORM &KEY START END) ; in: DEFMACRO DO-MATCHES ; (DEFMACRO CL-PPCRE:DO-MATCHES ; ( ; (CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END ; CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING ; &OPTIONAL ; CL-PPCRE::RESULT-FORM ; &KEY ; CL-PPCRE::START ; CL-PPCRE::END) ; &BODY CL-PPCRE::BODY) ; #<(SIMPLE-ARRAY CHARACTER ; (477)) Iterates over TARGET-STRING and tries to match REGEX as often as ; possible evaluating BODY with MATCH-START and MATCH-END bound to the ; start/end positions of each match in turn. After the last match, ; ... {7C1C4007}> ; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; `(CL-PPCRE:DO-SCANS (,CL-PPCRE::MATCH-START ,CL-PPCRE::MATCH-END ; ,CL-PPCRE::REG-STARTS ,CL-PPCRE::REG-ENDS ; ,CL-PPCRE::REGEX ,CL-PPCRE::TARGET-STRING ; ,CL-PPCRE::RESULT-FORM :START ,CL-PPCRE::START :END ; ,CL-PPCRE::END) ; ,@CL-PPCRE::BODY))) ; ; caught STYLE-WARNING: ; &OPTIONAL and &KEY found in the same lambda list: (MATCH-START MATCH-END REGEX ; TARGET-STRING &OPTIONAL ; RESULT-FORM &KEY START END) ; in: DEFMACRO DO-MATCHES-AS-STRINGS ; (DEFMACRO CL-PPCRE:DO-MATCHES-AS-STRINGS ; ( ; (CL-PPCRE::MATCH-VAR ; CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING ; &OPTIONAL ; CL-PPCRE::RESULT-FORM ; &KEY ; CL-PPCRE::START ; CL-PPCRE::END ; CL-PPCRE::SHAREDP) ; &BODY CL-PPCRE::BODY) ; #<(SIMPLE-ARRAY CHARACTER ; (569)) Iterates over TARGET-STRING and tries to match REGEX as often as ; possible evaluating BODY with MATCH-VAR bound to the substring of ; TARGET-STRING corresponding to each match in turn. After the last ; ma... {7C298007}> ; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING) ; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::SUBSTR-FN) ; `(LET (#) ; (CL-PPCRE:DO-MATCHES # ; #))))) ; ; caught STYLE-WARNING: ; &OPTIONAL and &KEY found in the same lambda list: (MATCH-VAR REGEX ; TARGET-STRING &OPTIONAL ; RESULT-FORM &KEY START END ; SHAREDP) ; in: DEFMACRO DO-REGISTER-GROUPS ; (DEFMACRO CL-PPCRE:DO-REGISTER-GROUPS ; (CL-PPCRE::VAR-LIST ; (CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING ; &OPTIONAL ; CL-PPCRE::RESULT-FORM ; &KEY ; CL-PPCRE::START ; CL-PPCRE::END ; CL-PPCRE::SHAREDP) ; &BODY CL-PPCRE::BODY) ; #<(SIMPLE-ARRAY CHARACTER ; (820)) Iterates over TARGET-STRING and tries to match REGEX as often as ; possible evaluating BODY with the variables in VAR-LIST bound to the ; corresponding register groups for each match in turn, i.e. each ; va... {7C3BC007}> ; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING) ; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::SUBSTR-FN CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END CL-PPCRE::REG-STARTS ; CL-PPCRE::REG-ENDS CL-PPCRE::START-INDEX) ; `(LET (#) ; (CL-PPCRE:DO-SCANS # ; #))))) ; ; caught STYLE-WARNING: ; &OPTIONAL and &KEY found in the same lambda list: (REGEX TARGET-STRING ; &OPTIONAL RESULT-FORM ; &KEY START END SHAREDP) ; in: DEFUN ALL-MATCHES ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL-PPCRE:DO-MATCHES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REGEX CL-PPCRE::TARGET-STRING ; (NREVERSE CL-PPCRE::RESULT-LIST) :START CL-PPCRE::START ; :END CL-PPCRE::END) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::RESULT-LIST) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::RESULT-LIST)) ; --> LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING3) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND ; --> IF THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> 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 SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN ALL-MATCHES-AS-STRINGS ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL-PPCRE:DO-MATCHES-AS-STRINGS (CL-PPCRE::MATCH CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING ; (NREVERSE CL-PPCRE::RESULT-LIST) :START ; CL-PPCRE::START :END CL-PPCRE::END :SHAREDP ; CL-PPCRE::SHAREDP) ; (PUSH CL-PPCRE::MATCH CL-PPCRE::RESULT-LIST)) ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING7) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE ; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF ; ==> ; (= #:MATCH-START2 #:MATCH-END3) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; --> 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 SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK ; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE ; --> IF 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN SPLIT ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (UNLESS ; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST))) ; (WHEN (AND CL-PPCRE::LIMIT (>= # CL-PPCRE::LIMIT)) (RETURN)) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (WHEN CL-PPCRE::WITH-REGISTERS-P ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...)) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST))) ; --> BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF ; --> THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS ; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS ; IF CL-PPCRE::REG-START ; DO ...) ; --> LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; 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))) ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (= 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 SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-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 SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; (INCF CL-PPCRE::COUNTER) ; --> THE ; ==> ; (+ 1 CL-PPCRE::COUNTER) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (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))) ; --> 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 SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (> 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 SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; in: DEFUN STRING-CASE-MODIFIER ; (CHAR CL-PPCRE::STR (1- CL-PPCRE::FROM)) ; ; 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) ; ; 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) ; ; 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)) ; ; 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) ; ; 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. ; in: DEFMETHOD BUILD-REPLACEMENT-TEMPLATE (STRING) ; (POSITION-IF #'CL-PPCRE::DIGIT-CHAR-P CL-PPCRE::REPLACEMENT-STRING :START ; CL-PPCRE::MATCH-START :END CL-PPCRE::MATCH-END) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; (CHAR CL-PPCRE::REPLACEMENT-STRING (1+ CL-PPCRE::MATCH-START)) ; ; note: unable to ; optimize ; 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::FROM CL-PPCRE::MATCH-START) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The second argument is a REAL, not a FIXNUM. ; (1- ; (PARSE-INTEGER CL-PPCRE::REPLACEMENT-STRING :START CL-PPCRE::PARSE-START ; :JUNK-ALLOWED T)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (< CL-PPCRE::TOKEN 0) ; ; note: forced to do 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. ; in: DEFUN BUILD-REPLACEMENT ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (ARRAY-DIMENSION CL-PPCRE::REG-STARTS 0) ; ; note: unable to ; optimize ; because: ; The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; (MAP 'LIST ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (AND CL-PPCRE::REG-START ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END))) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; ; note: unable to open code because: can't determine sequence argument type ; (APPLY CL-PPCRE::TOKEN ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; (MAP 'LIST ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (AND CL-PPCRE::REG-START ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING ; CL-PPCRE::REG-START ; CL-PPCRE::REG-END))) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (MAP 'LIST ; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END) ; (AND CL-PPCRE::REG-START ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END))) ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; ; note: unable to open code because: can't determine sequence argument type ; (FUNCALL CL-PPCRE::TOKEN CL-PPCRE::TARGET-STRING CL-PPCRE::START ; CL-PPCRE::END CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (>= CL-PPCRE::TOKEN CL-PPCRE::REG-BOUND) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a INTEGER, not a FIXNUM. ; (1+ CL-PPCRE::TOKEN) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START ; CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; etc. ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; etc. ; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START ; CL-PPCRE::REG-END) ; --> MAKE-ARRAY ; ==> ; (- CL-PPCRE::END CL-PPCRE::START) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; etc. ; in: DEFUN REGEX-REPLACE ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::START CL-PPCRE::END) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; in: DEFUN REGEX-REPLACE-ALL ; (LENGTH CL-PPCRE::TARGET-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST) ; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST)) ; --> BLOCK LET* OR LET IF ; ==> ; (LENGTH #:TARGET-STRING1) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; --> BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF ; --> THE COERCE ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST ; (AND (NOT (SIMPLE-ARRAY CHARACTER (*))) ; (NOT SIMPLE-BASE-STRING) VECTOR) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY ; * (*)). ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (SUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::START CL-PPCRE::END) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END ; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX ; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END ; CL-PPCRE::END) ; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST) ; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST) ; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST)) ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF ; ==> ; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END) ; ; note: forced to do GENERIC-= (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; 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))) ; #<(SIMPLE-ARRAY CHARACTER ; (221)) Similar to the standard function APROPOS-LIST but returns a list of ; all symbols which match the regular expression REGEX. If ; CASE-INSENSITIVE is true and REGEX isn't already a scanner, a ; case-insensi... {7D71FAB7}> ; (LET ((CL-PPCRE::COLLECTOR 'NIL)) ; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES ; CL-PPCRE::CASE-INSENSITIVE ; CL-PPCRE::COLLECTOR) ; (PUSH SYMBOL CL-PPCRE::COLLECTOR)))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS-LIST ; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY ; (CL-PPCRE::CASE-INSENSITIVE T)) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (221)) Similar to the standard function APROPOS-LIST but returns a list of ; all symbols which match the regular expression REGEX. If ; CASE-INSENSITIVE is true and REGEX isn't already a scanner, a ; case-insensi... {7D71FAB7}> ; (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)) ; in: DEFUN REGEX-APROPOS ; (DEFUN CL-PPCRE:REGEX-APROPOS ; (CL-PPCRE::REGEX ; &OPTIONAL CL-PPCRE::PACKAGES ; &KEY (CL-PPCRE::CASE-INSENSITIVE T)) ; #<(SIMPLE-ARRAY CHARACTER ; (216)) Similar to the standard function APROPOS but returns a list of all ; symbols which match the regular expression REGEX. If CASE-INSENSITIVE ; is true and REGEX isn't already a scanner, a case-insensitive ... {7D9A1007}> ; (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)) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS ; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY ; (CL-PPCRE::CASE-INSENSITIVE T)) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (216)) Similar to the standard function APROPOS but returns a list of all ; symbols which match the regular expression REGEX. If CASE-INSENSITIVE ; is true and REGEX isn't already a scanner, a case-insensitive ... {7D9A1007}> ; (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)) ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cl-ppcre/api-tmpQN7VP0FI.fasl ; compilation finished in 0:00:00.324 WARNING: Lisp compilation had style-warnings while compiling # ; ; compilation unit finished ; caught 7 STYLE-WARNING conditions ; printed 1061 notes STYLE-WARNING: using deprecated EVAL-WHEN situation names LOAD EVAL WARNING: System definition file #P"/build/reproducible-path/cafeobj-1.6.0/sysdef.asd" contains definition for system "chaosx". Please only define "sysdef" and secondary systems with a name starting with "sysdef/" (e.g. "sysdef/test") in that file. ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos-package.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos-package-tmpNOSTK6D0.fasl ; compilation finished in 0:00:00.004 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/version.lisp" (written 16 MAY 2025 06:49:41 PM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/version-tmp9RA72042.fasl ; compilation finished in 0:00:00.004 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/globals.lisp" (written 17 JAN 2019 06:56:23 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/globals-tmpGXZUHQQV.fasl ; compilation finished in 0:00:00.032 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/macros.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/macros.lisp ; in: DEFMACRO WHILE ; `(BLOCK NIL ; (TAGBODY ; (GO ,CHAOS::END-TEST) ; ,LOOP ; ,@CHAOS::BODY ; ,CHAOS::END-TEST ; (WHEN ,CHAOS::TEST (GO ,LOOP)) ; (RETURN))) ; --> SB-IMPL::|List*| SB-IMPL::|Append| ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFMACRO WHILE-NOT ; `(BLOCK NIL ; (TAGBODY ; (GO ,CHAOS::END-TEST) ; ,LOOP ; ,@CHAOS::BODY ; ,CHAOS::END-TEST ; (UNLESS ,CHAOS::TEST (GO ,LOOP)) ; (RETURN))) ; --> SB-IMPL::|List*| SB-IMPL::|Append| ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/macros-tmp1SBDRUB4.fasl ; compilation finished in 0:00:00.036 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/print-utils.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/print-utils.lisp ; in: DEFUN PRINT-CENTERING ; (/ (- CHAOS::.TERMINAL-WIDTH. (THE FIXNUM (LENGTH STRING))) 2.0) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; because: ; the first argument cannot safely be converted to SINGLE-FLOAT ; (TRUNCATE (+ (/ (- CHAOS::.TERMINAL-WIDTH. (THE FIXNUM #)) 2.0) 0.5)) ; ; note: doing float to pointer coercion (cost 13) ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/print-utils-tmpFJI67R2A.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/message.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/message.lisp ; in: DEFUN SET-VERBOSE-LVL ; (<= CHAOS::LVL 3) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN SET-VERBOSE-OFF ; (ZEROP CHAOS::*MSG-LVL*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; 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 ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; in: DEFUN OUTPUT-MSG ; (>= (CHAOS::GET-MSG-LEVEL CHAOS::ID) CHAOS::*MSG-LVL*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (STRING CHAOS::ID) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/message-tmp2LAB0LT0.fasl ; compilation finished in 0:00:00.072 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/error.lisp" (written 15 NOV 2018 12:48:56 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/error-tmp5G8XXQL5.fasl ; compilation finished in 0:00:00.016 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/misc.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/misc.lisp ; in: DEFUN OB-COMPARE ; (< CHAOS::X CHAOS::Y) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT RATIO), not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR FLOAT RATIO), not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR FLOAT RATIO), not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (< CHAOS::Y CHAOS::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a (OR FLOAT RATIO), not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT RATIO), not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a (OR FLOAT RATIO), not a RATIONAL. ; (LENGTH CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SB-KERNEL:EXTENDED-SEQUENCE ; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER)) ; VECTOR)), not a VECTOR. ; (LENGTH CHAOS::Y) ; ; 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 (OR SB-KERNEL:EXTENDED-SEQUENCE ; (AND (NOT BASE-STRING) (NOT (VECTOR CHARACTER)) ; VECTOR)), not a (SIMPLE-ARRAY * (*)). ; (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. ; (< CHAOS::X CHAOS::Y) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a (OR FLOAT RATIO), not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a (OR FLOAT RATIO), not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; (< CHAOS::Y 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 SINGLE-FLOAT. ; The second argument is a (OR FLOAT RATIO), not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a (OR FLOAT RATIO), not a DOUBLE-FLOAT. ; (< (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. ; in: DEFUN ADDR-OF ; (DEFUN CHAOS::ADDR-OF (CHAOS::X) ; (LOGAND CHAOS::.32BIT. (SB-KERNEL:GET-LISP-OBJ-ADDRESS CHAOS::X))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CHAOS::ADDR-OF ; (CHAOS::X) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (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 "" ; in: DEFUN PRINT-ADDR ; (FORMAT T "0x~8,'0x" (CHAOS::ADDR-OF CHAOS::X)) ; ; note: doing unsigned word to integer coercion (cost 20) ; in: DEFUN READ-CHAR-WAIT ; (+ CHAOS::START CHAOS::TIMEOUT) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (< (+ CHAOS::START CHAOS::TIMEOUT) (CHAOS::INTERNAL-REAL-TIME-IN-SECONDS)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (+ CHAOS::START CHAOS::TIMEOUT) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (RATIONAL 0 2305843009213693951/1000), not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a (RATIONAL 0 2305843009213693951/1000), not a (UNSIGNED-BYTE ; 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (< (+ CHAOS::START CHAOS::TIMEOUT) (CHAOS::INTERNAL-REAL-TIME-IN-SECONDS)) ; ; 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 (RATIONAL 0 2305843009213693951/1000), not a FIXNUM. ; in: DEFUN ELAPSED-TIME-IN-SECONDS ; (COERCE (/ (- CHAOS::NOW CHAOS::BASE) INTERNAL-TIME-UNITS-PER-SECOND) 'FLOAT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a RATIONAL, not a RATIO. ; (- 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 ; &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (COERCE (/ (- CHAOS::NOW CHAOS::BASE) INTERNAL-TIME-UNITS-PER-SECOND) 'FLOAT) ; ; 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). ; in: DEFUN TIME-IN-SECONDS ; (COERCE (/ CHAOS::SUM INTERNAL-TIME-UNITS-PER-SECOND) 'FLOAT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a RATIONAL, not a RATIO. ; ; 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). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/misc-tmp70X8ZE5V.fasl ; compilation finished in 0:00:00.116 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/string.lisp" (written 15 NOV 2018 12:48:56 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/string-tmpRJ7B84T0.fasl ; compilation finished in 0:00:00.016 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/list.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/list.lisp ; in: DEFUN FLATTEN-LIST ; (APPEND (CHAOS::FLATTEN-LIST (CAR CHAOS::L)) ; (CHAOS::FLATTEN-LIST (CDR CHAOS::L))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN IN-ORDER-UNION ; (APPEND CHAOS::LIST1 CHAOS::LIST2) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/list-tmpOMGCSPAB.fasl ; compilation finished in 0:00:00.008 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/dag.lisp" (written 15 NOV 2018 12:48:56 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/dag-tmpLEWWGRGS.fasl ; compilation finished in 0:00:00.048 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/fsys.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/fsys.lisp ; in: DEFUN EXPAND-FILE-NAME ; (EQUAL "~" CHAOS::FNAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN SUPPLY-SUFFIXES ; (MAPCAR #'PATHNAME ; (MAPCAR ; #'(LAMBDA (CHAOS::X) ; (CONCATENATE 'STRING (NAMESTRING CHAOS::PATH) ; (NAMESTRING CHAOS::X))) ; CHAOS::SUFFIXES)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING PATHNAME SYNONYM-STREAM ; FILE-STREAM), not a PATHNAME. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING PATHNAME SYNONYM-STREAM ; FILE-STREAM), not a STRING. ; in: DEFUN CHAOS-GET-RELATIVE-PATH ; (PATHNAME CHAOS::FILE-PATH) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYNONYM-STREAM FILE-STREAM), not a STRING. ; in: DEFUN CHAOS-PRINT-DIRECTORY-STACK ; (FORMAT STREAM "~%~a" CHAOS::*CHAOS-DIRECTORY-STACK*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; 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 VECTOR. ; in: DEFUN CHAOS-INPUT-FILE ; (APPLY CHAOS::PROC CHAOS::ARGS) ; ; 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)) ; ; 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. ; in: DEFUN SET-SEARCH-PATH-PLUS ; (APPEND (NREVERSE CHAOS::PATH) CHAOS::*CHAOS-LIBPATH*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PR-SEARCH-PATH ; (FORMAT STREAM "libpath = ~{~a~^:~}" CHAOS::*CHAOS-LIBPATH*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/fsys-tmp2VH9CUXA.fasl ; compilation finished in 0:00:00.136 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/tree-display.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/tree-display.lisp ; in: DEFUN AUGMENT-TREE ; (FUNCALL CHAOS::LEAF? CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF? is not known to be a function ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-NAME is not known to be a function ; (FUNCALL CHAOS::LEAF-INFO CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-INFO is not known to be a function ; (FUNCALL CHAOS::INT-NODE-CHILDREN CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; INT-NODE-CHILDREN is not known to be a function ; (FUNCALL CHAOS::INT-NODE-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; INT-NODE-NAME is not known to be a function ; (* (- (THE FIXNUM (LENGTH (THE LIST CHAOS::CHILDREN))) 1) CHAOS::TREE-SPACING) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ (* (- (THE FIXNUM (LENGTH #)) 1) CHAOS::TREE-SPACING) ; (THE FIXNUM (APPLY #'+ (MAPCAR #'CHAOS::AUGM-TREE-WIDTH CHAOS::CHILDREN)))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* (- (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 &OPTIONAL). ; 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) ; &OPTIONAL). ; 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 (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; 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) ; in: DEFUN TRAVERSE-TREE-CHECKING-DUPS ; (FUNCALL CHAOS::LEAF? CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF? is not known to be a function ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-NAME is not known to be a function ; (FUNCALL CHAOS::LEAF-INFO CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-INFO is not known to be a function ; (FUNCALL CHAOS::INT-NODE-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; INT-NODE-NAME is not known to be a function ; (FUNCALL CHAOS::INT-NODE-CHILDREN CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; INT-NODE-CHILDREN is not known to be a function ; in: DEFUN AUGMENT-TREE-AS-GRAPH-AUX ; (FUNCALL CHAOS::INT-NODE-CHILDREN CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; INT-NODE-CHILDREN is not known to be a function ; (* (- (THE FIXNUM (LENGTH CHAOS::CHILDREN)) 1) CHAOS::TREE-SPACING) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ (* (- (THE FIXNUM (LENGTH CHAOS::CHILDREN)) 1) CHAOS::TREE-SPACING) ; (THE FIXNUM (APPLY #'+ (MAPCAR #'CHAOS::AUGM-TREE-WIDTH CHAOS::CHILDREN)))) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (* (- (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 &OPTIONAL). ; 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) ; &OPTIONAL). ; 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 (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; 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) ; in: DEFUN PRINT-LOOP2 ; (APPEND CHAOS::NEW-TREES (LIST CHAOS::TREE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND CHAOS::NEW-TREES (CHAOS::PAD CHAOS::TREE-WIDTH 'NIL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (+ CHAOS::LPAD CHAOS::ROOT1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (APPEND CHAOS::NEW-TREES (LIST CHAOS::TREE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND CHAOS::NEW-TREES (CHAOS::PAD CHAOS::TREE-WIDTH 'NIL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (+ CHAOS::ROOT CHAOS::TREE-SPACING CHAOS::RIGHT) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ CHAOS::ROOT 1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (- CHAOS::WIDTH (+ CHAOS::ROOT 1)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (+ CHAOS::RIGHT CHAOS::RPAD) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (APPEND CHAOS::NEW-TREES (REVERSE (CHAOS::PAD CHAOS::RPAD CHAOS::L2))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (+ 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. ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (+ CHAOS::ROOT CHAOS::TREE-SPACING CHAOS::RIGHT) ; ; 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; 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 &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (- 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 &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (+ CHAOS::RIGHT CHAOS::RPAD) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; 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 ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/tree-display-tmp21MKT5OO.fasl ; compilation finished in 0:00:00.072 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/lex.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/lex.lisp ; in: DEFUN LEX-SHOW-DELIMITERS ; (FORMAT STREAM "~%~S : ~S" (CODE-CHAR CHAOS::X) CHAOS::SYNTAX) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN !SET-SINGLE-READER ; (STRING CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING CHARACTER), not a STRING. ; 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))))) ; ; 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. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN READER-GET-CHAR ; (INCF CHAOS::.NEWLINE-COUNT.) ; --> THE ; ==> ; (+ 1 CHAOS::.NEWLINE-COUNT.) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (> 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.) ; --> 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 &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (> 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. ; in: DEFUN READ-LEXICON ; (STRING CHAOS::.READER-CH.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN READER-SUPPRESS-CH ; (STRING CHAOS::.READER-CH.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN READ-SYM ; (STRING CHAOS::.READER-CH.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN LEX-READ-REST-OF-LIST ; (APPEND CHAOS::RES CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN !FORCE-SINGLE-READER ; (CHAR (THE STRING CHAOS::X) 0) ; ; 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 STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN !UNSET-SINGLE-READER ; (CHAR (THE STRING CHAOS::X) 0) ; ; 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.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/lex-tmpMXTBQGWB.fasl ; compilation finished in 0:00:00.124 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/reader.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/comlib/reader.lisp ; in: DEFUN STRING-MATCH ; (STRING CHAOS::Y) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SYMBOL CHARACTER), not a SYMBOL. ; (STRING= (THE SIMPLE-STRING CHAOS::X) ; (IF (STRINGP CHAOS::Y) ; (THE SIMPLE-STRING CHAOS::Y) ; (THE SIMPLE-STRING (STRING-DOWNCASE (STRING CHAOS::Y))))) ; ; 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. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN GENERAL-READ-STRING-MATCHES ; (FUNCALL (CADR CHAOS::Y) CHAOS::X) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN GENERAL-READ ; (APPEND CHAOS::VAL (CHAOS::GENERAL-READ REST CHAOS::CONTEXT)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND (CHAOS::GENERAL-READ (CDDR ELT) (LIST (CADR ELT))) ; (CHAOS::GENERAL-READ REST CHAOS::CONTEXT)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-SEQ-OF ; (APPEND CHAOS::RES (CHAOS::GENERAL-READ CHAOS::S CHAOS::C)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-CONTINUE-APPEND ; (APPEND CHAOS::V (CHAOS::GENERAL-READ CHAOS::S CHAOS::C)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN GENERAL-READ-SHOW-CONTEXT ; (EQUAL CHAOS::*READER-STARTING-POSITION* (FILE-POSITION *STANDARD-INPUT*)) ; ; 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 (OR UNSIGNED-BYTE BOOLEAN), not a FIXNUM. ; in: DEFUN GENERAL-READ-PRINT-SCHEMA ; (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 ATOM, 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 ATOM, 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 ATOM, not a FIXNUM. ; in: DEFUN READ-TERM-FROM-STRING ; (APPEND CHAOS::RES CHAOS::INP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-SEQ-OF-TERM-FROM-STRING ; (APPEND CHAOS::RES CHAOS::*READER-INPUT*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-TERM-AT-TOP ; (CHAOS::READ-TERM-FROM-STRING CHAOS::LINES) ; --> BLOCK WITH-INPUT-FROM-STRING SB-INT:DX-LET LET LET PROGN LET LET LOOP ; --> BLOCK TAGBODY PROGN SETQ THE APPEND ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-TERM ; (APPEND CHAOS::RES CHAOS::INP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-SEQ-OF-TERM ; (APPEND CHAOS::RES CHAOS::*READER-INPUT*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-ARGS ; (APPEND CHAOS::RES CHAOS::INP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-SEQ-OF-OPNAME ; (APPEND CHAOS::RES CHAOS::*READER-INPUT*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-OPNAME ; (APPEND CHAOS::RES CHAOS::INP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-OPNAME-FROM-STRING ; (APPEND CHAOS::RES CHAOS::INP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-SEQ-OF-OPNAME-FROM-STRING ; (APPEND CHAOS::RES CHAOS::*READER-INPUT*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-SUPEREXPR-DELIMITED ; (APPEND CHAOS::LST (CONS CHAOS::*READER-INPUT* NIL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN READ-MODEXP-DELIMITED ; (APPEND CHAOS::LST (CONS CHAOS::*READER-INPUT* NIL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/reader-tmpPPC4Z10Q.fasl ; compilation finished in 0:00:00.092 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/comlib/let-over-lambda.lisp" (written 15 NOV 2018 12:48:56 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/comlib/let-over-lambda-tmpRD3N4073.fasl ; compilation finished in 0:00:00.184 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bterm.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bterm.lisp ; in: DEFUN TERM-VARIABLES ; (APPEND CHAOS::RES (CHAOS::TERM-VARIABLES CHAOS::ST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN TERM-PVARIABLES ; (APPEND CHAOS::RES (CHAOS::TERM-PVARIABLES CHAOS::ST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bterm-tmpFHOV2EXD.fasl ; compilation finished in 0:00:00.416 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/defterm.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/defterm.lisp ; in: DEFUN CHAOS-PR-OBJECT ; (FORMAT STREAM "#<~a : ~x>" (CHAOS::%CHAOS-OBJECT--TYPE CHAOS::OBJ) ; (CHAOS::ADDR-OF CHAOS::OBJ)) ; ; note: doing unsigned word to integer coercion (cost 20) ; in: DEFUN %MAKE-KEYWORD ; (STRING CHAOS::SYMBOL-OR-STRING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a STRING. ; in: DEFMACRO DEFTERM ; (APPEND CHAOS::VISIBLE CHAOS::HIDDEN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND CHAOS::SSL (NREVERSE CHAOS::RES)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (STRING CHAOS::CONC-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::CONC-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::CONC-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::CONC-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/defterm-tmp5P00NUE.fasl ; compilation finished in 0:00:00.464 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bobject.lisp" (written 04 MAR 2019 06:26:47 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bobject.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)) ; ; note: doing unsigned word to integer coercion (cost 20) ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bobject-tmp94JO3ZTC.fasl ; compilation finished in 0:00:00.456 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/absntax.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/absntax-tmp6OFDFVAR.fasl ; compilation finished in 0:00:00.928 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/script.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/script-tmpRYWTYMDY.fasl ; compilation finished in 0:00:01.240 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/op-theory.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/op-theory-tmpW78F18LW.fasl ; compilation finished in 0:00:00.236 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bmodexp.lisp" (written 04 MAR 2019 06:39:10 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bmodexp-tmpWUHTUDVN.fasl ; compilation finished in 0:00:00.292 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bmodule2.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bmodule2.lisp ; in: DEFUN EQUAL-TOP-LEVEL ; (STRING= CHAOS::X CHAOS::Y) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; (EQL CHAOS::X CHAOS::Y) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (AND ATOM (NOT (VECTOR CHARACTER)) ; (NOT BASE-STRING)), 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 (AND ATOM (NOT (VECTOR CHARACTER)) ; (NOT BASE-STRING)), 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 (AND ATOM (NOT (VECTOR CHARACTER)) ; (NOT BASE-STRING)), not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bmodule2-tmpCK73UFEK.fasl ; compilation finished in 0:00:00.328 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bview2.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bview2.lisp ; in: DEFUN SAME-TOP-LEVEL ; (EVERY #'EQL CHAOS::ME1 CHAOS::ME2) ; ; 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bview2-tmpEBEIAP0J.fasl ; compilation finished in 0:00:00.056 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/parse-modexp.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/parse-modexp.lisp ; in: DEFUN PARSE-OPERATOR-REFERENCE ; (POSITION #\. CHAOS::MOD-REF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (LENGTH CHAOS::MOD-REF) ; ; 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/parse-modexp-tmpSE943D3D.fasl ; compilation finished in 0:00:00.148 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/normodexp.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/normodexp-tmpN5RKE5P2.fasl ; compilation finished in 0:00:00.028 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bsort.lisp" (written 17 JAN 2019 06:56:23 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bsort-tmpNQZ6T1LT.fasl ; compilation finished in 0:00:00.520 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/boperator.lisp" (written 10 DEC 2019 02:26:49 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/boperator.lisp ; in: DEFUN PRINT-OPERATOR-OBJECT ; (FORMAT STREAM ":op[~s : ~x]" (CHAOS::OPERATOR-NAME CHAOS::OBJ) ; (CHAOS::ADDR-OF CHAOS::OBJ)) ; ; note: doing unsigned word to integer coercion (cost 20) ; in: DEFUN MAKE-PRINT-OPERATOR-ID ; (STRING CHAOS::A) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a STRING. ; (STRING CHAOS::B) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a STRING. ; in: DEFUN PRINT-METHOD-OBJECT ; (FORMAT STREAM ":op[~a]" (CHAOS::METHOD-NAME CHAOS::OBJ)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN MAKE-METHOD-ID-SYMBOL ; (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 LIST VECTOR). ; (STRING= CHAOS::X "_") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; in: DEFUN METHOD-IS-PREDICATE ; (MEMBER CHAOS::*BOOL-SORT* (CHAOS::METHOD-ARITY CHAOS::METHOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN METHOD-IS-RESTRICTION-OF ; (BREAK "HiGo") ; ; note: deleting unreachable code ; in: DEFUN METHOD-ALL-RULES ; (APPEND CHAOS::DIF CHAOS::RES) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN MAKE-OPERATOR-INTERNAL ; (INCF CHAOS::T-CNT) ; --> THE ; ==> ; (+ 1 CHAOS::T-CNT) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/boperator-tmpWLS9DP2S.fasl ; compilation finished in 0:00:00.720 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/baxioms.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/baxioms.lisp ; in: DEFUN PRINT-RULE-OBJECT ; (FORMAT STREAM ":rule[~S: " (CHAOS::ADDR-OF CHAOS::OBJ)) ; ; note: doing unsigned word to integer coercion (cost 20) ; in: DEFUN PRINT-AXIOM-OBJECT ; (FORMAT STREAM ":axiom[~S]" (CHAOS::ADDR-OF CHAOS::OBJ)) ; ; note: doing unsigned word to integer coercion (cost 20) ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/baxioms-tmp8VCF5G6M.fasl ; compilation finished in 0:00:00.216 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bmacro.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bmacro.lisp ; in: DEFUN PRINT-MACRO ; (FORMAT T "#" (CHAOS::ADDR-OF CHAOS::MACRO)) ; ; note: doing unsigned word to integer coercion (cost 20) ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/bmacro-tmp8DMZV8XU.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/gen-eval.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/gen-eval.lisp ; in: DEFUN EVAL-AST ; (FBOUNDP (CAR CHAOS::AST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS SYMBOL), not a SYMBOL. ; (STRING CHAOS::MODULE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING (AND SYMBOL (NOT NULL)) ; CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING (AND SYMBOL (NOT NULL)) ; CHARACTER), not a STRING. ; (FUNCALL CHAOS::EVALUATOR CHAOS::AST) ; ; 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 ; (FBOUNDP (CAR CHAOS::AST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS SYMBOL), not a SYMBOL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/gen-eval-tmpEGA125WT.fasl ; compilation finished in 0:00:00.024 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/meta.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/meta.lisp ; in: DEFUN DO-APPLY!! ; (CHAOS::CREATE-SYSTEM-OBJECT-TERM NIL) ; ; note: deleting unreachable code ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/meta-tmpE9RDNCMC.fasl ; compilation finished in 0:00:00.160 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/gen-print.lisp" (written 30 SEP 2019 05:33:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/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 STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; 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 STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN BCONST-PRINT-STRING ; (FUNCALL ; (CHAOS::BSORT-TERM-PRINTER ; (CHAOS::TERM-SORT ; CHAOS::TERM)) ; CHAOS::VAL) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN IS-SELF-TERMINATING ; (CHAR CHAOS::TOK 0) ; ; 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. ; in: DEFUN TERM-PRINT1 ; (STRING CHAOS::I) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING (AND (NOT (MEMBER T)) SYMBOL) ; CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING (AND (NOT (MEMBER T)) SYMBOL) ; CHARACTER), not a STRING. ; in: DEFUN TERM-PRINT2 ; (* 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 STRING (AND (NOT (MEMBER T)) SYMBOL) ; CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING (AND (NOT (MEMBER T)) SYMBOL) ; CHARACTER), not a STRING. ; (* 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 ; &OPTIONAL). ; 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 ; &OPTIONAL). ; etc. ; (1- CHAOS::X) ; ; 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 ; &OPTIONAL). ; 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 ; &OPTIONAL). ; etc. ; in: DEFUN !PRINT-TERM-TREE ; (STRING ; (CHAOS::VARIABLE-PRINT-NAME ; CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-NAME is not known to be a function ; (IF SORT ; (CHAOS::SORT-ID SORT) ; "unknown") ; ; note: deleting unreachable code ; in: DEFUN PRINT-CHAOS-OBJECT ; (FUNCALL CHAOS::PRINTER CHAOS::OBJECT STREAM) ; ; 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 -------------------") ; ; 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/gen-print-tmpGTSGBQIR.fasl ; compilation finished in 0:00:00.196 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/context.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/context.lisp ; in: DEFUN IS-SPECIAL-LET-VARIABLE? ; (EQUAL "$$" (SUBSEQ (THE SIMPLE-STRING CHAOS::NAME) 0 2)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (SIMPLE-STRING 2), not a (SIMPLE-ARRAY CHARACTER ; (*)). ; in: DEFUN GET-BOUND-VALUE ; (EQUAL CHAOS::LET-SYM "$$term") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; (EQUAL CHAOS::LET-SYM "$$subterm") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/context-tmpRCRZ6VP.fasl ; compilation finished in 0:00:00.044 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/term-utils.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/term-utils.lisp ; in: DEFUN SUBSTITUTION-COMPOSE ; `(LAMBDA (CHAOS::COMPN) ; (FUNCALL ',CHAOS::REALFCN ; (APPEND ',(APPEND CHAOS::TETA CHAOS::OLDTETA) CHAOS::COMPN))) ; --> SB-IMPL::|List| SB-IMPL::|List*| SB-IMPL::|List| APPEND ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN SUBSTITUTION-COMPOSE-CHAOS ; `(LAMBDA (CHAOS::COMPN) ; (FUNCALL ',CHAOS::REALFCN ; (APPEND ',(APPEND CHAOS::TETA CHAOS::OLDTETA) CHAOS::COMPN))) ; --> SB-IMPL::|List| SB-IMPL::|List*| SB-IMPL::|List| APPEND ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN SUBSTITUTION-CAN ; (STRING ; (CHAOS::VARIABLE-NAME ; (CAR CHAOS::X))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; (CAR CHAOS::Y))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN UPDATE-LOWEST-PARSE ; (FUNCALL ; (CHAOS::BSORT-TERM-PREDICATE ; CHAOS::S) ; CHAOS::VAL) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN TERM-EQUATIONAL-EQUAL ; (CHAOS::E-EQUAL-IN-THEORY ; (CHAOS::METHOD-THEORY ; CHAOS::F1) ; CHAOS::T1 ; CHAOS::T2) ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN COPY-LIST-TERM-USING-LIST-VAR ; (ASSOC CHAOS::TERM CHAOS::LIST-NEW-VAR :TEST CHAOS::TEST) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TEST is not known to be a function ; in: DEFUN REPLACE-VARIABLES-WITH-TOC ; (FORMAT T WARN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a STRING, not a SIMPLE-STRING. ; (ASSOC CHAOS::VAR SUBST) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN SUBSTITUTION-IMAGE ; (FUNCALL ; (CHAOS::LISP-FORM-FUNCTION ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL ; (CHAOS::CHAOS-FORM-EXPR ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN SUBSTITUTION-IMAGE! ; (FUNCALL ; (CHAOS::LISP-FORM-FUNCTION ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL ; (CHAOS::CHAOS-FORM-EXPR ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN SUBSTITUTION-IMAGE-CP ; (FUNCALL ; (CHAOS::LISP-FORM-FUNCTION ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL ; (CHAOS::CHAOS-FORM-EXPR ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN SUBSTITUTION-IMAGE-SIMPLIFYING ; (FUNCALL ; (CHAOS::CHAOS-FORM-EXPR ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL ; (CHAOS::LISP-FORM-FUNCTION ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/term-utils-tmpC6WXNUWP.fasl ; compilation finished in 0:00:00.656 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/find.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/find.lisp ; in: DEFUN SORT-NAME-IS-AMBIGUOUS ; (APPEND ; (CHAOS::MODULE-ERROR-SORTS ; CHAOS::MODULE) ; (CHAOS::MODULE-ALL-SORTS ; CHAOS::MODULE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN FIND-SORT-IN ; (STRING CHAOS::SORT-ID) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a STRING. ; in: DEFUN FIND-ERROR-SORT-IN ; (STRING CHAOS::SORT-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SIMPLE-STRING SYMBOL), not a STRING. ; in: DEFUN IMPLODE-OP-REF ; (APPEND (BUTLAST CHAOS::NAME) ; (SUBSEQ (THE SIMPLE-STRING (CAR (LAST CHAOS::NAME))) 0 CHAOS::POS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN FIND-BUILTIN-METHOD-IN ; (FUNCALL (CAR CHAOS::SORT-INFO) CHAOS::OPNM) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL (CAR CHAOS::SI) CHAOS::OPNM) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN FIND-ALL-METHODS-NAMED-IN ; (APPEND CHAOS::RES ; (CHAOS::OPINFO-METHODS ; CHAOS::INFO)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN FIND-ALL-METHODS-NAMED-IN-SORT ; (APPEND ; (LET ((CHAOS::OPINFOS ; (CHAOS::FIND-OPERATORS-IN-MODULE-NO-NUMBER CHAOS::OP-NAME ; CHAOS::MODULE)) ; (CHAOS::RES NIL)) ; (DOLIST (CHAOS::INFO CHAOS::OPINFOS) ; (LET (#) ; (IF CHAOS::RES1 ; #))) ; CHAOS::RES) ; (MAPCAN ; #'(LAMBDA (CHAOS::SRT) ; (IF (AND # #) ; (LET # ; #))) ; (CHAOS::MODULE-ALL-SORTS ; CHAOS::MODULE))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN FIND-PARAMETERIZED-SUBMODULE ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (EQUAL CHAOS::NAME ; (CHAOS::PARAMETER-ARG-NAME ; CHAOS::X))) ; CHAOS::PARAMS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN NTH-SUB ; (RASSOC (CAR CHAOS::I) CHAOS::PARAMS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN MODULE-OWN-AXIOMS ; (APPEND ; (CHAOS::MODULE-EQUATIONS ; MOD) ; (CHAOS::MODULE-RULES ; MOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN GET-MODULE-AXIOMS ; (APPEND (CHAOS::MODULE-OWN-AXIOMS-ORDERED MOD) ; (CHAOS::MODULE-IMPORTED-AXIOMS MOD CHAOS::NO-SYSTEM-EQUATIONS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN SYMBOL-TABLE-ADD ; (PUSHNEW CHAOS::OBJ (CHAOS::STABLE-UNKNOWNS CHAOS::TBL)) ; --> ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (AND (NOT SORT*) (NOT OPERATOR) (NOT MODULE) ; (NOT AXIOM)), not a (OR FIXNUM (NOT NUMBER)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/find-tmpB17HDEGA.fasl ; compilation finished in 0:00:00.252 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/print-object.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/primitives/print-object.lisp ; in: DEFUN PRINT-MODEXP ; (FUNCALL CHAOS::PRINTER CHAOS::ME STREAM CHAOS::SIMPLE CHAOS::NO-PARAM) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; (FUNCALL CHAOS::PRINTER CHAOS::ME STREAM) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; in: DEFUN PRINT-VIEW-IN-CAFEOBJ-MODE ; (FUNCALL CHAOS::PRINTER CHAOS::VW STREAM CHAOS::SIMPLE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; in: DEFUN PRINT-CHECK-BU ; (APPEND CHAOS::IOTA '(0)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PRINT-CHECK-BU-METH ; (APPEND CHAOS::IOTA '(0)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PRINT-METHOD-BRIEF ; (CHAOS::METHOD-IS-PREDICATE CHAOS::METH) ; --> BLOCK AND IF IF IF NOT ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN PRINT-RULE-LABELS ; (MAPCAR #'STRING LABELS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PRINT-RULE ; (LENGTH CHAOS::EXTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/primitives/print-object-tmpE3AQVWGT.fasl ; compilation finished in 0:00:00.444 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-macro.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-macro.lisp ; in: DEFUN EXPAND-MACRO ; (1+ CHAOS::*DEBUG-MARCO-NEST*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (FUNCALL ; (CHAOS::LISP-FORM-FUNCTION ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (1+ CHAOS::*DEBUG-MARCO-NEST*) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-macro-tmpYKOEPICF.fasl ; compilation finished in 0:00:00.040 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-engine.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-engine.lisp ; in: DEFUN VARIABLE-COPY-MODIFYING ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN SIMPLE-COPY-TERM-SHARING-VARIABLES ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (ASSOC ; (CHAOS::VARIABLE-NAME ; CHAOS::TERM) ; CHAOS::*PARSE-VARIABLES* :TEST #'EQL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN GET-QUALIFIED-OP-PATTERN ; (POSITION #\_ CHAOS::EXPR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR LIST STRING (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR LIST ; VECTOR). ; (SUBSEQ CHAOS::EXPR 0 CHAOS::POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST STRING (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST STRING (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST STRING (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a SB-KERNEL:EXTENDED-SEQUENCE. ; (SUBSEQ CHAOS::EXPR (1+ CHAOS::POS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST STRING (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST STRING (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST STRING (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a SB-KERNEL:EXTENDED-SEQUENCE. ; in: DEFUN GET-INFO-ON-TOKEN ; (FUNCALL CHAOS::TOKEN-PRED CHAOS::TOKEN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TOKEN-PRED is not known to be a function ; in: DEFUN DICTIONARY-MAKE-BUILTIN-CONSTANT ; (FUNCALL ; (CHAOS::BSORT-TERM-CREATOR ; CHAOS::BSORT) ; CHAOS::TOKEN) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-engine-tmpQK8YY837.fasl ; compilation finished in 0:00:00.276 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-top.lisp" (written 10 DEC 2019 02:30:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-top.lisp ; in: DEFUN SIMPLE-PARSE-FROM-STRING ; (CHAOS::READ-TERM-FROM-STRING STRING) ; --> BLOCK WITH-INPUT-FROM-STRING SB-INT:DX-LET LET LET PROGN LET LET LOOP ; --> BLOCK TAGBODY PROGN SETQ THE APPEND ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN SIMPLE-PARSE ; (CHAOS::READ-TERM-FROM-STRING CHAOS::PRETERM) ; --> BLOCK WITH-INPUT-FROM-STRING SB-INT:DX-LET LET LET PROGN LET LET LOOP ; --> BLOCK TAGBODY PROGN SETQ THE APPEND ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PRE-CHOOSE-FINAL ; (ASSOC CHAOS::*ID-MODULE* (CHAOS::MODULE-ALL-SUBMODULES CHAOS::MODULE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN PARSER-DIAGNOSE ; (APPEND CHAOS::PREFIX (LIST (CAR CHAOS::SUFFIX))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (LENGTH (CDR CHAOS::E)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SETF (NTH (+ CHAOS::LENP CHAOS::I) CHAOS::FLAGS) T) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN PARSE-SHOW-DIFF ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (1+ CHAOS::NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN PARSER-PARSES ; (CHAOS::READ-TERM-FROM-STRING CHAOS::PRETERM) ; --> BLOCK WITH-INPUT-FROM-STRING SB-INT:DX-LET LET LET PROGN LET LET LOOP ; --> BLOCK TAGBODY PROGN SETQ THE APPEND ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN UPDATE-PARSE-INFORMATION ; (STRING (CAR CHAOS::VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/term-parser/parse-top-tmpJQI6KMRZ.fasl ; compilation finished in 0:00:00.184 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-utils.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-utils-tmpWUHK9UI0.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-system.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-system-tmpUUOI3UDB.fasl ; compilation finished in 0:00:00.268 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-state.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-state.lisp ; in: DEFUN NEXT-MATCH-STATE ; (CHAOS::THEORY-STATE-MATCH-NEXT-STATE ; CHAOS::THEORY-INFO ; CHAOS::TH-MATCH-STATE) ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CHAOS::THEORY-STATE-MATCH-INITIALIZE ; CHAOS::THEORY-INFO ; CHAOS::SYS-TO-SOLVE ; (CHAOS::MATCH-SYSTEM-ENV ; CHAOS::NEW-M-SYS)) ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-state-tmpG1IOPEUW.fasl ; compilation finished in 0:00:00.064 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-e.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-e-tmpM0NOM18K.fasl ; compilation finished in 0:00:00.024 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-idem.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-idem-tmpVIL8T0YR.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-z.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-z.lisp ; in: DEFUN MATCH-Z-NEXT-STATE ; (TRUNCATE CHAOS::Q 5) ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a (INTEGER -536870912 536870910), not a (UNSIGNED-BYTE ; 32). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-z-tmpBODYQO2B.fasl ; compilation finished in 0:00:00.048 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-a.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-a-tmpTLIPDLNH.fasl ; compilation finished in 0:00:00.140 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-c.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-c-tmpMOOD9PZK.fasl ; compilation finished in 0:00:00.024 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-az.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-az-tmpJSQEHKQD.fasl ; compilation finished in 0:00:00.132 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-cz.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-cz.lisp ; in: DEFUN MATCH-CZ-NEXT-STATE ; (TRUNCATE CHAOS::Q 6) ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a (INTEGER -536870912 536870910), not a (UNSIGNED-BYTE ; 32). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-cz-tmpX9RFG54G.fasl ; compilation finished in 0:00:00.040 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-ac.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-ac.lisp ; in: DEFUN AC-SOLUTION-FROM-STATE ; (CHAOS::MAKE-AND ; (SVREF CHAOS::RHS-C-SOL CHAOS::J) ; CHAOS::TERM-CODE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (CHAOS::MAKE-AND ; (SVREF CHAOS::RHS-F-SOL CHAOS::J) ; CHAOS::TERM-CODE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (CHAOS::MAKE-AND ; (SVREF CHAOS::RHS-C-SOL CHAOS::J) ; CHAOS::TERM-CODE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (CHAOS::MAKE-AND ; (SVREF CHAOS::RHS-F-SOL CHAOS::J) ; CHAOS::TERM-CODE) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; in: DEFUN AC-NEXT-STATE-SUB ; (CHAOS::AC-ROTATE-LEFT ; CHAOS::RHS-C-SOL ; CHAOS::M) ; --> SB-KERNEL:%SVSET ; ==> ; 1 ; ; 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). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; 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 &OPTIONAL). ; 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 &OPTIONAL). ; etc. ; (CHAOS::MAKE-AND ; (SVREF CHAOS::RHS-C-SOL CHAOS::M) ; (SVREF CHAOS::RHS-C-COMPAT CHAOS::M)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (CHAOS::MAKE-AND ; (SVREF CHAOS::RHS-C-SOL CHAOS::M) ; CHAOS::LHS-R-MASK) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (CHAOS::MAKE-OR ; CHAOS::TEMP ; (SVREF CHAOS::RHS-C-SOL CHAOS::S)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; in: DEFUN MATCH-AC-STATE-INITIALIZE ; (CHAOS::AC-NOTE-REPEATS ; CHAOS::RHS-F-MS ; CHAOS::RHS-F-R ; CHAOS::R-M ; CHAOS::R-GCD) ; --> DOLIST BLOCK LET TAGBODY UNLESS IF PROGN LET TAGBODY LET SETQ THE ; ==> ; (GCD CHAOS::R-GCD CHAOS::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; The second argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; (CHAOS::AC-NOTE-REPEATS ; CHAOS::RHS-C-MS ; CHAOS::RHS-C-R ; CHAOS::R-M ; CHAOS::R-GCD) ; --> DOLIST BLOCK LET TAGBODY UNLESS IF PROGN LET TAGBODY LET SETQ THE ; ==> ; (GCD CHAOS::R-GCD CHAOS::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; The second argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; (CHAOS::AC-NOTE-REPEATS ; CHAOS::LHS-V-MS ; CHAOS::LHS-V-R ; CHAOS::L-M ; CHAOS::L-GCD) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; The second argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; (CHAOS::AC-NOTE-REPEATS ; CHAOS::LHS-F-MS ; CHAOS::LHS-F-R ; CHAOS::L-M ; CHAOS::L-GCD) ; --> DOLIST BLOCK LET TAGBODY UNLESS IF PROGN LET TAGBODY LET SETQ THE ; ==> ; (GCD CHAOS::L-GCD CHAOS::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; The second argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; (CHAOS::MAKE-OR ; CHAOS::TEMP ; (SVREF CHAOS::RHS-C-SOL CHAOS::S)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; in: DEFUN MATCH-AC-NEXT-STATE ; (CHAOS::AC-ROTATE-LEFT ; CHAOS::RHS-F-SOL ; CHAOS::N) ; --> SB-KERNEL:%SVSET ; ==> ; 1 ; ; 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). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; 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 &OPTIONAL). ; 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 &OPTIONAL). ; etc. ; (CHAOS::MAKE-AND ; (SVREF CHAOS::RHS-F-SOL CHAOS::N) ; (SVREF CHAOS::RHS-F-COMPAT CHAOS::N)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (CHAOS::MAKE-AND ; (SVREF CHAOS::RHS-F-SOL CHAOS::N) ; CHAOS::LHS-R-MASK) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (CHAOS::MAKE-OR ; CHAOS::TEMP ; (SVREF CHAOS::RHS-F-SOL CHAOS::S)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-ac-tmpJZYZV5YE.fasl ; compilation finished in 0:00:00.396 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-acz.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-acz.lisp ; in: DEFUN MATCH-ACZ-STATE-INITIALIZE ; (CHAOS::MATCH-ACZ-NOTE-REPEATS CHAOS::RHS-F-MS CHAOS::RHS-F-R CHAOS::R-M ; CHAOS::R-GCD) ; --> DOLIST BLOCK LET TAGBODY UNLESS IF PROGN LET TAGBODY LET SETQ THE ; ==> ; (GCD CHAOS::R-GCD CHAOS::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; The second argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; (CHAOS::MATCH-ACZ-NOTE-REPEATS CHAOS::RHS-C-MS CHAOS::RHS-C-R CHAOS::R-M ; CHAOS::R-GCD) ; --> DOLIST BLOCK LET TAGBODY UNLESS IF PROGN LET TAGBODY LET SETQ THE ; ==> ; (GCD CHAOS::R-GCD CHAOS::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; The second argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; (CHAOS::MATCH-ACZ-NOTE-REPEATS CHAOS::LHS-V-MS CHAOS::LHS-V-R CHAOS::L-V-M ; CHAOS::L-GCD) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; The second argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; (CHAOS::MATCH-ACZ-NOTE-REPEATS CHAOS::LHS-F-MS CHAOS::LHS-F-R CHAOS::L-F-M ; CHAOS::L-GCD) ; --> DOLIST BLOCK LET TAGBODY UNLESS IF PROGN LET TAGBODY LET SETQ THE ; ==> ; (GCD CHAOS::L-GCD CHAOS::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; The second argument is a FIXNUM, not a (OR (INTEGER -536870912 -1) ; (INTEGER 1 536870911)). ; (CHAOS::EXPT2 ; (+ (THE FIXNUM CHAOS::LHS-V-COUNT) (THE FIXNUM CHAOS::LHS-F-COUNT))) ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (- ; (CHAOS::EXPT2 ; (+ (THE FIXNUM CHAOS::LHS-V-COUNT) (THE FIXNUM CHAOS::LHS-F-COUNT))) ; 2) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 2), not a FIXNUM. ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 2), not a FIXNUM. ; etc. ; in: DEFUN MATCH-ACZ-NEXT-STATE-SUB ; (CHAOS::MATCH-ACZ-ROTATE-LEFT CHAOS::RHS-C-SOL CHAOS::M) ; --> SB-KERNEL:%SVSET ; ==> ; 1 ; ; 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). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; 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 &OPTIONAL). ; 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 &OPTIONAL). ; etc. ; in: DEFUN MATCH-ACZ-NEXT-STATE-AUX ; (CHAOS::MATCH-ACZ-ROTATE-LEFT CHAOS::RHS-F-SOL CHAOS::N) ; --> SB-KERNEL:%SVSET ; ==> ; 1 ; ; 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). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (* 2 (SVREF CHAOS::RHS-F-SOL CHAOS::N)) ; ; 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 FIXNUM &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. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; convert x*2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; ; note: unable to ; associate */(* /) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (CHAOS::MATCH-ACZ-ROTATE-LEFT CHAOS::RHS-F-SOL CHAOS::N) ; --> SB-KERNEL:%SVSET ; ==> ; 1 ; ; 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 &OPTIONAL). ; 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 &OPTIONAL). ; etc. ; (* 2 (SVREF CHAOS::RHS-F-SOL CHAOS::N)) ; ; 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. ; unable to do inline fixnum arithmetic (cost 4) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-acz-tmp7AGT8VJK.fasl ; compilation finished in 0:00:00.444 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match.lisp ; in: DEFUN FIRST-MATCH ; (CHAOS::THEORY-STATE-MATCH-INITIALIZE ; CHAOS::THEORY-INFO ; CHAOS::SYS ; (CHAOS::MATCH-SYSTEM-ENV ; CHAOS::M-SYS)) ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN FIRST-MATCH-WITH-THEORY ; (CHAOS::THEORY-STATE-MATCH-INITIALIZE ; CHAOS::THEORY-INFO ; CHAOS::SYS ; (CHAOS::MATCH-SYSTEM-ENV ; CHAOS::M-SYS)) ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match-tmpVX9R9U8P.fasl ; compilation finished in 0:00:00.032 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match2.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match2.lisp ; in: DEFUN IS-LINEAR-GENERAL-PATTERN? ; (MEMBER ELT (CDR CHAOS::LST)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN IS-SIMPLE-AC-MATCH-OK? ; (LENGTH CHAOS::INDEP-VARS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/e-match/match2-tmpQCDFKETQ.fasl ; compilation finished in 0:00:00.168 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/sort.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/construct/sort.lisp ; in: DEFUN ADD-SORT-TO-MODULE ; (CHAOS::MARK-NEED-PARSING-PREPARATION ; MOD) ; --> LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN GLB-SORT ; (LENGTH CHAOS::MEET) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; `((,@(REMOVE-IF ; #'(LAMBDA (CHAOS::X) ; (CHAOS::SORT= ; CHAOS::X ; SORT)) ; CHAOS::MEET) ; :< ,SORT :< ,@(CHAOS::AND-SORT-COMPONENTS SORT))) ; --> SB-IMPL::|Append| ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN GLB-SORT-NAME ; (STRING CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING CHAOS::Y) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (SORT ; (MAPCAN ; #'(LAMBDA (CHAOS::S) ; (IF (CHAOS::AND-SORT-P CHAOS::S) ; (MAPCAR #'# #) ; (LIST #))) ; CHAOS::SORTS) ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (STRING< (THE SIMPLE-STRING (STRING CHAOS::X)) ; (THE SIMPLE-STRING (STRING CHAOS::Y))))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (MAPCAR #'STRING (DELETE-DUPLICATES CHAOS::COMPO-NAMES :TEST #'EQ)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN LUB-SORT ; (LENGTH CHAOS::JOIN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN MAKE-LUB-SORT ; `((,@CHAOS::COMPONENTS :< ,CHAOS::LUB ,@CHAOS::JOIN)) ; --> SB-IMPL::|Append| ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN GENERATE-ERR-SORTS ; (CHAOS::MAKE-ERR-SORT-NAME ; CHAOS::SAME-COMPO) ; --> FORMAT SORT FUNCTION STRING< ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SIMPLE-STRING. ; The second argument is a (OR STRING SYMBOL CHARACTER), not a SIMPLE-STRING. ; in: DEFUN DECLARE-SORT-IN-MODULE ; (CHAOS::SET-NEEDS-PARSE ; CHAOS::MODULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN DECLARE-SUBSORT-IN-MODULE ; (CHAOS::SET-NEEDS-PARSE ; MOD) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN CONSTRUCT-SORT-RELATIONS ; (APPEND CHAOS::RES (NTH CHAOS::Y CHAOS::TMP)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND CHAOS::LS (NTH CHAOS::Y CHAOS::TMP)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/sort-tmpO1PDDUR.fasl ; compilation finished in 0:00:00.228 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/operator.lisp" (written 04 MAR 2019 07:13:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/construct/operator.lisp ; in: DEFUN COMPUTE-MEMO ; (FIND-IF ; #'(LAMBDA (CHAOS::I) (UNLESS (ATOM CHAOS::I) (EQUAL "memo" (CAR CHAOS::I)))) ; CHAOS::ATTR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN CHECK-OVERLOADING-WITH-BUILTIN ; (FUNCALL CHAOS::TOKEN-PRED CHAOS::OPSTR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TOKEN-PRED is not known to be a function ; in: DEFUN ADD-OPERATOR-DECLARATION-TO-MODULE ; (CHAOS::MARK-NEED-PARSING-PREPARATION ; MOD) ; --> LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN MAKE-METHOD-TABLE-INTERNAL ; (APPEND (CDR CHAOS::S-MS) CHAOS::COMPARABLE-METHODS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN SETUP-ERROR-OPERATOR ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (AND (EQUAL CHAOS::METHOD-NAME (CHAOS::METHOD-NAME CHAOS::X)) ; (CHAOS::SORT-LIST= ; CHAOS::ARITY ; (CHAOS::METHOD-ARITY CHAOS::X)) ; (CHAOS::SORT= ; CHAOS::ERR-COARITY ; (CHAOS::METHOD-COARITY CHAOS::X)))) ; CHAOS::PRE-ERRS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN MAKE-STANDARD-TOKEN-SEQ ; (APPEND CHAOS::OP-NAME-TOKEN (NREVERSE CHAOS::RES)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN COMPUTE-ERROR-METHOD-FORM ; (INCF CHAOS::ARG-NUM) ; --> THE ; ==> ; (+ 1 CHAOS::ARG-NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN FIX-STRATEGY-AND-RULES ; (APPEND CHAOS::RWST ; (CHAOS::METHOD-RULES-WITH-DIFFERENT-TOP ; CHAOS::MTH)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/operator-tmpIX4U16ZB.fasl ; compilation finished in 0:00:00.596 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/variable.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/construct/variable.lisp ; in: DEFUN CHECK-VAR-NAME-OVERLOADING-WITH-BUILTIN ; (FUNCALL CHAOS::TOKEN-PRED CHAOS::VAR-NAME) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; TOKEN-PRED is not known to be a function ; in: DEFUN DECLARE-VARIABLE-IN-MODULE ; (CHAR CHAOS::VAR-NAME 0) ; ; 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::VAR-NAME ; (CHAOS::MODULE-VARIABLES ; MOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (AND (NOT (VECTOR CHARACTER)) ; (NOT BASE-STRING)), not a (OR FIXNUM ; (NOT NUMBER)). ; (STRING CHAOS::VAR-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SYMBOL CHARACTER), not a SYMBOL. ; in: DEFUN DECLARE-PCONST-IN-MODULE ; (ASSOC CHAOS::VAR-NAME ; (CHAOS::MODULE-VARIABLES ; MOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (AND (NOT (VECTOR CHARACTER)) ; (NOT BASE-STRING)), not a (OR FIXNUM ; (NOT NUMBER)). ; (STRING CHAOS::VAR-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SYMBOL CHARACTER), not a SYMBOL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/variable-tmp93OFNPHA.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/match-method.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/match-method-tmpOH5AKS8D.fasl ; compilation finished in 0:00:00.016 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/axiom.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/construct/axiom.lisp ; in: DEFUN CONVERT-LISP-FORM-TERM ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::V)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN CONVERT-CHAOS-EXPR ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::V)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN INVOKE-GENERAL-LISP-FUN ; (APPLY CHAOS::FUN CHAOS::BINDINGS) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; FUN is not known to be a function ; in: DEFUN COMPUTE-A-EXTENSIONS ; (APPEND ; (CHAOS::LIST-ASSOC-SUBTERMS (CHAOS::AXIOM-LHS CHAOS::RULE) ; (CHAOS::TERM-HEAD ; (CHAOS::AXIOM-LHS CHAOS::RULE))) ; (LIST CHAOS::NEW-VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN COMPUTE-RULE-METHOD ; (FORMAT T "~% (~x) " (CHAOS::ADDR-OF CHAOS::RULE)) ; ; note: doing unsigned word to integer coercion (cost 20) ; in: DEFUN ADJOIN-RULE ; (FORMAT T "(1:~x)" (CHAOS::ADDR-OF CHAOS::RULE)) ; ; note: doing unsigned word to integer coercion (cost 20) ; (FORMAT T "(2:~x)" (CHAOS::ADDR-OF CHAOS::R)) ; ; note: doing unsigned word to integer coercion (cost 20) ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/axiom-tmpTNV77KDS.fasl ; compilation finished in 0:00:00.240 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/gen-rule.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/construct/gen-rule.lisp ; in: DEFUN ADD-ASSOCIATIVE-EXTENSIONS ; (APPEND (CHAOS::AXIOM-LABELS CHAOS::R) '(:ACEX)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND ; (CHAOS::LIST-ASSOC-SUBTERMS (CHAOS::AXIOM-LHS CHAOS::R) ; (CHAOS::TERM-HEAD ; (CHAOS::AXIOM-LHS CHAOS::R))) ; (LIST CHAOS::NEW-VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN COMPUTE-VAR-INFO ; (APPEND ; (MAPCAR #'CONS ; (CHAOS::TERM-SUBTERMS ; CHAOS::TERM) ; (CHAOS::METHOD-ARITY CHAOS::METH)) ; (CDR CHAOS::TERM-S)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN CREATE-RULE-NAME ; (INCF (CHAOS::MODULE-CONTEXT-$$RULE-COUNTER (CHAOS::MODULE-CONTEXT MOD))) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHAOS::MODULE-DYN-CONTEXT #:OBJ) 10)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/gen-rule-tmp9AOKGDLT.fasl ; compilation finished in 0:00:00.284 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/rwl.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/rwl-tmpXS9JOGMS.fasl ; compilation finished in 0:00:00.060 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/beh.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/construct/beh.lisp ; in: DEFUN TRY-BEH-PROOF-IN ; (CHAOS::SET-NEEDS-RULE ; CHAOS::PROOF-MOD) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CHAOS::SET-NEEDS-RULE ; CHAOS::MODULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/beh-tmpERBDX74X.fasl ; compilation finished in 0:00:00.208 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/module.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/construct/module.lisp ; in: DEFUN PREPARE-FOR-PARSING ; (FUNCALL CHAOS::HOOK-FUN CHAOS::MODULE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (ASSOC CHAOS::SUB CHAOS::ALS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (CHAOS::MARK-MODULE-READY-FOR-PARSING ; CHAOS::MODULE) ; --> LET SB-KERNEL:THE* MAX ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CHAOS::NEED-PARSING-PREPARATION ; CHAOS::MODULE) ; --> IF ; ==> ; (< (CHAOS::MODULE-STATUS CHAOS::MODULE) CHAOS::MODULE-READY-PARSING) ; ; 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. ; in: DEFUN COMPILE-MODULE ; (CHAOS::NEED-REWRITING-PREPARATION ; CHAOS::MODULE) ; --> IF ; ==> ; (< (CHAOS::MODULE-STATUS CHAOS::MODULE) CHAOS::MODULE-READY-REWRITING) ; ; 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/module-tmpTQIEF2IQ.fasl ; compilation finished in 0:00:00.080 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/construct/trs.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/construct/trs.lisp ; in: DEFUN GET-MODULE-TRS ; (CHAOS::NEED-REWRITING-PREPARATION ; CHAOS::MODULE) ; ; 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. ; in: DEFUN MAKE-TRS-MODULE-NAME-INTERNAL ; (INCF CHAOS::_TRS_MODULE_NAMES_) ; --> THE ; ==> ; (+ 1 CHAOS::_TRS_MODULE_NAMES_) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN TRS-GET-REAL-METHOD-IF-DUMMY ; (RASSOC CHAOS::METHOD (CHAOS::TRS$DUMMY-METHODS CHAOS::TRS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN MAKE-TRS-OP-NAME ; (STRING ; (OR ; (CDR ; (CHAOS::ASSQ ; CHAOS::ERR-SORT ; CHAOS::SORT-NAME-MAP)) ; (CHAOS::SORT-ID CHAOS::ERR-SORT))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (LENGTH CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (CHAR CHAOS::NAME CHAOS::POS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; in: DEFUN FIX-TRS-IDS ; (FIND-IF ; #'(LAMBDA (CHAOS::X) (AND (CONSP CHAOS::X) (OR (EQ # :ID) (EQ # :IDR)))) ; CHAOS::INFO) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN TRS-REV-OP-NAME ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR SYMBOL CHARACTER), not a SYMBOL. ; in: DEFUN RE-PRINT-TRS-TERM ; (STRING (CHAOS::TRS-TERM-HEAD CHAOS::TRS-TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN GET-TRS-AXIOM ; (STRING (CAR CHAOS::LABEL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/construct/trs-tmpPAAFO6LP.fasl ; compilation finished in 0:00:00.276 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/mutils.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/mutils-tmp4PCSVQUR.fasl ; compilation finished in 0:00:00.012 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/modmorph.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/decafe/modmorph.lisp ; in: DEFUN APPLY-MODMORPH-INTERNAL ; (APPEND ; (MAPCAR ; #'(LAMBDA (CHAOS::R) ; (WHEN CHAOS::*ON-MODEXP-DEBUG* ; (CHAOS::WITH-IN-MODULE ; # ; # ; #)) ; (CHAOS::MODMORPH-RECREATE-AXIOM CHAOS::NEWMOD CHAOS::SORTMAP ; CHAOS::OPMAP CHAOS::MODMAP CHAOS::R)) ; (CHAOS::MODULE-EQUATIONS ; MOD)) ; (CHAOS::MODULE-EQUATIONS ; CHAOS::NEWMOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND ; (MAPCAR ; #'(LAMBDA (CHAOS::R) ; (CHAOS::MODMORPH-RECREATE-AXIOM CHAOS::NEWMOD CHAOS::SORTMAP ; CHAOS::OPMAP CHAOS::MODMAP CHAOS::R)) ; (CHAOS::MODULE-RULES ; MOD)) ; (CHAOS::MODULE-RULES ; CHAOS::NEWMOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN MODMORPH-PREPARE-FOR-PARSING ; (CHAOS::MARK-MODULE-READY-FOR-PARSING ; MOD) ; --> LET SB-KERNEL:THE* MAX ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN MODMORPH-FIND-ERROR-METHOD ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (AND (CHAOS::METHOD-P (CAR CHAOS::X)) ; (EQUAL ; (CHAOS::METHOD-SYMBOL ; #) ; CHAOS::NAME) ; (= (THE FIXNUM #) CHAOS::ALEN))) ; CHAOS::OPMAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN MODMORPH-MAP-SUBMODULE ; (APPEND (CHAOS::MODMORPH-COMPUTE-SUBMODULE-MAPPINGS MAP MOD CHAOS::SMOD) ; (CHAOS::MODMORPH-MODULE MAP)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN MAKE-ANON-VIEW-NAME ; (INCF CHAOS::*X-ANON-VIEW-NAME*) ; --> THE ; ==> ; (+ 1 CHAOS::*X-ANON-VIEW-NAME*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN MODMORPH-APPLY-OP-MAP-2 ; (ASSOC ; (CHAOS::TERM-HEAD ; CHAOS::TERM) ; CHAOS::OP_MAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (ASSOC CHAOS::OM (CHAOS::MODMORPH-MODULE MAP)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN MODMORPH-COMPUTE-SUBMODULE-MAPPINGS ; (APPEND (CHAOS::MODMORPH-COMPUTE-SUBMODULE-MAPPINGS MAP MOD CHAOS::SM) ; CHAOS::RES) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN MODMORPH-RECREATE-TERM ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (AND ; (EQUAL CHAOS::VAR-NAME ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; (CHAOS::SORT= ; CHAOS::IMG-SORT ; (CHAOS::VARIABLE-SORT ; CHAOS::X)))) ; CHAOS::*MODMORPH-LOCAL-VARS*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (ASSOC CHAOS::HEAD CHAOS::OPMAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (ASSOC ; (CHAOS::METHOD-MODULE ; CHAOS::HEAD) ; CHAOS::MODMAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN MODMORPH-MERGE ; (APPEND ; (IF (ATOM (CAR CHAOS::NM1)) ; (LIST CHAOS::NM1) ; CHAOS::NM1) ; (IF (ATOM (CAR CHAOS::NM2)) ; (LIST CHAOS::NM2) ; CHAOS::NM2)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN APPLY-OP-MAP ; (ASSOC ; (CHAOS::TERM-HEAD ; CHAOS::TERM) ; CHAOS::OP-MAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN MAPPING-IMAGE-2 ; (ASSOC CHAOS::OM (CHAOS::MODMORPH-MODULE MAP)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/modmorph-tmpCUMSDKM4.fasl ; compilation finished in 0:00:00.244 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/mrmap.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/decafe/mrmap.lisp ; in: DEFUN IMAGE-RENAME-SORT ; (FIND-IF ; #'(LAMBDA (CHAOS::Y) (CHAOS::RMAP-SORT-MATCH CHAOS::X (CAR CHAOS::Y))) ; CHAOS::REN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN IMAGE-RENAME-OP ; (FIND-IF #'(LAMBDA (CHAOS::Y) (EQUAL CHAOS::X (CAR CHAOS::Y))) CHAOS::REN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN IMAGE-RENAME-PARAM ; (FIND-IF #'(LAMBDA (CHAOS::Y) (EQUAL CHAOS::X (CAR CHAOS::Y))) CHAOS::REN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN INVERSE-IMAGE-RENAME-SORT ; (FIND-IF ; #'(LAMBDA (CHAOS::Y) (CHAOS::RMAP-SORT-MATCH CHAOS::X (CAR CHAOS::Y))) ; CHAOS::REN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN *IMAGE-RENAME-SORT ; (FIND-IF ; #'(LAMBDA (CHAOS::Y) ; (CHAOS::SORT= ; CHAOS::X ; (CAR CHAOS::Y))) ; MAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN *IMAGE-RENAME-METHOD ; (FIND-IF #'(LAMBDA (CHAOS::Y) (EQ CHAOS::X (CAR CHAOS::Y))) MAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN IS-RENAME-INJECTIVE ; (FIND-IF ; #'(LAMBDA (CHAOS::Y) ; (AND (NOT (EQ CHAOS::X CHAOS::Y)) (EQUAL (CAR CHAOS::X) (CAR CHAOS::Y)) ; (NOT (EQUAL # #)))) ; CHAOS::REN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (FIND-IF ; #'(LAMBDA (CHAOS::Y) ; (AND (NOT (EQ CHAOS::X CHAOS::Y)) (NOT (EQUAL # #)) ; (EQUAL (CADR CHAOS::X) (CADR CHAOS::Y)))) ; CHAOS::REN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/mrmap-tmpVBY1FQ3S.fasl ; compilation finished in 0:00:00.140 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/meval.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/meval-tmpS8NUOPMQ.fasl ; compilation finished in 0:00:00.072 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/view.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/decafe/view.lisp ; in: DEFUN VIEW-MAP-IMAGE-SORT ; (FIND-IF ; #'(LAMBDA (CHAOS::V) ; (CHAOS::SORT= ; CHAOS::X ; (CAR CHAOS::V))) ; CHAOS::SORT-MAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN *FIND-SORT-IN-MAP ; (FIND-IF ; #'(LAMBDA (CHAOS::Y) ; (CHAOS::SORT= ; CHAOS::X ; (CAR CHAOS::Y))) ; MAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN *FIND-METHOD-IN-MAP ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (IF (CHAOS::OPERATOR-METHOD-P ; (CAR CHAOS::X)) ; (EQ CHAOS::METHOD (CAR CHAOS::X)) ; (EQ CHAOS::METHOD ; (CHAOS::TERM-HEAD ; #)))) ; CHAOS::OP-MAPPING) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN SPLIT-STR ; (LENGTH CHAOS::STR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ CHAOS::STR CHAOS::INDEX) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; (CHAR CHAOS::STR CHAOS::I) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; in: DEFUN RESOLVE-OP-PATTERN-AS-REFERENCE ; (APPEND CHAOS::PAT '(".")) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN FIND-METHOD-MAPPED ; (LENGTH CHAOS::ARITY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN FIND-SORT-IMAGE* ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (CHAOS::SORT= ; SORT ; (CAR CHAOS::X))) ; CHAOS::SORT-MAP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/view-tmpPYED056U.fasl ; compilation finished in 0:00:00.280 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/mimport.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/decafe/mimport.lisp ; in: DEFUN INCORPORATE-MODULE-SHARING ; (APPEND ; (CHAOS::MODULE-METHODS-WITH-RWL-AXIOM ; CHAOS::MODULE) ; (CHAOS::MODULE-METHODS-WITH-RWL-AXIOM ; CHAOS::SUBMODULE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND ; (CHAOS::MODULE-RULES-WITH-RWL-AXIOM ; CHAOS::MODULE) ; (CHAOS::MODULE-RULES-WITH-RWL-AXIOM ; CHAOS::SUBMODULE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN INCORPORATE-MODULE-COPYING ; (CHAOS::USING-RECREATE-TERM (CHAOS::TERM) ; (COND ; ((CHAOS::TERM-IS-BUILTIN-CONSTANT? ; CHAOS::TERM) ; (CHAOS::MAKE-BCONST-TERM (CHAOS::USING-FIND-SORT-ERR #) ; (CHAOS::TERM-BUILTIN-VALUE ; CHAOS::TERM))) ; ((CHAOS::TERM-IS-VARIABLE? ; CHAOS::TERM) ; (LET (# #) ; (LET # ; #))) ; ((CHAOS::TERM-IS-LISP-FORM? ; CHAOS::TERM) ; CHAOS::TERM) ; (T ; (LET (#) ; (LET # ; # ; #))))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; (CHAOS::USING-FIND-SORT-ERR (CHAOS::S) ; (LET ((SORT (CDR #))) ; (COND (SORT SORT) ; ((CHAOS::ERR-SORT-P CHAOS::S) (SETQ #) ; (IF SORT ; # ; #)) ; (T CHAOS::S)))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; (CHAOS::USING-IMPORT-SUBS (CHAOS::SMOD) ; (DOLIST (CHAOS::S (REVERSE (CHAOS::MODULE-DIRECT-SUBMODULES CHAOS::SMOD))) ; (CHAOS::USING-IMPORT-SUB (CAR CHAOS::S) (CDR CHAOS::S)))) ; ; note: Return value count mismatch prevents known return from these functions: ; USING-IMPORT-SUBS ; in: DEFUN MODEXP-ADD-METHOD-TO-TABLE ; (PUSHNEW CHAOS::METHOD ; (CHAOS::OPINFO-METHODS ; CHAOS::OPINFO)) ; --> ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/decafe/mimport-tmpUOCPY155.fasl ; compilation finished in 0:00:00.204 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/cafein/rengine.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/cafein/rengine.lisp ; in: DEFUN LONGEST-TERM-ID ; (LENGTH CHAOS::KEY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN !APPLY-ONE-RULE ; (FUNCALL CHAOS::NEXT-MATCH-METHOD CHAOS::GLOBAL-STATE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; NEXT-MATCH-METHOD is not known to be a function ; (FUNCALL ; (OR ; (THE SYMBOL ; (CHAOS::RULE-FIRST-MATCH-METHOD ; CHAOS::RULE)) ; (PROGN ; (WHEN CHAOS::*CHAOS-VERBOSE* ; (CHAOS::WITH-OUTPUT-CHAOS-WARNING ; NIL ; # ; # ; #)) ; (CHAOS::COMPUTE-RULE-METHOD CHAOS::RULE) ; (SYMBOL-FUNCTION (THE SYMBOL #)))) ; (CHAOS::RULE-LHS ; CHAOS::RULE) ; CHAOS::TERM) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN APPLY-RULE ; (OR (CHAOS::APPLY-A-EXTENSIONS CHAOS::RULE CHAOS::TERM CHAOS::TOP) ; CHAOS::IS-APPLIED) ; --> IF ; ==> ; CHAOS::IS-APPLIED ; ; note: deleting unreachable code ; (OR (CHAOS::APPLY-AC-EXTENSION CHAOS::RULE CHAOS::TERM CHAOS::TOP) ; CHAOS::IS-APPLIED) ; --> IF ; ==> ; CHAOS::IS-APPLIED ; ; note: deleting unreachable code ; in: DEFUN CAFEIN-STEPPER ; (FIND-IF #'(LAMBDA (ELT) (MEMBER CHAOS::KEY (CAR ELT) :TEST #'EQUAL)) ; CHAOS::CAFEIN-STEPPER-PROCS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (FUNCALL (CDR CHAOS::PROC) CHAOS::INP) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (LET ((CHAOS::INP (CHAOS::GET-STEP-COMMAND))) ; (UNLESS (LISTP CHAOS::INP) (RETURN-FROM CHAOS::NEXT-LOOP)) ; (WHEN ; (MEMBER (CAR CHAOS::INP) '("eof" "q" ":q" "quit" ":quit" CHAOS::EOF) ; :TEST #'EQUAL) ; (CHAOS::STEP-OFF) ; (RETURN-FROM CHAOS::CAFEIN-STEPPER NIL)) ; (LET* ((CHAOS::KEY #) (CHAOS::PROC #)) ; (IF CHAOS::PROC ; (FUNCALL # CHAOS::INP) ; (PROGN #))))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; (CHAOS::WITH-CHAOS-TOP-ERROR ; NIL ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (LET ((CHAOS::INP #)) ; (UNLESS (LISTP CHAOS::INP) (RETURN-FROM CHAOS::NEXT-LOOP)) ; (WHEN (MEMBER # '# :TEST #'EQUAL) ; (CHAOS::STEP-OFF) ; (RETURN-FROM CHAOS::CAFEIN-STEPPER NIL)) ; (LET* (# #) ; (IF CHAOS::PROC ; # ; #))))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN GET-STEP-COMMAND ; (CHAOS::WITH-CHAOS-TOP-ERROR ; NIL ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (WHEN CHAOS::TOP-LEVEL? ; (FORMAT T "~%STEP[~D]? " CHAOS::*RULE-COUNT*) ; (FORCE-OUTPUT)) ; (CHAOS::READER 'CHAOS::STEP-COMMANDS CHAOS::*STEP-COMMANDS*))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (WHEN CHAOS::TOP-LEVEL? ; (FORMAT T "~%STEP[~D]? " CHAOS::*RULE-COUNT*) ; (FORCE-OUTPUT)) ; (CHAOS::READER 'CHAOS::STEP-COMMANDS CHAOS::*STEP-COMMANDS*)) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN APPLY-SORT-MEMB-INTERNAL ; (1+ CHAOS::.SORT-MEMB-NESTING.) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (> CHAOS::.SORT-MEMB-NESTING. CHAOS::.SORT-MEMB-NESTING-LIMIT.) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (1+ CHAOS::.SORT-MEMB-NESTING.) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (> CHAOS::.SORT-MEMB-NESTING. CHAOS::.SORT-MEMB-NESTING-LIMIT.) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a T, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a T, not a DOUBLE-FLOAT. ; The second argument is a T, not a DOUBLE-FLOAT. ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/cafein/rengine-tmpP4BCARWB.fasl ; compilation finished in 0:00:00.424 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/cafein/cbred.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/cafein/cbred.lisp ; in: DEFUN CBRED-MAKE-NEW-VARIABLE ; (INCF CHAOS::VARNUM) ; --> THE ; ==> ; (+ 1 CHAOS::VARNUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN EXPAND-GOAL-BY-COB ; (APPEND (CHAOS::TERM-VARIABLES CHAOS::LHS) (CHAOS::TERM-VARIABLES CHAOS::RHS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN APPLY-CO-RULES ; (PUSHNEW ; (CAR ; (CHAOS::RULE-LABELS ; CHAOS::RULE)) ; CHAOS::APPLIED) ; --> SETQ THE ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN NEXT-CRULE-LABEL ; (INCF CHAOS::.CRULE-LABEL-NUM.) ; --> THE ; ==> ; (+ 1 CHAOS::.CRULE-LABEL-NUM.) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN FIND-OCC ; (FUNCALL CHAOS::PREDICATE CHAOS::TERM) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PREDICATE is not known to be a function ; (1+ CHAOS::NUM-IF) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/cafein/cbred-tmpOUEHOD9C.fasl ; compilation finished in 0:00:00.152 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/cafein/reducer.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/cafein/reducer.lisp ; in: DEFUN GENERATE-STATISTICS-FORM ; (ZEROP (CHAOS::NUMBER-MEMO-HITS)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; in: DEFUN GENERATE-STATISTICS-FORM-REWRITING-ONLY ; (ZEROP (CHAOS::NUMBER-MEMO-HITS)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/cafein/reducer-tmp5ZHGID8G.fasl ; compilation finished in 0:00:00.104 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/regcheck.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/regcheck.lisp ; in: DEFUN REGULARIZE-MAKE-GLB ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (WHEN CHAOS::*REGULARIZE-OPTIMIZE* ; (CHAOS::REG-SORT-INCLUDED CHAOS::X CHAOS::GLB CHAOS::SO) ; (EQUAL (CHAOS::SORT-ID CHAOS::GLB) (CHAOS::SORT-ID CHAOS::X)))) ; CHAOS::*REGULARIZE-GLB-SORTS-SO-FAR*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/regcheck-tmp9D2N5DM.fasl ; compilation finished in 0:00:00.156 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/regularize.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/regularize.lisp ; in: DEFUN REGULARIZE-SIGNATURE-INTERNAL ; (PUSHNEW CHAOS::METH ; (CHAOS::MODULE-METHODS-FOR-REGULARITY ; CHAOS::MODULE)) ; --> ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN REGULARIZE-SIGNATURE ; (CHAOS::MARK-NEED-PARSING-PREPARATION ; CHAOS::MODULE) ; --> LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/regularize-tmpKDSLP2NX.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/describe.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/describe.lisp ; in: DEFUN DESCRIBE-OPERATOR ; (STRING (CDR CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN SHOW-MODULE-IN-CAFEOBJ-SYNTAX ; (STRING ; (CHAOS::PARAMETER-IMPORTED-MODE ; CHAOS::SB)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (EQUAL "protecting" CHAOS::MODE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; (DELETE-IF ; #'(LAMBDA (CHAOS::X) (CHAOS::IGNORE-FROM-IMPORT-LIST (CAR CHAOS::X))) ; CHAOS::SUBS) ; ; note: unable to ; open code ; due to type uncertainty: ; The second argument is a SEQUENCE, not a LIST. ; (STRING (CDR CHAOS::SB)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (ASSOC (CAR CHAOS::SB) (CHAOS::MODULE-ALIAS MOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (STRING (CDR CHAOS::SB)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; (CDR CHAOS::V))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (APPEND ; (REVERSE ; (CHAOS::MODULE-EQUATIONS ; MOD)) ; (REVERSE ; (CHAOS::MODULE-RULES ; MOD))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PRINT-OUT-SORT ; (FUNCALL CHAOS::PRINTER CHAOS::S MOD) ; ; 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 ; (FUNCALL CHAOS::PRINTER CHAOS::SUPER MOD) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; (FUNCALL CHAOS::PRINTER CHAOS::SUB MOD) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRINTER is not known to be a function ; in: DEFUN GET-NON-PARAMETER-SUBMODULES ; (MEMBER (CAR CHAOS::SB) CHAOS::SKIP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN PRINT-SUBMODULE-LIST ; (STRING (CDR CHAOS::SB)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PRINT-MODULE-SUBMODULES ; (STRING (CDR CHAOS::SB)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PRINT-MODULE-PARAMETERS ; (STRING ; (CHAOS::PARAMETER-IMPORTED-MODE ; CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PRINT-MODULE-VARIABLES ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::V)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/describe-tmp4QLHV6NG.fasl ; compilation finished in 0:00:00.200 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/sort-tree.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/sort-tree.lisp ; in: DEFUN !PRINT-SORT-TREE ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-NAME is not known to be a function ; in: DEFUN !PRINT-MODULE-SORT-TREE ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-NAME is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/sort-tree-tmpMFQG7214.fasl ; compilation finished in 0:00:00.028 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/module-tree.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/module-tree.lisp ; in: DEFUN !PRINT-MODULE-TREE ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-NAME is not known to be a function ; in: DEFUN PRINT-MODEXP-TREE ; (FUNCALL CHAOS::LEAF-NAME CHAOS::TREE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-NAME is not known to be a function ; in: DEFUN D-MODULE-TREE* ; (FORMAT STREAM "~a: " CHAOS::NUM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (INCF CHAOS::Y-NUM) ; --> THE ; ==> ; (+ 1 CHAOS::Y-NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/module-tree-tmpEL1UBVEC.fasl ; compilation finished in 0:00:00.056 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/show.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/show.lisp ; in: DEFUN SHOW-SELECTION-STACK ; (1- CHAOS::DEPTH) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (DOTIMES (CHAOS::I (1- CHAOS::DEPTH)) (PRINC " ")) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; 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. ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (INCF CHAOS::DEPTH) ; --> THE ; ==> ; (+ 1 CHAOS::DEPTH) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN PRINT-PENDING ; (- CHAOS::DEPTH 1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (DOTIMES (CHAOS::I (- CHAOS::DEPTH 1)) (PRINC " ")) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; 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. ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (DOTIMES (CHAOS::I CHAOS::DEPTH) (PRINC " ")) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; 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 (INTEGER 1), not a FIXNUM. ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; 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 (INTEGER 1), not a FIXNUM. ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (INCF CHAOS::DEPTH) ; --> THE ; ==> ; (+ 1 CHAOS::DEPTH) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN PRINT-RULES ; (INCF CHAOS::I) ; --> THE ; ==> ; (+ 1 CHAOS::I) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN SHOW-PARAM ; (1+ CHAOS::NO) ; ; 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 ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/show-tmpO7N5WXBL.fasl ; compilation finished in 0:00:00.104 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/set.lisp" (written 18 OCT 2019 12:45:43 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/set.lisp ; in: DEFUN SET-CHAOS-SWITCH ; (LENGTH CHAOS::OPT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (FUNCALL CHAOS::ON-PROC) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; ON-PROC is not known to be a function ; (FUNCALL CHAOS::OFF-PROC) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; OFF-PROC is not known to be a function ; (FUNCALL ; (CHAOS::CHAOS-SWITCH-SET-PROC ; CHAOS::SW) ; CHAOS::DAT) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN SHOW-MODES ; (LENGTH CHAOS::OPT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN CHAOS-SET-CEXEC-LIMIT ; (LENGTH (CAR CHAOS::VALUE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN CHAOS-SET-PRINT-DEPTH ; (LENGTH (CAR CHAOS::VALUE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/set-tmp7GPJW3WR.fasl ; compilation finished in 0:00:00.100 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/op-check.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/op-check.lisp ; in: DEFUN CHECK-METHOD-COHERENCY ; (APPEND CHAOS::METHODS CHAOS::ATTRS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (INCF CHAOS::CON-COUNT) ; --> THE ; ==> ; (+ 1 CHAOS::CON-COUNT) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN CHECK-DEF-RHS ; (< 1 CHAOS::.OP-FOUND.) ; ; 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. ; in: DEFUN CHECK-DEF-RHS* ; (INCF CHAOS::.OP-FOUND.) ; --> THE ; ==> ; (+ 1 CHAOS::.OP-FOUND.) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (LENGTH CHAOS::OCCURRENCE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (>= CHAOS::CONTEXT-DEPTH (LENGTH CHAOS::OCCURRENCE)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (1+ CHAOS::X) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (INCF CHAOS::.OP-FOUND.) ; --> THE ; ==> ; (+ 1 CHAOS::.OP-FOUND.) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (1+ CHAOS::X) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN CHECK-METHOD-CONGRUENCY ; (- (LENGTH CHAOS::OCC-R) CHAOS::NUM-IF-R) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (<= (- (LENGTH CHAOS::OCC-R) CHAOS::NUM-IF-R) (LENGTH CHAOS::OCC-L)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (- (LENGTH CHAOS::OCC-R) CHAOS::NUM-IF-R) ; ; 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 REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The second argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES REAL &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; in: DEFUN SUBSTITUTION-IMAGE2 ; (FUNCALL ; (CHAOS::LISP-FORM-FUNCTION ; CHAOS::TERM) ; CHAOS::SIGMA) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/op-check-tmpESZVJLGB.fasl ; compilation finished in 0:00:00.240 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/compat.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/compat.lisp ; in: DEFUN FIND-COMPAT-METHOD ; (LENGTH CHAOS::ARITY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (EVERY ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (CHAOS::SORT<= ; CHAOS::X ; CHAOS::Y)) ; CHAOS::ARITY (CHAOS::METHOD-ARITY CHAOS::METH)) ; ; note: unable to open code because: can't determine sequence argument type ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/compat-tmp861VENRV.fasl ; compilation finished in 0:00:00.036 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/help.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/help-tmp7MX18LSW.fasl ; compilation finished in 0:00:00.040 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/inspect.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/inspect.lisp ; in: DEFUN DESCRIBE-NAME ; (CHAR CHAOS::PRINT-NAME 0) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; (FORMAT STREAM "~%** [~a] -----------------------------------------" ; (STRING-UPCASE CHAOS::.CURRENT-CHAR-INDEX.)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~%~A~10T" ; (IF (SYMBOLP CHAOS::NAME) ; (STRING CHAOS::NAME) ; CHAOS::NAME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~%No object with name ~A found." CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN INSPECT-SHOW-PARAMETERS ; (FORMAT STREAM "- parameter theory ~A(type ~S)" CHAOS::NAME ; (TYPE-OF CHAOS::NAME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM ", declared in ~A" CHAOS::CONTEXT-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN INSPECT-SHOW-SUBMODULES ; (ASSOC CHAOS::OBJ (CHAOS::MODULE-SUBMODULES MOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (FORMAT STREAM "- direct sub-module") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM ", alias of module ") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "- parameter theory") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "- indirect sub-module") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM ", alias of module ") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM ", declared in ~A" CHAOS::CONTEXT-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (ASSOC CHAOS::NAME (CHAOS::MODULE-ALIAS MOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (FORMAT STREAM ", renamed (original name = ~a)." ; (WITH-OUTPUT-TO-STRING (CHAOS::STR) ; (CHAOS::PRINT-MOD-NAME CHAOS::OBJ CHAOS::STR T))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN INSPECT-SHOW-SORTS ; (FORMAT STREAM "- hidden sort declared in ~a" CHAOS::CONTEXT-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "- sort declared in ~a" CHAOS::CONTEXT-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (FORMAT STREAM " the name must be qualified for disambiguation: ~A.~A" ; (STRING CHAOS::NAME) CHAOS::QNAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (RASSOC (CHAOS::OBJECT-CONTEXT-MOD CHAOS::OBJ) (CHAOS::MODULE-ALIAS MOD)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (STRING CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (FORMAT STREAM " the name must be qualified for disambiguation: ~A.~A" ; (STRING CHAOS::NAME) (CAR CHAOS::A-NAME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM " the name must be qualified for disambiguation,") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM " but the module name is not simple one:") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN INSPECT-SHOW-OPERATORS ; (FORMAT STREAM "- operator:") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN INSPECT-SHOW-AXIOMS ; (FORMAT STREAM "- axiom declared in ~a" CHAOS::CONTEXT-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN INSPECT-SHOW-VARIABLES ; (FORMAT STREAM "- variable of sort ~a" ; (WITH-OUTPUT-TO-STRING (CHAOS::STR) ; (CHAOS::PRINT-SORT-NAME ; (CHAOS::VARIABLE-SORT ; CHAOS::OBJ) ; MOD CHAOS::STR))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN INSPECT-SHOW-UNKNOWNS ; (FORMAT STREAM "- unknown object ~s" CHAOS::OBJ) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/inspect-tmp4CP5SEFX.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tools/sensible.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tools/sensible.lisp ; in: DEFUN CHECK-OP-SENSIBLENESS ; (PUSHNEW CHAOS::METHOD CHAOS::VIO-PAIR) ; --> SETQ THE ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (PUSHNEW CHAOS::M2 CHAOS::VIO-PAIR) ; --> SETQ THE ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tools/sensible-tmpZ7L7FP0S.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-mod.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-mod.lisp ; in: DEFUN EVAL-MOD ; (LENGTH (CAR CHAOS::TOKS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ (CAR CHAOS::TOKS) 0 3) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; (SUBSEQ (CAR CHAOS::TOKS) 3) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; in: DEFUN EVAL-MOD-EXT ; (1- CHAOS::NO) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ; 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 UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-mod-tmpGCPRU2E.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-ast.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-ast.lisp ; in: DEFUN DECLARE-SORT ; (CHAOS::SET-NEEDS-PARSE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN DECLARE-BSORT ; (CHAOS::SET-NEEDS-PARSE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN DECLARE-OPERATOR ; (CHAOS::MARK-NEED-PARSING-PREPARATION ; CHAOS::*CURRENT-MODULE*) ; --> LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CHAOS::SET-NEEDS-PARSE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CHAOS::SET-NEEDS-RULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN DECLARE-OPERATOR-ATTRIBUTES ; (CHAOS::SET-NEEDS-PARSE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CHAOS::SET-NEEDS-RULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN DECLARE-VARIABLE ; (CHAOS::SET-NEEDS-PARSE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN DECLARE-PCONST ; (CHAOS::SET-NEEDS-PARSE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN PARSE-AXIOM-DECLARATION ; (MEMBER CHAOS::ML LABELS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN DECLARE-AXIOM-NOW ; (CHAOS::SET-NEEDS-RULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN DECLARE-AXIOM ; (CHAOS::SET-NEEDS-RULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN EVAL-MACRO ; (CHAOS::SET-NEEDS-PARSE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN PROCESS-LABELS ; (DELETE "," CHAOS::X :TEST #'EQUAL) ; ; note: unable to ; convert to EQ test ; due to type uncertainty: ; The second argument is a SEQUENCE, not a LIST. ; (FIND #\. CHAOS::L) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (CHAR CHAOS::L 0) ; ; 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-ast-tmpTYRYY2X9.fasl ; compilation finished in 0:00:00.224 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-ast2.lisp" (written 24 OCT 2019 08:53:43 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-ast2.lisp ; in: DEFUN EVAL-LISP-FORM ; (FBOUNDP (CAR CHAOS::FORM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS SYMBOL), not a SYMBOL. ; in: DEFUN SET-REWRITE-COUNT-LIMIT ; (> CHAOS::NUM 0) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM. ; etc. ; in: DEFUN GET-INT-OR-NULL ; (LENGTH (CAR CHAOS::VALUE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN SAVE-SYSTEM ; (FORMAT STREAM "~&(in-package \"CHAOS\")") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; (FORMAT STREAM "~&(eval-when (:execute :load-toplevel)") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; (FORMAT STREAM "~&;;; system standard prelude.") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; (FORMAT STREAM "~&;;; user defined modules.") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; (FORMAT STREAM "~&;;; views.") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; (FORMAT STREAM "~%)") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; (FORMAT STREAM "~&(eval-ast-if-need-no-error '~s)" ; (CHAOS::%VIEW-DECL* ; (CHAOS::VIEW-NAME ; CHAOS::V) ; (CHAOS::VIEW-DECL-FORM ; CHAOS::V))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; (FORMAT STREAM "~&(eval-ast-if-need-no-error '~s)" ELT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; in: DEFUN DUMP-USER-MODULE ; (FORMAT STREAM "~&(eval-ast-if-need-no-error '~s)" CHAOS::DECL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN RESTORE-SYSTEM ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (LET ((CHAOS::*CHAOS-QUIET* (NOT CHAOS::*CHAOS-VERBOSE*))) ; (IF (PROBE-FILE CHAOS::FILE) ; (PROGN (LOAD CHAOS::FILE) (FORMAT T "~%done restoring.")) ; (CHAOS::WITH-OUTPUT-CHAOS-ERROR ; ('CHAOS::NO-FILE) ; (FORMAT T "No such file ~a" CHAOS::FILE))))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; (CHAOS::WITH-CHAOS-TOP-ERROR ; NIL ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (LET ((CHAOS::*CHAOS-QUIET* #)) ; (IF (PROBE-FILE CHAOS::FILE) ; (PROGN # #) ; (CHAOS::WITH-OUTPUT-CHAOS-ERROR ; # ; #))))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN LOAD-PRELUDE* ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (LET ((CHAOS::*DRIBBLE-AST* T) (CHAOS::*AST-LOG* NIL) (CHAOS::F NIL)) ; (SETQ CHAOS::F ; (CHAOS::CHAOS-INPUT-FILE :FILE CHAOS::FILE :PROC CHAOS::PROCESSOR ; :LOAD-PATH # :ERRORP CHAOS::ERRORP)) ; (IF (AND CHAOS::*SYSTEM-STANDARD-PRELUDE* (NOT CHAOS::OVERRIDE)) ; (SETQ CHAOS::*SYSTEM-STANDARD-PRELUDE* #) ; (SETQ CHAOS::*SYSTEM-STANDARD-PRELUDE* #)) ; CHAOS::F)) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; (CHAOS::WITH-CHAOS-TOP-ERROR ; NIL ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (LET ((CHAOS::*DRIBBLE-AST* T) (CHAOS::*AST-LOG* NIL) (CHAOS::F NIL)) ; (SETQ CHAOS::F #) ; (IF (AND CHAOS::*SYSTEM-STANDARD-PRELUDE* #) ; (SETQ #) ; (SETQ #)) ; CHAOS::F))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN EVAL-REQUIRE-COMMAND ; (FUNCALL CHAOS::PROC CHAOS::FILE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PROC is not known to be a function ; (FUNCALL CHAOS::PROC ; (FORMAT NIL "~{~A~^/~}" (CL-PPCRE:SPLIT "::" CHAOS::FEATURE))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PROC is not known to be a function ; in: DEFUN SHOW-DESCRIBE ; (LENGTH (CADR CHAOS::DAT)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (1- CHAOS::NO) ; ; 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 ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN TIMER ; (- CHAOS::*RUN-TIME* CHAOS::SYS) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (/ (- CHAOS::*RUN-TIME* CHAOS::SYS) INTERNAL-TIME-UNITS-PER-SECOND) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; (FLOAT (/ (- CHAOS::*RUN-TIME* CHAOS::SYS) INTERNAL-TIME-UNITS-PER-SECOND)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a RATIONAL, not a RATIO. ; (- CHAOS::*REAL-TIME* REAL) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (/ (- CHAOS::*REAL-TIME* REAL) INTERNAL-TIME-UNITS-PER-SECOND) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; convert x/2^k to shift ; due to type uncertainty: ; The first argument is a NUMBER, not a INTEGER. ; (FLOAT (/ (- CHAOS::*REAL-TIME* REAL) INTERNAL-TIME-UNITS-PER-SECOND)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a RATIONAL, not a RATIO. ; (- CHAOS::*RUN-TIME* CHAOS::SYS) ; ; 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (FLOAT (/ (- CHAOS::*RUN-TIME* CHAOS::SYS) INTERNAL-TIME-UNITS-PER-SECOND)) ; ; 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). ; (- CHAOS::*REAL-TIME* REAL) ; ; 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (FLOAT (/ (- CHAOS::*REAL-TIME* REAL) INTERNAL-TIME-UNITS-PER-SECOND)) ; ; 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). ; in: DEFUN EVAL-CBRED ; (ZEROP CHAOS::*TERM-MEMO-HASH-HIT*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; in: DEFUN !INPUT-FILE ; (CHAOS::WITH-CHAOS-TOP-ERROR ; NIL ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (CHAOS::EVAL-AST ; (CHAOS::%INPUT* CHAOS::FILE CHAOS::*CHAOS-LIBPATH* ; 'CHAOS::PROCESS-CAFEOBJ-INPUT '(".bin" ".cafe" ".mod") ; NIL)))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (CHAOS::EVAL-AST ; (CHAOS::%INPUT* CHAOS::FILE CHAOS::*CHAOS-LIBPATH* ; 'CHAOS::PROCESS-CAFEOBJ-INPUT '(".bin" ".cafe" ".mod") ; NIL))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN CAFEOBJ-EVAL-PRELUDE-PROC ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (CHAOS::EVAL-AST CHAOS::AST)) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN EVAL-DELIMITER-PROC ; (CHAOS::CASE-EQUAL ; (THE SIMPLE-STRING (SECOND CHAOS::PRE-ARGS)) ; ("=" (SETQ CHAOS::OP :SET)) ; ("+" (SETQ CHAOS::OP :ADD)) ; ("-" (SETQ CHAOS::OP :DELETE)) ; (T ; (CHAOS::WITH-OUTPUT-CHAOS-ERROR ; ('CHAOS::INTERNAL) ; (FORMAT T "delimiter op given ivalid op ~a" (SECOND CHAOS::PRE-ARGS))))) ; --> IF EQUAL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; --> IF IF EQUAL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; --> IF IF IF EQUAL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/eval/eval-ast2-tmpOMAPSGL7.fasl ; compilation finished in 0:00:00.360 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/eval/chaos-top.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/eval/chaos-top-tmpB76HJA0J.fasl ; compilation finished in 0:00:00.024 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/boot/preproc.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/boot/preproc-tmp7QTM681J.fasl ; compilation finished in 0:00:00.136 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/boot/prelude.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/boot/prelude-tmpLGH8FB0W.fasl ; compilation finished in 0:00:00.056 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/boot/builtins.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/boot/builtins-tmpDGQGGEC4.fasl ; compilation finished in 0:00:00.036 -- defining module* TRIV done. -- defining module! TRUTH-VALUE done. -- defining module! NZNAT-VALUE done. -- defining module! NAT-VALUE done. -- defining module! INT-VALUE done. -- defining module! RAT-VALUE done. -- defining module! FLOAT-VALUE done. -- defining module! ID done. -- defining module! CHAR-VALUE done. -- defining module! STRING-VALUE done. ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/tram/tram.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/tram/tram.lisp ; in: DEFUN TRAM-GET-ID ; (STRING CHAOS::PREFIX) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN RE-MAKE-TRAM-TOK-SEQ ; (STRING CHAOS::SYM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/tram/tram-tmp6X5OKNPG.fasl ; compilation finished in 0:00:00.252 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/chaos/psup/psup.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/chaos/psup/psup.lisp ; in: DEFUN PSUP-MAKE-SORT-INFO ; (STRING ; (CDR ; (CHAOS::ASSQ ; SORT ; (CHAOS::TRS$SORT-NAME-MAP CHAOS::TRS)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PSUP-GET-MODULE-SORTS ; (STRING (CDR CHAOS::S)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PSUP-GET-SORT-GRAPH* ; (STRING (CAR CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CADR CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CAR CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CADR CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PSUP-MAKE-METHOD-INFO ; (STRING (CAR CHAOS::MINFO)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CADDR CHAOS::MINFO)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (MAPCAR #'STRING (CADR CHAOS::MINFO)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PSUP-MAP-CHAOS-OP-TO-TRS ; (STRING (CHAOS::MAP-CHAOS-OP-TO-TRS CHAOS::METHOD CHAOS::TRS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN TRS-TERM-TO-PSUP-TERM ; (STRING SORT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PSUP-PARSE-VARS ; (LENGTH CHAOS::DECL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN PSUP-RE-MAKE-VARIABLE-FORM ; (STRING (CHAOS::TRS-TERM-HEAD CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CHAOS::TRS-TERM-SORT CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PSUP-MAKE-TERM-FORM ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN TRS-TERM-TO-PSUP ; (STRING (CHAOS::TRS-TERM-HEAD CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CHAOS::TRS-TERM-SORT CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CHAOS::TRS-TERM-HEAD CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CHAOS::TRS-TERM-SORT CHAOS::TERM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PSUP-MAKE-AXIOM-INFO ; (STRING (CHAOS::TRS-AXIOM-LABEL CHAOS::AX)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/chaos/psup/psup-tmpABKNHGCI.fasl ; compilation finished in 0:00:00.108 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/parse-apply.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/parse-apply.lisp ; in: DEFUN PARSE-RULE-SPEC ; (CHAR CHAOS::TOK 0) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-ARRAY. ; (POSITION-IF #'(LAMBDA (CHAOS::X) (CHAR= #\. CHAOS::X)) CHAOS::TOK) ; ; note: unable to ; expand inline ; because: ; upgraded array element type not known at compile time ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/parse-apply-tmpDGT3OQUT.fasl ; compilation finished in 0:00:00.232 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/basics.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/basics.lisp ; in: DEFUN COMMAND-DISPLAY ; (LENGTH CHAOS::$$ACTION-STACK) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN COMPUTE-OCCUR-SELECTION ; (<= 0 CHAOS::I) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (<= CHAOS::I ; (LENGTH ; (CHAOS::TERM-SUBTERMS ; CHAOS::CUR))) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (SINGLE-FLOAT 0.0) (DOUBLE-FLOAT 0.0d0) ; (RATIONAL 0)), not a FLOAT. ; (ZEROP CHAOS::I) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0 536870908) ; (SINGLE-FLOAT 0.0 5.368709e8) ; (DOUBLE-FLOAT 0.0d0 5.36870908d8)), not a FLOAT. ; ; note: unable to open code because: The operands might not be the same type. ; (1- CHAOS::I) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0 536870908) ; (SINGLE-FLOAT 0.0 5.368709e8) ; (DOUBLE-FLOAT 0.0d0 5.36870908d8)), not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 0 536870908) ; (SINGLE-FLOAT 0.0 5.368709e8) ; (DOUBLE-FLOAT 0.0d0 5.36870908d8)), not a FLOAT. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (RATIONAL 0 536870908) ; (SINGLE-FLOAT 0.0 5.368709e8) ; (DOUBLE-FLOAT 0.0d0 5.36870908d8)), not a FIXNUM. ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL 0 536870908) ; (SINGLE-FLOAT 0.0 5.368709e8) ; (DOUBLE-FLOAT 0.0d0 5.36870908d8)), not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (OR (RATIONAL 0 536870908) ; (SINGLE-FLOAT 0.0 5.368709e8) ; (DOUBLE-FLOAT 0.0d0 5.36870908d8)), not a FIXNUM. ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (OR (RATIONAL 0 536870908) ; (SINGLE-FLOAT 0.0 5.368709e8) ; (DOUBLE-FLOAT 0.0d0 5.36870908d8)), not a FIXNUM. ; etc. ; in: DEFUN COMPUTE-SUBSEQ-SELECTION ; (1- CHAOS::M1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (1- CHAOS::N1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (<= CHAOS::M CHAOS::N) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (<= 1 CHAOS::M1) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (LENGTH CHAOS::LST) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (<= CHAOS::N1 (LENGTH CHAOS::LST)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (< 1 CHAOS::M1) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL 1) (SINGLE-FLOAT 1.0) ; (DOUBLE-FLOAT 1.0d0)), not a FLOAT. ; (LENGTH CHAOS::LST) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (< CHAOS::N1 (LENGTH CHAOS::LST)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a (OR (RATIONAL * 536870908) ; (SINGLE-FLOAT * 5.368709e8) ; (DOUBLE-FLOAT * 5.36870908d8)), not a FLOAT. ; (1+ CHAOS::N) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; (SUBSEQ CHAOS::LST CHAOS::M (1+ CHAOS::N)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; (SUBSEQ CHAOS::LST 0 CHAOS::M) ; ; 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. ; (1+ CHAOS::N) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a REAL, not a RATIONAL. ; (SUBSEQ CHAOS::LST (1+ CHAOS::N)) ; ; 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. ; (1- CHAOS::M1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (1- CHAOS::N1) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (< 1 CHAOS::M1) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 3) because: ; The first argument is a (OR (RATIONAL 1) (SINGLE-FLOAT 1.0) ; (DOUBLE-FLOAT 1.0d0)), not a FIXNUM. ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL 1) (SINGLE-FLOAT 1.0) ; (DOUBLE-FLOAT 1.0d0)), not a FIXNUM. ; etc. ; (< CHAOS::N1 (LENGTH CHAOS::LST)) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (OR (RATIONAL * 536870908) ; (SINGLE-FLOAT * 5.368709e8) ; (DOUBLE-FLOAT * 5.36870908d8)), not a FIXNUM. ; (1+ CHAOS::N) ; ; 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. ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a REAL, not a FIXNUM. ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a REAL, not a FIXNUM. ; etc. ; in: DEFUN COMPUTE-SUBSET-SELECTION ; (LENGTH CHAOS::LST) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (1- CHAOS::I) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN COMPUTE-SET-OCS ; (PUSHNEW CHAOS::VAL CHAOS::RES) ; --> SETQ THE ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN @MAKE-A-PATTERNS ; (APPEND ; (CHAOS::LIST-ASSOC-SUBTERMS CHAOS::TERM ; (CHAOS::TERM-HEAD ; CHAOS::TERM)) ; (LIST CHAOS::NEW-VAR1)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN COMPUTE-VARIABLE-SUBSTITUTION ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::AVAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN GET-SUBTERM-POS ; (1- CHAOS::P) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (>= CHAOS::RP 0) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (1- CHAOS::P) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN FIND-MATCHING-RULES-ALL* ; (APPEND CHAOS::POS (LIST (1+ CHAOS::X))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN FIND-MATCHING-RULES ; (1+ CHAOS::NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/basics-tmpNF26V1SW.fasl ; compilation finished in 0:00:00.216 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/eval-match.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/eval-match.lisp ; in: DEFUN FIND-REWRITE-RULES-TOP ; (STRING CHAOS::LABEL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN FIND-REWRITE-RULES-ALL ; (STRING CHAOS::LABEL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PERFORM-MATCH ; (FUNCALL CHAOS::FIRST-MATCH-METH CHAOS::PATTERN CHAOS::REAL-TARGET) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; FIRST-MATCH-METH is not known to be a function ; (FUNCALL CHAOS::NEXT-MATCH-METH CHAOS::GLOBAL-STATE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; NEXT-MATCH-METH is not known to be a function ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; NEXT-MATCH-METH is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/eval-match-tmp2SBNA8NV.fasl ; compilation finished in 0:00:00.080 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/eval-apply.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/eval-apply.lisp ; in: DEFUN APPLY-ONE-RULE-NO-SIMPLIFY ; (FUNCALL ; (CHAOS::LISP-FORM-FUNCTION ; (CHAOS::RULE-RHS ; CHAOS::RULE)) ; SUBST) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::NEXT-MATCH-METHOD CHAOS::GLOBAL-STATE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; NEXT-MATCH-METHOD is not known to be a function ; (FUNCALL ; (CHAOS::RULE-FIRST-MATCH-METHOD ; CHAOS::RULE) ; (CHAOS::RULE-LHS ; CHAOS::RULE) ; CHAOS::TERM) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL ; (CHAOS::LISP-FORM-FUNCTION ; (CHAOS::RULE-RHS ; CHAOS::RULE)) ; SUBST) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/eval-apply-tmpGXTLRZRR.fasl ; compilation finished in 0:00:00.084 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/cexec.lisp" (written 10 DEC 2019 06:00:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/cexec.lisp ; in: DEFUN SHOW-RWL-SCH-GRAPH ; (FORMAT T "no context module...") ; ; note: deleting unreachable code ; in: DEFUN RWL-SCH-CHECK-CONDITIONS ; (APPEND CHAOS::SUB CHAOS::RULE-SUBST) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN TERM-HASH-EQUAL ; (SXHASH CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a NUMBER. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a INTEGER. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a FIXNUM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SYMBOL. ; in: DEFUN TERM-HASH-COMB ; (LOGAND CHAOS::TERM-HASH-MASK (+ CHAOS::X CHAOS::Y)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (INTEGER -1073741824 1073741822), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a (INTEGER -1073741824 1073741822), not a (UNSIGNED-BYTE ; 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (LOGAND CHAOS::TERM-HASH-MASK ; (LOGAND CHAOS::TERM-HASH-MASK (+ CHAOS::X CHAOS::Y))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (LOGAND CHAOS::TERM-HASH-MASK (+ CHAOS::X CHAOS::Y)) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN CEXEC-HASH-TERM ; (CHAOS::TERM-HASH-EQUAL ; (CHAOS::TERM-BUILTIN-VALUE ; CHAOS::TERM)) ; --> BLOCK LOGAND ; ==> ; (SXHASH CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a NUMBER. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a INTEGER. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a FIXNUM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a DOUBLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a SYMBOL. ; (CHAOS::TERM-HASH-COMB CHAOS::RES (CHAOS::CEXEC-HASH-TERM CHAOS::SUBTERM)) ; --> BLOCK THE LOGAND ; ==> ; (LOGAND CHAOS::TERM-HASH-MASK (+ CHAOS::X CHAOS::Y)) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a (INTEGER -1073741824 1073741822), not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a (INTEGER -1073741824 1073741822), not a (UNSIGNED-BYTE ; 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; --> BLOCK THE ; ==> ; (LOGAND CHAOS::TERM-HASH-MASK ; (LOGAND CHAOS::TERM-HASH-MASK (+ CHAOS::X CHAOS::Y))) ; ; note: forced to do full call ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a INTEGER, not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; unable to do inline (unsigned-byte 32) arithmetic (cost 3) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; (CHAOS::TERM-HASH-COMB ; (SXHASH ; (THE SYMBOL ; (CHAOS::SORT-ID ; (CHAOS::TERM-SORT ; CHAOS::TERM)))) ; (CHAOS::TERM-HASH-EQUAL ; (CHAOS::TERM-BUILTIN-VALUE ; CHAOS::TERM))) ; --> THE LOGAND LOGAND ; ==> ; (LOGAND # 1073741823) ; ; 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 (signed-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; --> THE LOGAND ; ==> ; (LOGAND # 1073741823) ; ; 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 (signed-byte 32) arithmetic (cost 2) because: ; The first argument is a INTEGER, not a (SIGNED-BYTE 32). ; etc. ; ==> ; (THE CHAOS::TERM-HASH-KEY ; (LOGAND CHAOS::TERM-HASH-MASK ; (LOGAND CHAOS::TERM-HASH-MASK (+ CHAOS::X CHAOS::Y)))) ; ; note: doing signed word to integer coercion (cost 20) to "" ; (CHAOS::TERM-HASH-COMB CHAOS::RES (CHAOS::CEXEC-HASH-TERM CHAOS::SUBTERM)) ; --> BLOCK THE LOGAND ; ==> ; (LOGAND CHAOS::TERM-HASH-MASK (+ CHAOS::X CHAOS::Y)) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN GET-SCH-HASHED-TERM ; (MOD CHAOS::VAL CHAOS::TERM-HASH-SIZE) ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; in: DEFUN SET-SCH-HASHED-TERM ; (MOD CHAOS::VAL CHAOS::TERM-HASH-SIZE) ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; in: DEFUN CEXEC-LOOP-CHECK ; (LENGTH CHAOS::ENTRY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (CHAOS::GET-SCH-HASHED-TERM CHAOS::TERM CHAOS::.CEXEC-TERM-HASH.) ; --> BLOCK LET LET* SVREF ; ==> ; 1 ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; in: DEFUN MAKE-RWL-STATE-WITH-HASH ; (CHAOS::SET-SCH-HASHED-TERM CHAOS::TARGET CHAOS::.CEXEC-TERM-HASH. ; CHAOS::STATE-NUM) ; --> BLOCK LET LET MOD ; ==> ; 1 ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; in: DEFUN CEXEC-TERM-1 ; (MAPCAR #'1+ (CHAOS::RULE-PAT-POS CHAOS::RULE-PAT)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN RWL-SEARCH* ; (CHAOS::SET-SCH-HASHED-TERM CHAOS::T1 CHAOS::.CEXEC-TERM-HASH. 0) ; --> BLOCK LET LET MOD ; ==> ; 1 ; ; note: unable to ; convert integer division to multiplication ; due to type uncertainty: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/cexec-tmp2OV9B8J5.fasl ; compilation finished in 0:00:00.760 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/case.lisp" (written 15 NOV 2018 12:48:56 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/case-tmpDWRCTFSG.fasl ; compilation finished in 0:00:00.032 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/proof-struct.lisp" (written 16 DEC 2019 07:35:07 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/proof-struct.lisp ; in: DEFUN PR-TACTIC ; (FORMAT STREAM "[~a]" (CHAOS::TACTIC-NAME CHAOS::TACTIC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN GET-BUILTIN-TACTIC ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (STRING-EQUAL CHAOS::NAME (SYMBOL-NAME (CHAOS::TACTIC-NAME CHAOS::X)))) ; CHAOS::.ALL-BUILTIN-TACTICS.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN PR-TACTIC-SEQ ; (FORMAT STREAM "( ~{~a~^ ~a ~} )" ; (MAPCAR #'(LAMBDA (CHAOS::X) (CHAOS::TACTIC-NAME CHAOS::X)) ; CHAOS::TACTICS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN PR-TACTIC-CTF ; (FORMAT STREAM ":ctf") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN PR-TACTIC-CSP ; (FORMAT STREAM ":csp") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN PR-TACTIC-INIT ; (FORMAT STREAM ":init") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "[~a]" (SECOND (CHAOS::TACTIC-INIT-KIND CHAOS::OBJ))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN FIND-CITP-FLAG-INDEX ; (CHAOS::CITP-FLAG-NAME ; CHAOS::X) ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (STRING= CHAOS::NAME ; (CHAOS::CITP-FLAG-NAME ; CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN PRINT-CITP-FLAG ; (= CHAOS::INDEX CHAOS::CITP-ALL) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; in: DEFUN PR-CITP-FLAG-INTERNAL ; (CHAOS::CITP-FLAG-NAME ; CHAOS::INDEX) ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::CITP-FLAG ; CHAOS::INDEX) ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN HELP-CITP-FLAG ; (CHAOS::CITP-FLAG-STRUCT ; CHAOS::INDEX) ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN INITIALIZE-CITP-FLAG ; (SETF (CHAOS::CITP-FLAG-NAME ; CHAOS::CITP-ALL) ; "citp-all" ; (CHAOS::CITP-FLAG-NAME ; CHAOS::CITP-VERBOSE) ; "citp-verbose" ; (CHAOS::CITP-FLAG-NAME ; CHAOS::CITP-SHOW-RWL) ; "citp-show-rwl" ; (CHAOS::CITP-FLAG-NAME ; CHAOS::CITP-SPOILER) ; "citp-spoiler" ; (CHAOS::CITP-FLAG-NAME ; CHAOS::CITP-PRINT-MESSAGE) ; "citp-print-message" ; (CHAOS::CITP-FLAG-NAME ; CHAOS::CITP-NORMALIZE-INIT) ; "citp-normalize-init" ; ...) ; --> SETF LET THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::CITP-FLAG ; CHAOS::CITP-PRINT-MESSAGE) ; T) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::CITP-FLAG ; CHAOS::CITP-NORMALIZE-INIT) ; T) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::CITP-FLAG ; CHAOS::CITP-NORMALIZE-LHS) ; T) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::CITP-FLAG-HOOK ; CHAOS::CITP-VERBOSE) ; #'(LAMBDA (CHAOS::NAME CHAOS::VALUE) ; (DECLARE (IGNORE CHAOS::NAME)) ; (SETF CHAOS::*CITP-VERBOSE* CHAOS::VALUE))) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::CITP-FLAG-HOOK ; CHAOS::CITP-SHOW-RWL) ; #'(LAMBDA (CHAOS::NAME CHAOS::VALUE) ; (DECLARE (IGNORE CHAOS::NAME)) ; (SETF CHAOS::*CITP-SHOW-RWL* CHAOS::VALUE))) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::CITP-FLAG-HOOK ; CHAOS::CITP-SPOILER) ; #'(LAMBDA (CHAOS::NAME CHAOS::VALUE) ; (DECLARE (IGNORE CHAOS::NAME)) ; (SETF CHAOS::*CITP-SPOILER* CHAOS::VALUE))) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::CITP-FLAG-STRUCT ; CHAOS::IDX) ; (CHAOS::MAKE-CITP-FLAG-STRUCT :VALUE NIL)) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN USE-SENTENCES-IN-GOAL ; (LENGTH CHAOS::NEW-AXS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (APPEND (CHAOS::GOAL-ASSUMPTIONS CHAOS::GOAL) CHAOS::NEW-AXS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN EMBED-SENTENCES-IN-MODULE ; (LENGTH CHAOS::NEW-AXS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN MAKE-IT-UNPROVED ; (APPEND (CHAOS::GOAL-TARGETS CHAOS::GOAL) (CHAOS::GOAL-PROVED CHAOS::GOAL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN MAKE-PTREE-GOAL-NAME ; (EQUAL CHAOS::P-NAME "root") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN PR-PTREE ; (INCF CHAOS::NUM) ; --> THE ; ==> ; (+ 1 CHAOS::NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN DEFAULT-CONSTRUCTOR-ORDER ; (SORT CHAOS::CONSTRUCTORS ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (LET ((CHAOS::AX #) (CHAOS::AY #)) ; (IF (< CHAOS::AX CHAOS::AY) ; T ; (IF # ; NIL ; #))))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (< CHAOS::AX CHAOS::AY) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (> CHAOS::AX CHAOS::AY) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (< CHAOS::AX CHAOS::AY) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; (> CHAOS::AX CHAOS::AY) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; in: DEFUN ORDER-CONSTRUCTORS ; (POSITION :* CHAOS::ORDER-SPEC) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR LIST ; VECTOR). ; (SUBSEQ CHAOS::ORDER-SPEC 0 CHAOS::POS-STAR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a SB-KERNEL:EXTENDED-SEQUENCE. ; (SUBSEQ CHAOS::ORDER-SPEC (1+ CHAOS::POS-STAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a SB-KERNEL:EXTENDED-SEQUENCE. ; (APPEND CHAOS::FIRST-HALF CHAOS::SECOND-HALF) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN SHOW-CONSTRUCTOR-ORDER ; (INCF CHAOS::NUM) ; --> THE ; ==> ; (+ 1 CHAOS::NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN SET-CONSTRUCTOR-ORDER ; (APPEND CHAOS::PREC-LIST '(:*)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (SORT CHAOS::OVERS ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (LET ((CHAOS::X-NUM #) (CHAOS::Y-NUM #)) ; (DECLARE (TYPE FIXNUM CHAOS::X-NUM CHAOS::Y-NUM)) ; (< CHAOS::X-NUM CHAOS::Y-NUM)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (APPEND CHAOS::PREC-LIST CHAOS::OVERS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN MAKE-IND-CONST-NAME ; (STRING CHAOS::NAME-PREFIX) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN FIND-GOAL-NODE ; (STRING= (CHAOS::GOAL-NAME CHAOS::GOAL) CHAOS::NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-BASE-STRING. ; The second argument is a STRING, not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN SELECT-NEXT-GOAL ; (STRING= CHAOS::GOAL-NAME ".") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN SAVE-DISCHARGED-SENTENCES ; (APPEND (CHAOS::CITP-PROOF-DISCHARGED CHAOS::*THE-CITP-PROOF*) ; (CHAOS::GOAL-TARGETS ; (CHAOS::PTREE-NODE-GOAL ; (CHAOS::PTREE-ROOT CHAOS::*PROOF-TREE*)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PRINT-DISCHARGED-SENTENCES ; (LENGTH CHAOS::DISCHARGED) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; in: DEFUN !PRINT-PROOF-VERTICAL ; (FUNCALL CHAOS::LEAF-NAME CHAOS::NODE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; LEAF-NAME is not known to be a function ; in: DEFUN DESCRIBE-PROOF-TREE ; (+ CHAOS::*PROOF-INDENT* CHAOS::*PRINT-INDENT*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do 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 (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 32). ; The second argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES FIXNUM &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/proof-struct-tmpUJ89U641.fasl ; compilation finished in 0:00:00.660 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/apply-tactic.lisp" (written 20 JAN 2020 01:13:27 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/apply-tactic.lisp ; in: DEFUN REMOVE-NONEXEC ; (MEMBER CHAOS::LB CHAOS::NON-EXEC-LABELS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN RULE-COPY-CANONICALIZED ; (APPEND ; (CHAOS::RULE-LABELS ; CHAOS::RULE) ; (LIST CHAOS::LABEL)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN APPLY-SUBSTITUTION-TO-AXIOM ; (APPEND CHAOS::LABEL ; (CHAOS::RULE-LABELS ; CHAOS::AXIOM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND CHAOS::LABEL :NONEXEC) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN SELECT-COMB-ELEMS ; (LENGTH CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN AXIOM-VARIABLES ; (APPEND (CHAOS::TERM-VARIABLES CHAOS::RHS) (CHAOS::TERM-VARIABLES COND)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND (CHAOS::TERM-VARIABLES CHAOS::LHS) ; (APPEND (CHAOS::TERM-VARIABLES CHAOS::RHS) ; (CHAOS::TERM-VARIABLES COND))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN SENTENCE-IS-SATISFIED ; (SETQ CHAOS::RESULT :CT) ; ; note: deleting unreachable code ; ; note: deleting unreachable code ; in: DEFUN CHECK-TRUE<=>FALSE ; (APPEND CHAOS::T-RULES CHAOS::F-RULES) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN AXIOM-IS-AN-INSTANCE-OF ; (FUNCALL ; (CHAOS::RULE-FIRST-MATCH-METHOD ; CHAOS::CX) ; (CHAOS::RULE-LHS ; CHAOS::CX) ; (CHAOS::RULE-LHS ; CHAOS::AX)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; (FUNCALL CHAOS::NEXT-MATCH-METHOD CHAOS::GS) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; NEXT-MATCH-METHOD is not known to be a function ; in: DEFUN CHECK-CT-WITH-AXIOMS ; (APPEND ; (CHAOS::METHOD-RULES-WITH-DIFFERENT-TOP ; CHAOS::*BOOL-TRUE-METH*) ; (CHAOS::METHOD-RULES-WITH-DIFFERENT-TOP ; CHAOS::*BOOL-FALSE-METH*)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN APPLY-IP ; (APPEND (CHAOS::GOAL-ASSUMPTIONS CHAOS::NGOAL) (REVERSE CHAOS::NEW-AXS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN GET-REAL-TARGET-VARIABLE ; (FIND-IF ; #'(LAMBDA (CHAOS::M) ; (AND ; (CHAOS::SORT= ; (CHAOS::VARIABLE-SORT ; CHAOS::M) ; (CHAOS::VARIABLE-SORT ; CHAOS::INDVAR)) ; (EQUAL ; (CHAOS::VARIABLE-NAME ; CHAOS::M) ; (CHAOS::VARIABLE-NAME ; CHAOS::INDVAR)))) ; CHAOS::AXIOM-VARIABLES) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN MAKE-STEP-CONSTRUCTOR-TERM ; (ZEROP (CDR CHAOS::VAR-ASSOC)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (INCF (CDR CHAOS::VAR-ASSOC)) ; ==> ; (+ 1 (CDR #:VAR-ASSOC17)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (STRING ; (CHAOS::VARIABLE-NAME ; VARIABLE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (INCF (CDR CHAOS::VAR-ASSOC)) ; ==> ; (+ 1 (CDR #:VAR-ASSOC18)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ==> ; (+ 1 (CDR #:VAR-ASSOC17)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (INCF CHAOS::N) ; --> THE ; ==> ; (+ 1 CHAOS::N) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN RESOLVE-INDUCTION-SUBST ; (ASSOC CHAOS::V CHAOS::RSUBSTS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (APPEND CHAOS::HENTRY (LIST CHAOS::NEW-ELEMENT)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN ADD-HYPOTHESIS ; (APPEND (CHAOS::GOAL-ASSUMPTIONS CHAOS::STEP-GOAL) (LIST CHAOS::HYPO)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN GET-GTERMS-FROM-AXIOM ; (APPEND (CHAOS::GET-GTERMS (CHAOS::AXIOM-RHS CHAOS::AXIOM)) ; (CHAOS::GET-GTERMS-FROM-AXIOM CHAOS::AXIOM T)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND (CHAOS::GET-GTERMS (CHAOS::AXIOM-LHS CHAOS::AXIOM)) ; (APPEND (CHAOS::GET-GTERMS (CHAOS::AXIOM-RHS CHAOS::AXIOM)) ; (CHAOS::GET-GTERMS-FROM-AXIOM CHAOS::AXIOM T))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN FIND-GTERM-MATCHING-CONDITIONALS ; (SETF (AREF CHAOS::.DUPLICATED. CHAOS::IDX) ; (REMOVE-DUPLICATES CHAOS::REJECTED :TEST ; #'CHAOS::TERM-EQUATIONAL-EQUAL)) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; in: DEFUN GENERATE-CASE-AXIOMS ; (APPEND (CHAOS::GOAL-ASSUMPTIONS CHAOS::NEXT-GOAL) ; (NREVERSE CHAOS::CASE-AXIOMS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN FIND-SUB-CASE-IN ; (FIND CHAOS::X CHAOS::XC :TEST #'CHAOS::TERM-EQUATIONAL-EQUAL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (LENGTH CHAOS::XC) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN CASE-IS-VALID ; (AREF CHAOS::.DUPLICATED. CHAOS::IDX) ; ; 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. ; in: DEFUN NORMALIZE-CASES ; (LENGTH CHAOS::.DUPLICATED.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (AREF CHAOS::.DUPLICATED. CHAOS::X) ; ; 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. ; (DELETE CHAOS::C CHAOS::ALL-CASES :TEST #'CHAOS::TERM-EQUATIONAL-EQUAL) ; ; note: unable to ; convert to EQ test ; due to type uncertainty: ; The second argument is a SEQUENCE, not a LIST. ; in: DEFUN GENERATE-CASES ; (LENGTH CHAOS::RV-COMBS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; in: DEFUN RULE-IS-FOR-CASE ; (STRING CHAOS::LB) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN RULE-IS-CASE-GENERATED ; (STRING CHAOS::LB) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN GET-TARGET-AXIOM ; (CHAOS::SET-NEEDS-RULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN MAKE-AXIOM-INSTANCE ; (CHAOS::MAKE-PROPER-LABEL (CHAOS::LABEL) ; (IF (STRINGP CHAOS::LABEL) ; (INTERN CHAOS::LABEL) ; CHAOS::LABEL)) ; ; note: Return type not fixed values, so can't use known return convention: ; (VALUES (AND (NOT (VECTOR CHARACTER)) (NOT BASE-STRING)) &OPTIONAL ; (MEMBER NIL :INHERITED :EXTERNAL :INTERNAL)) ; in: DEFUN INSTANCIATE-AXIOM-IN-GOAL ; (CHAOS::CITP-FLAG ; CHAOS::CITP-NORMALIZE-INIT) ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::CITP-FLAG ; CHAOS::CITP-NORMALIZE-LHS) ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (APPEND (CHAOS::GOAL-ASSUMPTIONS CHAOS::GOAL) (LIST CHAOS::INSTANCE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN CITP-RENAME-TERM-VARIABLES ; (MEMBER CHAOS::VAR CHAOS::DONE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN PR-CPP ; (FORMAT STREAM "~%Critical Pair ---------") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN COMPUTE-OVERWRAPS ; (APPEND CHAOS::OCCUR (CONS CHAOS::POS CHAOS::OCCUR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND CHAOS::CPPS ; (CHAOS::COMPUTE-OVERWRAPS CHAOS::SUB CHAOS::T2 ; (APPEND CHAOS::OCCUR (CONS CHAOS::POS CHAOS::OCCUR)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN GENERATE-CRITICAL-PAIRS ; (SORT CHAOS::SUBS #'CHAOS::LRPO) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; in: DEFUN REDUCE-IN-GOAL ; (STRING CHAOS::MODE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN MAKE-CTF-CONSTRUCTOR-PATTERN ; (ZEROP (CDR CHAOS::PN)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (INCF (CDR CHAOS::PN)) ; ==> ; (+ 1 (CDR #:PN2)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ==> ; (+ 1 (CDR #:PN3)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ==> ; (+ 1 (CDR #:PN2)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ==> ; (+ 1 (CDR #:PN3)) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN DO-APPLY-CTF-WITH-CONSTRUCTORS ; (APPEND (CHAOS::GOAL-ASSUMPTIONS CHAOS::CUR-GOAL) (LIST CHAOS::AX)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN DO-APPLY-CTF-TO-EQUATION ; (APPEND (CHAOS::GOAL-ASSUMPTIONS CHAOS::CUR-GOAL) (LIST CHAOS::N-AXIOM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (CHAOS::ADD-ASSUMPTION (CHAOS::GOAL CHAOS::LHS CHAOS::RHS) ; (LET (CHAOS::N-AXIOM) ; (MULTIPLE-VALUE-BIND (CHAOS::N-LHS CHAOS::N-RHS TYPE) ; (CHAOS::SIMPLIFY-BOOLEAN-AXIOM CHAOS::LHS CHAOS::RHS) ; (COND (CHAOS::N-LHS # # # #) (T #))))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; in: DEFUN APPLY-CTF ; (LENGTH CHAOS::NEXT-GOALS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; in: DEFUN DO-APPLY-CSP ; (APPEND (CHAOS::GOAL-ASSUMPTIONS CHAOS::CUR-GOAL) (LIST CHAOS::AX)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN APPLY-CSP ; (LENGTH CHAOS::NEXT-GOALS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; in: DEFUN APPLY-TACTIC ; (FUNCALL (CHAOS::TACTIC-EXECUTOR CHAOS::TACTIC) CHAOS::PTREE-NODE ; CHAOS::TACTIC) ; ; 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 ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/apply-tactic-tmpJAPE3FUS.fasl ; compilation finished in 0:00:00.716 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/citp.lisp" (written 16 DEC 2019 07:35:07 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/citp.lisp ; in: DEFUN CITP-PARSE-DEFINE ; (LENGTH CHAOS::COM-NAME) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ CHAOS::NAME 0 4) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; ; 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. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; in: DEFUN CITP-PARSE-SPOILER ; (SETF (CHAOS::CITP-FLAG ; CHAOS::CITP-SPOILER) ; CHAOS::VALUE) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PARSE-TERM-IN-CONTEXT ; (ELT TYPE 0) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a (SIMPLE-ARRAY * (*)). ; in: DEFUN CITP-EVAL-SET ; (CHAOS::CITP-FLAG ; CHAOS::CITP-PRINT-MESSAGE) ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (= CHAOS::CITP-ALL CHAOS::INDEX) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (SETF (CHAOS::CITP-FLAG ; CHAOS::X) ; CHAOS::VALUE) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::CITP-FLAG ; CHAOS::INDEX) ; CHAOS::VALUE) ; --> THE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::CITP-FLAG-HOOK ; CHAOS::INDEX) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (10)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (FUNCALL ; (CHAOS::CITP-FLAG-HOOK ; CHAOS::INDEX) ; CHAOS::NAME CHAOS::VALUE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN ADD-METHOD-THEORY ; (CHAOS::SET-NEEDS-PARSE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CHAOS::SET-NEEDS-RULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/citp-tmp1V7T6W0W.fasl ; compilation finished in 0:00:00.196 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/thstuff/bterm-inspector.lisp" (written 15 NOV 2018 12:48:56 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/bterm-inspector.lisp ; in: DEFUN PRINT-BTERM ; (FORMAT STREAM "(~d) " (INCF CHAOS::NUM)) ; ; 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. ; (STRING ; (CHAOS::VARIABLE-PRINT-NAME ; CHAOS::VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN ABST-BTERM-VARIABLES ; (PUSHNEW (CAR CHAOS::SUB) CHAOS::VARS) ; --> SETQ THE ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN MAKE-TF-COMBINATION ; (EXPT 2 CHAOS::C) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 29). ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 29). ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (DOTIMES (CHAOS::C CHAOS::COLUMNS) ; (SETQ CHAOS::ASSIGNMENT NIL) ; (LET ((CHAOS::CYCLE (EXPT 2 CHAOS::C))) ; (DOTIMES (CHAOS::R CHAOS::ROWS) ; (IF (NOT CHAOS::ASSIGNMENT) ; (SETQ #) ; (IF # ; #)) ; (SETF # CHAOS::ASSIGNMENT)))) ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN ASSIGN-TF ; (LENGTH CHAOS::LIST-VARS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (EXPT 2 CHAOS::COLUMNS) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline ASH (cost 3) because: ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (DOTIMES (CHAOS::R CHAOS::ROWS) ; (LET ((SUBST NIL)) ; (DOTIMES (CHAOS::C CHAOS::COLUMNS) (PUSH (CONS # #) SUBST)) ; (PUSH (NREVERSE SUBST) CHAOS::L-SUBST))) ; --> BLOCK LET TAGBODY UNLESS IF >= ; ==> ; 1 ; ; 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 (INTEGER 1), not a FIXNUM. ; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+ ; ==> ; 1 ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (INCF CHAOS::NUM) ; --> THE ; ==> ; (+ 1 CHAOS::NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN PRINT-BTERM-SUBSTITUTION ; (SORT (CHAOS::TERM-PVARIABLES CHAOS::TERM-REPRESENTATION) ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (STRING< ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::Y))))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (STRING ; (CHAOS::VARIABLE-PRINT-NAME ; CHAOS::VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::Y)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING< ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::Y))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; The second argument is a STRING, not a SIMPLE-STRING. ; in: DEFUN PRINT-BTERM-WITH-SUBST ; (MEMBER CHAOS::VAR CHAOS::DONE) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (STRING ; (CHAOS::VARIABLE-PRINT-NAME ; CHAOS::VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PRINT-BTERM-GRINDING ; (STRING ; (CHAOS::VARIABLE-PRINT-NAME ; CHAOS::VAR)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CAR CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING (CAR CHAOS::Y)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING< (STRING (CAR CHAOS::X)) (STRING (CAR CHAOS::Y))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; The second argument is a STRING, not a SIMPLE-STRING. ; in: DEFUN RESOLVE-BTERM-BY-WF ; (LENGTH CHAOS::VARS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR LIST (SIMPLE-ARRAY * (*)) ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (LENGTH CHAOS::BASES) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (APPEND CHAOS::BASE (LIST CHAOS::SEED)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (NTHCDR (+ 1 CHAOS::J CHAOS::I) CHAOS::VARS) ; ; note: doing signed word to integer coercion (cost 20) ; in: DEFUN BINSPECT-INTRO-PREDICATES ; (CHAOS::SET-NEEDS-PARSE ; CHAOS::MODULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (STRING ; (CHAOS::VARIABLE-PRINT-NAME ; CHAOS::V)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN MAKE-PRED-ORDERED-PAIRS ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::Y)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING< ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::Y))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; The second argument is a STRING, not a SIMPLE-STRING. ; in: DEFUN MAKE-PRED-COMBINATIONS ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::Y)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING< ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::X)) ; (STRING ; (CHAOS::VARIABLE-NAME ; CHAOS::Y))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a STRING, not a SIMPLE-STRING. ; The second argument is a STRING, not a SIMPLE-STRING. ; in: DEFUN REPORT-BGUESS-RESULT ; (INCF CHAOS::DEPTH) ; --> THE ; ==> ; (+ 1 CHAOS::DEPTH) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; (LENGTH CHAOS::SOLUTIONS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS VECTOR ; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR. ; (INCF CHAOS::DEPTH) ; --> THE ; ==> ; (+ 1 CHAOS::DEPTH) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; (INCF CHAOS::NUM) ; --> THE ; ==> ; (+ 1 CHAOS::NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN DO-BGUESS ; (STRING ; (CHAOS::VARIABLE-PRINT-NAME ; (CAR CHAOS::COMB))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (STRING ; (CHAOS::VARIABLE-PRINT-NAME ; (CDR CHAOS::COMB))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN BRESOLVE ; (< 0 CHAOS::LIMIT) ; ; 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. ; in: DEFUN FIND-VARIABLE-IN-ABST-BTERM ; (STRING= CHAOS::NAME ; (CHAOS::VARIABLE-PRINT-NAME ; (CAR CHAOS::SUB))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a SIMPLE-BASE-STRING. ; The second argument is a (OR STRING SYMBOL ; CHARACTER), not a SIMPLE-BASE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/thstuff/bterm-inspector-tmp952LXWTD.fasl ; compilation finished in 0:00:00.276 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/types.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/types.lisp ; in: DEFUN PR-LITERAL ; (APPEND CHAOS::.PRINTED-VARS-SO-FAR. ; (CHAOS::TERM-PRINT (CHAOS::LITERAL-ATOM CHAOS::LIT) STREAM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PRINT-CLAUSE ; (APPEND CHAOS::.PRINTED-VARS-SO-FAR. (CHAOS::PR-LITERAL CHAOS::LIT STREAM)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/types-tmpLVFWNUU9.fasl ; compilation finished in 0:00:00.276 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/glob.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/glob.lisp ; in: EVAL-WHEN (:EXECUTE :LOAD-TOPLEVEL) ; (SETF (AREF CHAOS::*PN-PARAMETERS* CHAOS::X) (CHAOS::MAKE-PN-PARAM)) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-SECONDS) ; "max-seconds") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-SECONDS) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-SECONDS) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-GEN) ; "max-gen") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-GEN) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-GEN) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-KEPT) ; "max-kept") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-KEPT) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-KEPT) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-GIVEN) ; "max-given") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-GIVEN) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-GIVEN) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-WEIGHT) ; "max-weight") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-WEIGHT) ; MOST-NEGATIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-WEIGHT) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::PICK-GIVEN-RATIO) ; "pick-given-ratio") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::PICK-GIVEN-RATIO) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::PICK-GIVEN-RATIO) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::DEMOD-LIMIT) ; "demod-limit") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::DEMOD-LIMIT) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::DEMOD-LIMIT) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-PROOFS) ; "max-proofs") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-PROOFS) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-PROOFS) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::NEG-WEIGHT) ; "neg-weight") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::NEG-WEIGHT) ; MOST-NEGATIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::NEG-WEIGHT) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::STATS-LEVEL) ; "stats-level") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::STATS-LEVEL) ; 0) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::STATS-LEVEL) ; 4) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::CHANGE-LIMIT-AFTER) ; "change-limit-after") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::CHANGE-LIMIT-AFTER) ; 0) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::CHANGE-LIMIT-AFTER) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::NEW-MAX-WEIGHT) ; "new-max-weight") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::NEW-MAX-WEIGHT) ; MOST-NEGATIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::NEW-MAX-WEIGHT) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-ANSWERS) ; "max-answers") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-ANSWERS) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-ANSWERS) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::DYNAMIC-DEMOD-DEPTH) ; "dynamic-demod-depth") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::DYNAMIC-DEMOD-DEPTH) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::DYNAMIC-DEMOD-DEPTH) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::DYNAMIC-DEMOD-RHS) ; "dynamic-demod-rhs") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::DYNAMIC-DEMOD-RHS) ; MOST-NEGATIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::DYNAMIC-DEMOD-RHS) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-SOS) ; "max-sos") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-SOS) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-SOS) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::INV-CHECK-MAX-DEPTH) ; "inv-check-max-depth") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::INV-CHECK-MAX-DEPTH) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::INV-CHECK-MAX-DEPTH) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::CONTROL-MEMORY-POINT) ; "control-memory-point") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::CONTROL-MEMORY-POINT) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::CONTROL-MEMORY-POINT) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-NAME ; CHAOS::MAX-LITERALS) ; "max-literals") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MIN ; CHAOS::MAX-LITERALS) ; -1) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER-MAX ; CHAOS::MAX-LITERALS) ; MOST-POSITIVE-FIXNUM) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (AREF CHAOS::*PN-CONTROL-FLAGS* CHAOS::X) (CHAOS::MAKE-PIGNOSE-FLAG)) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::SOS-QUEUE) ; "sos-queue") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::SOS-STACK) ; "sos-stack") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::INPUT-SOS-FIRST) ; "input-sos-first") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-GIVEN) ; "print-given") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-LISTS-AT-END) ; "print-lists-at-end") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::BINARY-RES) ; "binary-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::HYPER-RES) ; "hyper-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::NEG-HYPER-RES) ; "neg-hyper-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::UR-RES) ; "ur-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-INTO) ; "para-into") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-FROM) ; "para-from") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEMOD-INF) ; "demod-inf") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-FROM-LEFT) ; "para-from-left") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-FROM-RIGHT) ; "para-from-right") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-INTO-LEFT) ; "para-into-left") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-INTO-RIGHT) ; "para-into-right") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-FROM-VARS) ; "para-from-vars") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-INTO-VARS) ; "para-into-vars") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-FROM-UNITS-ONLY) ; "para-from-units-only") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-INTO-UNITS-ONLY) ; "para-into-units-only") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-SKIP-SKOLEM) ; "para-skip-skolem") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-ONES-RULE) ; "para-ones-rules") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PARA-ALL) ; "para-all") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::UNIT-DELETION) ; "unit-deletion") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DELETE-IDENTICAL-NESTED-SKOLEM) ; "delete-identical-nested-skolem") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::SORT-LITERALS) ; "sort-literals") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::FOR-SUB) ; "for-sub") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::BACK-SUB) ; "back-sub") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::FACTOR) ; "factor") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::ORDER-EQ) ; "order-eq") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::EQ-UNITS-BOTH-WAYS) ; "eq-units-both-ways") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DYNAMIC-DEMOD) ; "dynamic-demod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DYNAMIC-DEMOD-ALL) ; "dynamic-demod-all") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DYNAMIC-DEMOD-LEX-DEP) ; "dynamic-demod-lex-dep") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::BACK-DEMOD) ; "back-demod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::KB) ; "kb") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::LRPO) ; "lrpo") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::LEX-ORDER-VARS) ; "lex-order-vars") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::SIMPLIFY-FOL) ; "simplify-fol") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::NEW-VARIABLE-NAME) ; "new-variable-name") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PROCESS-INPUT) ; "process-input") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::QUIET) ; "quiet") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::VERY-VERBOSE) ; "very-verbose") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-KEPT) ; "print-kept") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-PROOFS) ; "print-proofs") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-NEW-DEMOD) ; "print-new-demod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-BACK-DEMOD) ; "print-back-demod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-BACK-SUB) ; "print-back-sub") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::ORDER-HYPER) ; "order-hyper") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PROPOSITIONAL) ; "propositional") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::AUTO) ; "auto") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::HYPER-SYMMETRY-KLUDGE) ; "hyper-symmetry-kludge") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DISCARD-NON-ORIENTABLE-EQ) ; "discard-non-orientable-eq") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DISCARD-XX-RESOLVABLE) ; "discard-xx-resolvable") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::BACK-UNIT-DELETION) ; "back-unit-deletion") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::AUTO2) ; "auto2") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::AUTO1) ; "auto1") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::AUTO3) ; "auto3") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-INFER) ; "debug-infer") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-BINARY-RES) ; "debug-binary-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-HYPER-RES) ; "debug-hyper-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-NEG-HYPER-RES) ; "debug-neg-hyper-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-UR-RES) ; "debug-ur-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-PARA-FROM) ; "debug-para-from") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-PARA-INTO) ; "debug-para-into") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::UNIVERSAL-SYMMETRY) ; "universal-symmetry") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::CONTROL-MEMORY) ; "control-memory") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-STATS) ; "print-stats") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PRINT-MESSAGE) ; "print-message") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::UNIFY-HEAVY) ; "unify-heavy") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::TRACE-DEMOD) ; "trace-demod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-REFINE) ; "debug-refine") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::NO-DEMOD) ; "no-demod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::NO-BACK-DEMOD) ; "no-back-demod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::KB2) ; "kb2") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::NO-NEW-DEMOD) ; "no-new-demod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PROP-RES) ; "prop-res") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::NO-JUNK) ; "no-junk") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::NO-CONFUSION) ; "no-confusion") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::META-PARAMOD) ; "meta-paramod") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-HOOK ; CHAOS::META-PARAMOD) ; 'CHAOS::PN-SET-TF-FLAG) ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-INV-CHECK) ; "debug-inv-check") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DIST-CONST) ; "dist-const") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-DIST-CONST) ; "debug-dist-const") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::RANDOMIZE-SOS) ; "randomize-sos") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::DEBUG-SOS) ; "debug-sos") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::PUT-GOAL-IN-SOS) ; "put-goal-in-sos") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::CHECK-INIT-ALWAYS) ; "check-init-always") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG-NAME ; CHAOS::KB3) ; "kb3") ; --> LET* AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN RESET-PN-INTERNAL-FLAGS ; (SETF (AREF CHAOS::*PN-INTERNAL-FLAGS* CHAOS::X) NIL) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (*)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/glob-tmpDKBKLORG.fasl ; compilation finished in 0:00:00.420 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/proof-sys.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/proof-sys.lisp ; in: DEFUN UPDATE-MODULE-PROOF-SYSTEM ; (DEFUN CHAOS::UPDATE-MODULE-PROOF-SYSTEM (MOD &OPTIONAL CHAOS::DO-ANYWAY) ; (DECLARE (TYPE CHAOS::MODULE MOD)) ; (LET ((CHAOS::CLEAR-PASSIVE NIL)) ; (WHEN ; (CHAOS::NEED-REWRITING-PREPARATION ; MOD) ; (CHAOS::COMPILE-MODULE MOD) ; (SETQ CHAOS::CLEAR-PASSIVE T) ; (SETQ CHAOS::DO-ANYWAY T)) ; (UNLESS ; (CHAOS::MODULE-PROOF-SYSTEM ; MOD) ; (SETQ CHAOS::DO-ANYWAY T)) ; (LET ((CHAOS::PSYSTEM #)) ; (WHEN CHAOS::CLEAR-PASSIVE (SETF #)) ; (CHAOS::RESET-CLAUSE-DB CHAOS::PSYSTEM) ; (CHAOS::MODULE-AXIOMS->CLAUSE CHAOS::PSYSTEM) ; (CHAOS::PREPARE-FOR-PARSING MOD) ; CHAOS::PSYSTEM))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CHAOS::UPDATE-MODULE-PROOF-SYSTEM ; (MOD &OPTIONAL CHAOS::DO-ANYWAY) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (DECLARE (TYPE CHAOS::MODULE MOD)) ; (BLOCK CHAOS::UPDATE-MODULE-PROOF-SYSTEM ; (LET ((CHAOS::CLEAR-PASSIVE NIL)) ; (WHEN ; (CHAOS::NEED-REWRITING-PREPARATION ; MOD) ; (CHAOS::COMPILE-MODULE MOD) ; (SETQ #) ; (SETQ #)) ; (UNLESS ; (CHAOS::MODULE-PROOF-SYSTEM ; MOD) ; (SETQ #)) ; (LET (#) ; (WHEN CHAOS::CLEAR-PASSIVE #) ; (CHAOS::RESET-CLAUSE-DB CHAOS::PSYSTEM) ; (CHAOS::MODULE-AXIOMS->CLAUSE CHAOS::PSYSTEM) ; (CHAOS::PREPARE-FOR-PARSING MOD) ; CHAOS::PSYSTEM)))) ; ; caught STYLE-WARNING: ; The variable DO-ANYWAY is assigned but never read. ; (CHAOS::NEED-REWRITING-PREPARATION ; MOD) ; ; 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/proof-sys-tmpMO2T7PGC.fasl ; compilation finished in 0:00:00.028 WARNING: Lisp compilation had style-warnings while compiling # ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/syntax.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/syntax.lisp ; in: DEFUN CHECK-FOPL-SYNTAX-AUX ; (CHAOS::CHECK-VAR-DECL (CHAOS::VAR-DECL) ; (COND ; ((CHAOS::TERM-IS-VARIABLE? ; CHAOS::VAR-DECL) ; T) ; ((AND ; (CHAOS::TERM-IS-APPLICATION-FORM? ; CHAOS::VAR-DECL) ; (CHAOS::TERM-SUBTERMS ; CHAOS::VAR-DECL)) ; (LET (#) ; (OR # #))) ; (T ; (IF CHAOS::REPORT-ERROR ; (CHAOS::WITH-OUTPUT-CHAOS-ERROR ; # ; # ; #) ; NIL)))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/syntax-tmp5EVOKXWI.fasl ; compilation finished in 0:00:00.060 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/index.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/index.lisp ; in: DEFUN NLIST-PUSH ; (INCF (CAR CHAOS::NLIST)) ; ==> ; (+ 1 (CAR #:NLIST0)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN DTREE-INDEX ; (ASSOC ATOM (CHAOS::DTREE-ATOMS CHAOS::DTREE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (AND ATOM (NOT NULL)), not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN DTREE-FETCH ; (+ CHAOS::VAR-N-IN ; (CHAOS::NLIST-N ; CHAOS::VAR-NLIST)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (>= CHAOS::VAR-N CHAOS::BEST-N) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (+ CHAOS::VAR-N-IN ; (CHAOS::NLIST-N ; CHAOS::VAR-NLIST)) ; ; 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; in: DEFUN DTREE-ATOM-FETCH ; (ASSOC CHAOS::OP (CHAOS::DTREE-ATOMS CHAOS::DTREE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (INCF CHAOS::VAR-N ; (CHAOS::NLIST-N ; CHAOS::ATOM-NLIST)) ; --> THE ; ==> ; (+ ; (CHAOS::NLIST-N ; CHAOS::ATOM-NLIST) ; CHAOS::VAR-N) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; The second argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; The second argument is a NUMBER, not a RATIONAL. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a DOUBLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; The second argument is a NUMBER, not a REAL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a REAL. ; The second argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (< ; (INCF CHAOS::VAR-N ; (CHAOS::NLIST-N ; CHAOS::ATOM-NLIST)) ; CHAOS::BEST-N) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (INCF CHAOS::VAR-N ; (CHAOS::NLIST-N ; CHAOS::ATOM-NLIST)) ; --> THE ; ==> ; (+ ; (CHAOS::NLIST-N ; CHAOS::ATOM-NLIST) ; CHAOS::VAR-N) ; ; 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 NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT ; &OPTIONAL). ; etc. ; (< ; (INCF CHAOS::VAR-N ; (CHAOS::NLIST-N ; CHAOS::ATOM-NLIST)) ; CHAOS::BEST-N) ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; in: DEFUN DTREE-DELETE ; (DELETE CHAOS::VALUE (CDR CHAOS::NLIST) :COUNT 1 :TEST CHAOS::TEST) ; ; note: unable to ; convert to EQ test ; due to type uncertainty: ; The second argument is a SEQUENCE, not a LIST. ; (DECF (CAR CHAOS::NLIST)) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (ASSOC ATOM (CHAOS::DTREE-ATOMS CHAOS::DTREE)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a ATOM, not a (OR FIXNUM (NOT NUMBER)). ; (DECF (CAR CHAOS::NLIST)) ; --> 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 &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN INDEX-ALL-LITERALS ; (APPEND (CHAOS::CLAUSE-LITERALS CHAOS::CL) (CHAOS::CLAUSE-LITERALS CHAOS::C2)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (CHAOS::PN-FLAG ; CHAOS::BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN UN-INDEX-ALL-LITERALS ; (CHAOS::PN-FLAG ; CHAOS::BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN UN-INDEX-ALL-LITERALS-SLOW ; (CHAOS::PN-FLAG ; CHAOS::BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN INDEX-CLASH-LITERALS ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN UN-INDEX-CLASH-LITERALS ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN UN-INDEX-CLASH-LITERALS-SLOW ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN IS-PARAMOD-INSERT ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN IS-PARAMOD-DELETE ; (DELETE CHAOS::LITERAL CHAOS::ENT :TEST ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (EQ CHAOS::X (CHAOS::PARAMOD-LITERAL CHAOS::Y)))) ; ; note: unable to ; convert to EQ test ; due to type uncertainty: ; The second argument is a SEQUENCE, not a LIST. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (DELETE CHAOS::LITERAL CHAOS::ENT :TEST ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (EQ CHAOS::X (CHAOS::PARAMOD-LITERAL CHAOS::Y)))) ; ; note: unable to ; convert to EQ test ; due to type uncertainty: ; The second argument is a SEQUENCE, not a LIST. ; in: DEFUN IS-PARAMOD-FETCH-CONCAT ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN ADD-EQ-LITERAL ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-VARS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-SKIP-SKOLEM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN ADD-EQ-LITERAL-TO-TABLE ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-UNITS-ONLY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-LEFT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-RIGHT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN DELETE-EQ-LITERAL-FROM-TABLE ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-LEFT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-RIGHT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN DELETE-EQ-LITERAL-ATOM-FROM-TABLE ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/index-tmp7EN5VFOC.fasl ; compilation finished in 0:00:00.352 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/butils.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/butils.lisp ; in: DEFUN PN-MAKE-NEW-VARIABLE ; (CHAOS::PN-FLAG ; CHAOS::NEW-VARIABLE-NAME) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN ID-NESTED-SKOLEMS ; (RETURN-FROM CHAOS::ID-NESTED-SKOLEMS T) ; ; note: deleting unreachable code ; in: DEFUN INIT-PN-OPTIONS ; (SETF (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-LEFT) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-RIGHT) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-LEFT) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-RIGHT) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::FOR-SUB) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::BACK-SUB) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-KEPT) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-STATS) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-GIVEN) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-BACK-SUB) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-NEW-DEMOD) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-BACK-DEMOD) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::BACK-UNIT-DELETION) ; NIL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::SIMPLIFY-FOL) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-PROOFS) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::NEW-VARIABLE-NAME) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::ORDER-HYPER) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PUT-GOAL-IN-SOS) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::CHECK-INIT-ALWAYS) ; T) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::NO-JUNK) ; NIL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::NO-CONFUSION) ; NIL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::META-PARAMOD) ; NIL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::RANDOMIZE-SOS) ; NIL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::DEMOD-LIMIT) ; 1000) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-WEIGHT) ; MOST-POSITIVE-FIXNUM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-GIVEN) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-SOS) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-SECONDS) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::NEG-WEIGHT) ; 0) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-KEPT) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-GEN) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-LITERALS) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-PROOFS) ; 1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::STATS-LEVEL) ; 2) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::PICK-GIVEN-RATIO) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::CHANGE-LIMIT-AFTER) ; 0) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::NEW-MAX-WEIGHT) ; MOST-POSITIVE-FIXNUM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-ANSWERS) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::DYNAMIC-DEMOD-DEPTH) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::DYNAMIC-DEMOD-RHS) ; 1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::INV-CHECK-MAX-DEPTH) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::CONTROL-MEMORY-POINT) ; 20) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::X) ; -1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::X) ; NIL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN FIND-PN-FLAG-INDEX ; (CHAOS::PN-FLAG-NAME ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (STRING= CHAOS::NAME ; (CHAOS::PN-FLAG-NAME ; CHAOS::X)) ; ; 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. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN FIND-PN-PARAMETER-INDEX ; (CHAOS::PN-PARAMETER-NAME ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (STRING= CHAOS::NAME ; (CHAOS::PN-PARAMETER-NAME ; CHAOS::X)) ; ; 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. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN SAVE-PN-FLAGS ; (CHAOS::PN-FLAG ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN RESTORE-PN-FLAGS ; (SETF (CHAOS::PN-FLAG ; CHAOS::X) ; (AREF ARRAY CHAOS::X)) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN SAVE-PN-PARAMETERS ; (CHAOS::PN-PARAMETER ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN RESTORE-PN-PARAMETERS ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::X) ; (AREF ARRAY CHAOS::X)) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN FIND-OPTION-SET ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (STRING= CHAOS::NAME (CHAOS::OPTION-SET-NAME CHAOS::X))) ; CHAOS::*PN-OPTION-SET*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (STRING= CHAOS::NAME (CHAOS::OPTION-SET-NAME CHAOS::X)) ; ; 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. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN SAVE-OPTION-SET ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::QUIET) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN RESTORE-OPTION-SET ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PR-LIST-OF-FLAG ; (SORT CHAOS::FLAGS ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (DECLARE (TYPE FIXNUM CHAOS::X CHAOS::Y)) ; (STRING< ; (THE SIMPLE-STRING ; (CHAOS::PN-FLAG-NAME ; CHAOS::X)) ; (THE SIMPLE-STRING ; (CHAOS::PN-FLAG-NAME ; CHAOS::Y))))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (CHAOS::PN-FLAG-NAME ; CHAOS::FLAG) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::FLAG) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG-NAME ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG-NAME ; CHAOS::Y) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PR-LIST-OF-PARAM ; (SORT CHAOS::PARAMS ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (DECLARE (TYPE FIXNUM CHAOS::X CHAOS::Y)) ; (STRING< ; (THE SIMPLE-STRING ; (CHAOS::PN-PARAMETER-NAME ; CHAOS::X)) ; (THE SIMPLE-STRING ; (CHAOS::PN-PARAMETER-NAME ; CHAOS::Y))))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (CHAOS::PN-PARAMETER-NAME ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER-MIN ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER-MAX ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER-NAME ; CHAOS::X) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER-NAME ; CHAOS::Y) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN AUTO-CHANGE-FLAG ; (CHAOS::PN-FLAG ; CHAOS::INDEX) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG-NAME ; CHAOS::INDEX) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::INDEX) ; CHAOS::VALUE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN DEPENDENT-FLAGS ; (CHAOS::PN-FLAG ; CHAOS::INDEX) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN AUTO-CHANGE-PARAM ; (CHAOS::PN-PARAMETER ; CHAOS::INDEX) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER-NAME ; CHAOS::INDEX) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::INDEX) ; CHAOS::VALUE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN MOVE-FROM-USABLE-TO-SOS ; (FUNCALL CHAOS::PRED CHAOS::C) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PRED is not known to be a function ; in: DEFUN RESET-MEMORY-CONTROL ; (* 20 (THE FIXNUM (LENGTH CHAOS::*SOS*))) ; ; note: unable to ; recode as leas, shifts and adds ; due to type uncertainty: ; The result is a (VALUES (MOD 10737418161) &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE ; 32) ; &REST T). ; ; note: unable to ; recode as leas, shifts and adds ; due to type uncertainty: ; The result is a (VALUES (MOD 10737418161) &OPTIONAL), not a (VALUES FIXNUM ; &REST T). ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 3) because: ; The result is a (VALUES (MOD 10737418161) &OPTIONAL), not a (VALUES ; FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 4) because: ; The result is a (VALUES (MOD 10737418161) &OPTIONAL), not a (VALUES ; FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN PN-CONTROL-MEMORY ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-SOS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (= CHAOS::.NEXT-CONTROL-POINT. ; (CHAOS::PN-STAT ; CHAOS::CL-GIVEN)) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; (CHAOS::PN-PARAMETER ; CHAOS::CONTROL-MEMORY-POINT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (* CHAOS::N 20) ; ; note: unable to ; recode as leas, shifts and adds ; due to type uncertainty: ; The first argument is a FIXNUM, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES (INTEGER -10737418240 10737418220) ; &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 32) &REST T). ; ; note: unable to ; recode as leas, shifts and adds ; due to type uncertainty: ; The result is a (VALUES (INTEGER -10737418240 10737418220) ; &OPTIONAL), not a (VALUES FIXNUM &REST T). ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-WEIGHT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-WEIGHT) ; CHAOS::I) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (* CHAOS::N 20) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 3) because: ; The result is a (VALUES (INTEGER -10737418240 10737418220) &OPTIONAL), not a (VALUES ; FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 4) because: ; The result is a (VALUES (INTEGER -10737418240 10737418220) &OPTIONAL), not a (VALUES ; FIXNUM ; &OPTIONAL). ; etc. ; (<= (* CHAOS::N 20) CHAOS::SIZE) ; ; note: forced to do GENERIC-> (cost 10) ; unable to do inline fixnum comparison (cost 4) because: ; The first argument is a (INTEGER -10737418240 10737418220), not a FIXNUM. ; (SETQ CHAOS::.NEXT-CONTROL-POINT. ; (+ ; (CHAOS::PN-STAT ; CHAOS::CL-GIVEN) ; (CHAOS::PN-PARAMETER ; CHAOS::CONTROL-MEMORY-POINT))) ; ; note: doing signed word to integer coercion (cost 20), for: ; the second argument of SET ; in: DEFUN PN-RUN-TIME ; (CHAOS::CLOCK-STOP ; CHAOS::PN-GLOBAL-RUN-TIME) ; --> IF PROGN INCF LET* + ; ==> ; (- (GET-INTERNAL-REAL-TIME) (CHAOS::PN-CLOCK-CURR CHAOS::CLOCK)) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (UNSIGNED-BYTE 61), not a FIXNUM. ; The second argument is a INTEGER, not a FIXNUM. ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a (UNSIGNED-BYTE 61), not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; --> IF PROGN INCF LET* ; ==> ; (+ (- (GET-INTERNAL-REAL-TIME) (CHAOS::PN-CLOCK-CURR CHAOS::CLOCK)) ; (CHAOS::PN-CLOCK-ACCUM #:CLOCK0)) ; ; 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 ; &OPTIONAL). ; unable to do inline (unsigned-byte 32) arithmetic (cost 5) because: ; The first argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The second argument is a INTEGER, not a (UNSIGNED-BYTE 32). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES ; (UNSIGNED-BYTE 32) ; &OPTIONAL). ; etc. ; in: DEFUN CHECK-PN-STOP ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-GIVEN) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-GEN) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-SECONDS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-KEPT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (>= CHAOS::SECONDS (FLOAT CHAOS::MAX-SECONDS?)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; ; note: doing float to pointer coercion (cost 13) ; in: DEFUN CHECK-FOR-PROOF ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-PROOFS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-PROOFS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN REPORT-CLAUSE-SET-PROPS ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PN-AUTOMATIC-SETTINGS-1 ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PN-AUTOMATIC-SETTINGS-2 ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PN-AUTOMATIC-SETTINGS-3 ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PRINT-PN-STAT-DETAIL ; (CHAOS::PN-FLAG ; CHAOS::BINARY-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PROP-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NEG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NEG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::FACTOR) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEMOD-INF) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::UR-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::BACK-UNIT-DELETION) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN INFER-CLEAN-UP ; (CHAOS::PN-FLAG ; CHAOS::PRINT-LISTS-AT-END) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-STATS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::STATS-LEVEL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PRINT-PN-TIMES ; (CHAOS::PN-FLAG ; CHAOS::BINARY-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NEG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::BACK-UNIT-DELETION) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PRINT-PN-TIMES-BRIEF ; (CHAOS::PN-FLAG ; CHAOS::BINARY-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NEG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/butils-tmpWA664A3J.fasl ; compilation finished in 0:00:00.624 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/unify.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/unify.lisp ; in: DEFUN UNIFY ; (CHAOS::PN-FLAG ; CHAOS::UNIFY-HEAVY) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PN-MATCH ; (CHAOS::PN-FLAG ; CHAOS::UNIFY-HEAVY) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/unify-tmp3CS3QORN.fasl ; compilation finished in 0:00:00.056 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/clause.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/clause.lisp ; in: DEFUN COMPARE-LITERAL ; (CHAOS::PN-FLAG ; CHAOS::PROPOSITIONAL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN NEW-CLAUSE ; (INCF (CHAOS::PSYSTEM-CLAUSE-COUNTER CHAOS::PSYS)) ; ==> ; (+ 1 (SB-KERNEL:%INSTANCE-REF (THE CHAOS::PSYSTEM #:OBJ) 10)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; in: DEFUN CLAUSE-ALL-PARENTS ; (MEMBER CHAOS::PID CHAOS::SO-FAR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a INTEGER, not a (OR FIXNUM (NOT NUMBER)). ; (PUSHNEW CHAOS::PC CHAOS::PLIST) ; --> SETQ THE ADJOIN ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (NOT NULL), not a (OR FIXNUM (NOT NUMBER)). ; in: DEFUN UNIT-DELETION ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN FIND-LIGHTEST-CLAUSE ; (CHAOS::PN-FLAG ; CHAOS::RANDOMIZE-SOS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-SOS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN FIND-GIVEN-CLAUSE ; (CHAOS::PN-FLAG ; CHAOS::SOS-QUEUE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::SOS-STACK) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::PICK-GIVEN-RATIO) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN WEIGHT-CLAUSE ; (CHAOS::PN-PARAMETER ; CHAOS::NEG-WEIGHT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN MAP-REST ; (AREF CHAOS::.MAP-ARRAY. CHAOS::I) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; (SETF (AREF CHAOS::.MAP-ARRAY. CHAOS::I) T) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; (SETF (AREF CHAOS::.MAP-ARRAY. CHAOS::I) NIL) ; --> FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; due to type uncertainty: ; The first argument is a VECTOR, not a SIMPLE-ARRAY. ; in: DEFUN SUBSUME? ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN FORWARD-SUBSUME ; (CHAOS::PN-FLAG ; CHAOS::PROPOSITIONAL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::FACTOR) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN BACK-SUBSUME ; (CHAOS::PN-FLAG ; CHAOS::FACTOR) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN UNIT-CONFLICT ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-PROOFS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PN-DISTINCT-CONSTANTS ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-DIST-CONST) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/clause-tmpD6CVA6PG.fasl ; compilation finished in 0:00:00.248 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/formula.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/formula.lisp ; in: DEFUN PN-TERM-EQUATIONAL-EQUAL ; (CHAOS::E-EQUAL-IN-THEORY ; (CHAOS::METHOD-THEORY ; CHAOS::F1) ; CHAOS::T1 ; CHAOS::T2) ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN UNIQUE-ALL-VARIABLES ; (CHAOS::UNIQUE (CHAOS::F) (DECLARE (TYPE CHAOS::TERM CHAOS::F)) ; (LET ((TYPE (CHAOS::FOPL-SENTENCE-TYPE CHAOS::F))) ; (DECLARE (TYPE SYMBOL TYPE)) ; (WHEN CHAOS::*DEBUG-FORMULA* ; (FORMAT T "~%>[unique-all-variables]: ~a" TYPE) ; (CHAOS::TERM-PRINT CHAOS::F)) ; (CASE TYPE ; (:ATOM) ; ((:NOT :AND :OR :EQ :BEQ) (DOLIST # #)) ; (OTHERWISE ; (IF # ; # ; #) ; (CHAOS::UNIQUE #))) ; (WHEN CHAOS::*DEBUG-FORMULA* ; (FORMAT T "~%<[unique-var..]:") ; (CHAOS::TERM-PRINT CHAOS::F)))) ; ; note: Return type not fixed values, so can't use known return convention: ; * ; in: DEFUN CONJ-NORMAL-FORM ; (CHAOS::PN-FLAG ; CHAOS::SIMPLIFY-FOL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN DISTRIBUTE-OR ; (CHAOS::PN-FLAG ; CHAOS::SIMPLIFY-FOL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (FIND-IF #'(LAMBDA (CHAOS::X) (EQ :AND (CHAOS::FOPL-SENTENCE-TYPE CHAOS::X))) ; CHAOS::ARGS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (DELETE CHAOS::AND-FORM CHAOS::ARGS) ; ; note: unable to ; convert to EQ test ; due to type uncertainty: ; The second argument is a SEQUENCE, not a LIST. ; (CHAOS::PN-FLAG ; CHAOS::SIMPLIFY-FOL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN GEN-SUBSUME-PROP ; (1+ CHAOS::*DEBUG-SUBSUME-PROP-NEST*) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to ; associate +/(+ -) of constants ; due to type uncertainty: ; The first argument is a NUMBER, not a RATIONAL. ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/formula-tmpJTJ7UKVB.fasl ; compilation finished in 0:00:00.476 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/modconv.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/modconv.lisp ; in: DEFUN PN-SET-TF-FLAG ; (CHAOS::PN-FLAG ; CHAOS::META-PARAMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN MODULE-AXIOMS->CLAUSE ; (CHAOS::PN-FLAG ; CHAOS::NO-JUNK) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-CONFUSION) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/modconv-tmpI3M10D0B.fasl ; compilation finished in 0:00:00.216 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/weight.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/weight.lisp ; in: DEFUN MAKE-OP-PREC-RELATIONS ; (DELETE CHAOS::METH1 CHAOS::RHS-METHODS) ; ; note: unable to ; convert to EQ test ; due to type uncertainty: ; The second argument is a SEQUENCE, not a LIST. ; in: DEFUN DUMP-OP-LEX-TABLE ; (< (CDR CHAOS::X) (CDR CHAOS::Y)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; (SORT CHAOS::ENTRIES ; #'(LAMBDA (CHAOS::X CHAOS::Y) (< (CDR CHAOS::X) (CDR CHAOS::Y)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (< (CDR CHAOS::X) (CDR 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 SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; in: DEFUN OP-LEX-COMPARE ; (STRING= CHAOS::N1 CHAOS::N2) ; ; 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. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN ORDER-LEX-OP ; (STRING= CHAOS::N1 CHAOS::N2) ; ; 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. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; The second argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN MAKE-LEXICAL-PREC-TABLE ; (SORT CHAOS::MLIST #'CHAOS::ORDER-LEX-OP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; in: DEFUN TERM-LEX-ORDER-VARS ; (< CHAOS::VN2 CHAOS::VN1) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; The second argument is a REAL, not a RATIONAL. ; ; note: forced to do GENERIC-< (cost 10) ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; The second argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float comparison (cost 3) because: ; The first argument is a REAL, not a DOUBLE-FLOAT. ; The second argument is a REAL, not a DOUBLE-FLOAT. ; etc. ; in: DEFUN LEX-CHECK ; (CHAOS::PN-FLAG ; CHAOS::LEX-ORDER-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/weight-tmpMQ8L07M8.fasl ; compilation finished in 0:00:00.248 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/lrpo.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/lrpo.lisp ; in: DEFUN PN-ORIENT-TERM-PAIR ; (CHAOS::PN-FLAG ; CHAOS::LRPO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/lrpo-tmp9HFLKKLP.fasl ; compilation finished in 0:00:00.048 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/resolve.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/resolve.lisp ; in: DEFUN BUILD-HYPER ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN CLASH-ONE ; (FUNCALL CHAOS::CLAUSE-PRED CHAOS::CLASH-CLAUSE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; CLAUSE-PRED is not known to be a function ; (CHAOS::PN-FLAG ; CHAOS::ORDER-HYPER) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN HYPER-CLASH! ; (LET ((CHAOS::CLASHES NIL) ; (CHAOS::LIST-RESOLVENT NIL) ; (CHAOS::BACKUP NIL) ; (CHAOS::C-END NIL)) ; (DECLARE (TYPE (OR NULL CHAOS::CLASH) CHAOS::CLASHES) ; (TYPE LIST CHAOS::LIST-RESOLVENT) ; (TYPE (OR NULL CHAOS::CLASH) CHAOS::C-END)) ; (LOOP ; (IF (NOT CHAOS::BACKUP) ; (IF (OR # #) ; (LET # ; # ; # ; # ; # ; # ; # ; #) ; (PROGN # # #)) ; (IF (OR # #) ; (RETURN-FROM CHAOS::HYPER-CLASH! CHAOS::LIST-RESOLVENT) ; (PROGN # # #))) ; (UNLESS CHAOS::BACKUP ; (IF (CHAOS::CLASH-EVALUABLE CHAOS::CLASHES) ; (IF # ; # ; #) ; (UNLESS # #)))) ; CHAOS::LIST-RESOLVENT) ; ; note: deleting unreachable code ; in: DEFUN HYPER-RESOLUTION ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::ORDER-HYPER) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN NEG-HYPER-RESOLUTION ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::ORDER-HYPER) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN UR-RESOLUTION ; (INCF CHAOS::J) ; --> THE ; ==> ; (+ 1 CHAOS::J) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER 1), not a FIXNUM. ; The result is a (VALUES (INTEGER 2) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN BINARY-RESOLUTION ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-BINARY-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN NEXT-FACTOR ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/resolve-tmpEHVBI5QP.fasl ; compilation finished in 0:00:00.176 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/paramod.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/paramod.lisp ; in: DEFUN APPLY-SUBST-2 ; (INCF CHAOS::POS) ; --> THE ; ==> ; (+ 1 CHAOS::POS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN BUILD-BIN-PARA ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PARA-INTO-TERMS-ALPHA ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-LEFT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-RIGHT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PARA-FROM-ALPHA ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-UNITS-ONLY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PARAMODULATION-FROM ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-UNITS-ONLY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-LEFT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-RIGHT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-VARS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PARA-INTO-TERMS ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-LEFT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-RIGHT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PARAMODULATION-INTO ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-UNITS-ONLY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/paramod-tmp7ACGYN6Z.fasl ; compilation finished in 0:00:00.104 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/demod.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/demod.lisp ; in: DEFUN DYNAMIC-DEMODULATOR ; (CHAOS::PN-FLAG ; CHAOS::LRPO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DYNAMIC-DEMOD-ALL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::DYNAMIC-DEMOD-RHS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::DYNAMIC-DEMOD-DEPTH) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DYNAMIC-DEMOD-LEX-DEP) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::LRPO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DYNAMIC-DEMOD-ALL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN DEMOD-REPLACE-TERM ; (CHAOS::PN-PARAMETER ; CHAOS::DEMOD-LIMIT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::TRACE-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN APPLY-ONE-DEMODULATOR* ; (CHAOS::DEMOD-REPLACE-TERM CHAOS::TERM CHAOS::CONTR) ; --> BLOCK WHEN IF <= CHAOS::PN-PARAMETER CHAOS::PN-PARAM-VALUE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; --> BLOCK WHEN IF CHAOS::PN-FLAG CHAOS::PIGNOSE-FLAG-VALUE AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::LRPO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN DEMOD-METHOD-REWRITE-STRATEGY ; (AREF CHAOS::.DEMOD-STRAT. CHAOS::NUM-ARGS) ; ; 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. ; in: DEFUN BACK-DEMODULATE ; (CHAOS::PN-FLAG ; CHAOS::QUIET) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/demod-tmpROQG4ZG5.fasl ; compilation finished in 0:00:00.144 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/infer.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/infer.lisp ; in: DEFUN INFER-MAIN ; (CHAOS::PN-FLAG ; CHAOS::AUTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO2) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO3) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-GIVEN) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::CHANGE-LIMIT-AFTER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::NEW-MAX-WEIGHT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-WEIGHT) ; CHAOS::NEW-LIMIT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-STATS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN INFER ; (CHAOS::PN-FLAG ; CHAOS::CONTROL-MEMORY) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::BINARY-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PROP-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NEG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NEG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::UR-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEMOD-INF) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN POST-PROCESS ; (CHAOS::PN-FLAG ; CHAOS::EQ-UNITS-BOTH-WAYS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::ORDER-EQ) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-NEW-DEMOD) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::QUIET) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::BACK-SUB) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::QUIET) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-BACK-SUB) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::FACTOR) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::BACK-UNIT-DELETION) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::QUIET) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-BACK-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN POST-PROC-ALL ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PRE-PROCESS ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::QUIET) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-KEPT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NO-NEW-DEMOD) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DYNAMIC-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEMOD-INF) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::QUIET) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-NEW-DEMOD) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-PROOFS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-STATS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PROC-GEN ; (CHAOS::PN-FLAG ; CHAOS::VERY-VERBOSE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DIST-CONST) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::ORDER-EQ) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::LRPO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DISCARD-NON-ORIENTABLE-EQ) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::UNIT-DELETION) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::FACTOR) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-LITERALS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DISCARD-XX-RESOLVABLE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-WEIGHT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::VERY-VERBOSE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DELETE-IDENTICAL-NESTED-SKOLEM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::SORT-LITERALS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::ORDER-EQ) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::FOR-SUB) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::VERY-VERBOSE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::QUIET) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INFER) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PREPARE-INFERENCE ; (CHAOS::PN-FLAG ; CHAOS::UNIVERSAL-SYMMETRY) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO2) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO3) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO2) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO3) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO2) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO3) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PROCESS-INPUT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-LISTS-AT-END) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-LISTS-AT-END) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-LISTS-AT-END) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::INPUT-SOS-FIRST) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (1- (CHAOS::NEXT-CLAUSE-NUM)) ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code float conversion in mixed numeric operation ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a NUMBER, not a FIXNUM. ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; etc. ; in: DEFUN CHECK-PN-OPTIONS ; (CHAOS::PN-FLAG ; CHAOS::BINARY-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NEG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::UR-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEMOD-INF) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-RIGHT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM-LEFT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-RIGHT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO-LEFT) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-ONES-RULE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::KB) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::KB2) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::KB3) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::LRPO) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::DEMOD-LIMIT) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-LITERALS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::MAX-PROOFS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER ; CHAOS::PICK-GIVEN-RATIO) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::SOS-STACK) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::SOS-QUEUE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::SOS-STACK) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::SOS-QUEUE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/infer-tmpL8QH2EDP.fasl ; compilation finished in 0:00:00.180 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/sigmatch.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/sigmatch.lisp ; in: DEFUN MAKE-SIGMATCH-OP-PAT ; (FIND-IF ; #'(LAMBDA (CHAOS::X) ; (LET ((CHAOS::TSORT #)) ; (EQ ; (CHAOS::SORT-NAME ; CHAOS::TSORT) ; (CHAOS::SORT-NAME ; #)))) ; CHAOS::VM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; (RASSOC SORT CHAOS::SAL) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/sigmatch-tmpGMP33JVN.fasl ; compilation finished in 0:00:00.064 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/refine.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/refine.lisp ; in: DEFUN CHECK-REFINE ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-REFINE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; NIL) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-PROOFS) ; 1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/refine-tmpYZLZO5XO.fasl ; compilation finished in 0:00:00.024 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/commands.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/commands.lisp ; in: DEFUN PIGNOSE-PROCESS-FAX-PROC ; (STRING (SECOND CHAOS::LHS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (CHAR (FIRST CHAOS::INPUT) 0) ; ; 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. ; in: DEFUN PIGNOSE-PROCESS-GOAL-PROC ; (STRING (SECOND CHAOS::LHS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; (CHAR (FIRST CHAOS::INPUT) 0) ; ; 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. ; in: DEFUN PIGNOSE-PARSE-SOS ; (CHAOS::CASE-EQUAL ; (THE SIMPLE-STRING (SECOND CHAOS::PRE-ARGS)) ; ("=" (SETQ CHAOS::OP :SET)) ; ("+" (SETQ CHAOS::OP :ADD)) ; ("-" (SETQ CHAOS::OP :DELETE)) ; (T ; (CHAOS::WITH-OUTPUT-CHAOS-ERROR ; ('CHAOS::INTERNAL) ; (FORMAT T "sos op given ivalid op ~a" (SECOND CHAOS::PRE-ARGS))))) ; --> IF EQUAL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; --> IF IF EQUAL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; --> IF IF IF EQUAL ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SIMPLE-STRING, not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN EVAL-FAX ; (CHAOS::SET-NEEDS-RULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; in: DEFUN EVAL-SOS ; (APPEND (CHAOS::PSYSTEM-PASSIVE CHAOS::PSYS) (CHAOS::PSYSTEM-SOS CHAOS::PSYS)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (SORT (CHAOS::PSYSTEM-SOS CHAOS::PSYS) ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (< (CHAOS::CLAUSE-ID CHAOS::X) (CHAOS::CLAUSE-ID CHAOS::Y)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (SORT (CHAOS::PSYSTEM-USABLE CHAOS::PSYS) ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (< (CHAOS::CLAUSE-ID CHAOS::X) (CHAOS::CLAUSE-ID CHAOS::Y)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (SORT (CHAOS::PSYSTEM-PASSIVE CHAOS::PSYS) ; #'(LAMBDA (CHAOS::X CHAOS::Y) ; (< (CHAOS::CLAUSE-ID CHAOS::X) (CHAOS::CLAUSE-ID CHAOS::Y)))) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; in: DEFUN DO-RESOLVE ; (CHAOS::PN-FLAG ; CHAOS::PRINT-STATS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN EVAL-PN-SET-FLAG ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-FLAG ; CHAOS::INDEX) ; CHAOS::VALUE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG-HOOK ; CHAOS::INDEX) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (FUNCALL ; (CHAOS::PN-FLAG-HOOK ; CHAOS::INDEX) ; CHAOS::VALUE) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; callable expression is not known to be a function ; in: DEFUN EVAL-PN-ASSIGN ; (CHAOS::PN-PARAMETER-MIN ; CHAOS::INDEX) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-PARAMETER-MAX ; CHAOS::INDEX) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PRINT-MESSAGE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::INDEX) ; CHAOS::VALUE) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (< CHAOS::VALUE MIN) ; ; 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. ; (> CHAOS::VALUE MAX) ; ; 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. ; in: DEFUN PERFORM-DEMODULATION* ; (ZEROP CHAOS::*TERM-MEMO-HASH-HIT*) ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a FLOAT. ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a NUMBER, not a (OR (COMPLEX SINGLE-FLOAT) ; (COMPLEX DOUBLE-FLOAT)). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: unable to open code because: The operands might not be the same type. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/commands-tmpHJEGXRNO.fasl ; compilation finished in 0:00:00.512 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/inv.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/BigPink/codes/inv.lisp ; in: DEFUN MAKE-INV-CHECK-CONTEXT ; (CHAOS::PN-FLAG ; CHAOS::DEBUG-INV-CHECK) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN MAKE-PN-INV-CHECK-PAT ; (FORMAT CHAOS::PRINT-MSG "~%~a: " MAKE-CONDITION) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (MEMBER T) STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (MEMBER T) STREAM), not a (MEMBER T). ; (FORMAT CHAOS::PRINT-MSG "~%goal: ") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (MEMBER T) STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR (MEMBER T) STREAM), not a (MEMBER T). ; in: DEFUN SETUP-INV-CHECK-DB ; (CHAOS::PN-FLAG ; CHAOS::AUTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO2) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO3) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN PERFORM-INV-CHECK ; (APPEND CHAOS::CONDITIONS CHAOS::ADDITIONAL-CONDS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (CHAOS::SET-NEEDS-RULE) ; --> SETF LET SB-KERNEL:THE* MIN ; ==> ; 1 ; ; note: unable to ; open-code FLOAT to RATIONAL comparison ; due to type uncertainty: ; The first argument is a REAL, not a FLOAT. ; (CHAOS::PN-FLAG ; CHAOS::AUTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO2) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::AUTO3) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::BINARY-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::NEG-HYPER-RES) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-FROM) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::PARA-INTO) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::DEMOD-INF) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (SETF (CHAOS::PN-PARAMETER ; CHAOS::MAX-PROOFS) ; 1) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; in: DEFUN DO-INVARIANCE-CHECK ; (CHAOS::PN-PARAMETER ; CHAOS::INV-CHECK-MAX-DEPTH) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (30)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (CHAOS::PN-FLAG ; CHAOS::CHECK-INIT-ALWAYS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; (INCF CHAOS::LOOPS) ; --> THE ; ==> ; (+ 1 CHAOS::LOOPS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a (INTEGER -1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a (INTEGER -1), not a FIXNUM. ; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; (INCF CHAOS::NUM) ; --> THE ; ==> ; (+ 1 CHAOS::NUM) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; in: DEFUN PN-CHECK-INVARIANCE ; (CHAOS::PN-FLAG ; CHAOS::PRINT-STATS) ; --> AREF ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (SIMPLE-ARRAY * (100)), not a SIMPLE-STRING. ; ; note: unable to ; avoid runtime dispatch on array element type ; because: ; Upgraded element type of array is not known at compile time. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/BigPink/codes/inv-tmpLNAWKPET.fasl ; compilation finished in 0:00:00.188 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/cafeobjvar.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/cafeobjvar-tmpJAVYBOA5.fasl ; compilation finished in 0:00:00.004 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/creader.lisp" (written 16 DEC 2019 07:35:07 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/creader-tmp4JWQGV5Z.fasl ; compilation finished in 0:00:00.028 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/oldoc.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cafeobj/oldoc.lisp ; in: DEFUN PRINT-ONLINE-DOCUMENT ; (FORMAT STREAM "~%*** key : ~a" (CHAOS::OLDOC-KEY CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&red-title : ~a" (CHAOS::OLDOC-RTITLE CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&title : ~a" (CHAOS::OLDOC-TITLE CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&mdkey : ~a" (CHAOS::OLDOC-MDKEY CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&main : ~a" (CHAOS::OLDOC-MAIN CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&example : ~a" (CHAOS::OLDOC-EXAMPLE CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&names : ~a" (CHAOS::OLDOC-NAMES CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&related : ~a" (CHAOS::OLDOC-RELATED CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&cache : ~a" (CHAOS::OLDOC-CACHE CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~&cateogry : ~a" (CHAOS::OLDOC-CATEGORY CHAOS::DOC)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN OLDOC-FIND-DOC-ENTRY ; (LENGTH CHAOS::REDSS) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (LENGTH CHAOS::N) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; (SUBSEQ CHAOS::N 0 CHAOS::REDSSLEN) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE. ; in: DEFUN OLDOC-PARSE-TO-WORDS ; (STRING-TRIM "\"'" CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING SYMBOL CHARACTER), not a SIMPLE-STRING. ; in: DEFUN OLDOC-SEARCH-ALL ; (SEARCH CHAOS::X CHAOS::Y) ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; The second argument is a SEQUENCE, not a VECTOR. ; ; note: unable to ; open code ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; The second argument is a SEQUENCE, not a VECTOR. ; (APPLY CHAOS::X (LIST CHAOS::FULLSS)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; X is not known to be a function ; in: DEFUN FORMAT-MARKDOWN ; (FUNCALL CHAOS::.MD-REPLACE-BQ. ; (FUNCALL CHAOS::.MD-REPLACE-TILDE. ; (FUNCALL CHAOS::.MD-REMOVE-CODE-SIGN. ; (FUNCALL CHAOS::.MD-REMOVE-LINK2. ; (FUNCALL CHAOS::.MD-REMOVE-LINK. #))))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REPLACE-BQ. is not known to be a function ; (FUNCALL CHAOS::.MD-REPLACE-TILDE. ; (FUNCALL CHAOS::.MD-REMOVE-CODE-SIGN. ; (FUNCALL CHAOS::.MD-REMOVE-LINK2. ; (FUNCALL CHAOS::.MD-REMOVE-LINK. ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. ; CHAOS::STR))))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REPLACE-TILDE. is not known to be a function ; (FUNCALL CHAOS::.MD-REMOVE-CODE-SIGN. ; (FUNCALL CHAOS::.MD-REMOVE-LINK2. ; (FUNCALL CHAOS::.MD-REMOVE-LINK. ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. ; CHAOS::STR)))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REMOVE-CODE-SIGN. is not known to be a function ; (FUNCALL CHAOS::.MD-REMOVE-LINK2. ; (FUNCALL CHAOS::.MD-REMOVE-LINK. ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. CHAOS::STR))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REMOVE-LINK2. is not known to be a function ; (FUNCALL CHAOS::.MD-REMOVE-LINK. ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. CHAOS::STR)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REMOVE-LINK. is not known to be a function ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. CHAOS::STR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REMOVE-HASH-HASH. is not known to be a function ; in: DEFUN OLDOC-REDUCE-STRING ; (FUNCALL CHAOS::.MD-REMOVE-BQ. ; (FUNCALL CHAOS::.MD-REMOVE-LINK2. ; (FUNCALL CHAOS::.MD-REMOVE-LINK. ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. ; CHAOS::STR)))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REMOVE-BQ. is not known to be a function ; (FUNCALL CHAOS::.MD-REMOVE-LINK2. ; (FUNCALL CHAOS::.MD-REMOVE-LINK. ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. CHAOS::STR))) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REMOVE-LINK2. is not known to be a function ; (FUNCALL CHAOS::.MD-REMOVE-LINK. ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. CHAOS::STR)) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REMOVE-LINK. is not known to be a function ; (FUNCALL CHAOS::.MD-REMOVE-HASH-HASH. CHAOS::STR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .MD-REMOVE-HASH-HASH. is not known to be a function ; in: DEFUN EXPORT-REFMAN ; (SORT CHAOS::DATA #'CHAOS::REFMAN-SORT :KEY #'CAR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (FORMAT CHAOS::OUT "~a" (CDR CHAOS::D)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STREAM NULL), not a NULL. ; in: DEFUN SHOW-UNDOCUMENTED ; (SORT CHAOS::DOCS #'STRING<= :KEY #'CHAOS::OLDOC-KEY) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; (FUNCALL CHAOS::.TODO. CHAOS::STR) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; .TODO. is not known to be a function ; in: DEFUN OLDOC-LIST-CATEGORIES ; (1+ CHAOS::N) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM ; &OPTIONAL). ; etc. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/oldoc-tmpPQD2HT0O.fasl ; compilation finished in 0:00:00.292 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/define.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cafeobj/define.lisp ; in: DEFUN PRINT-COMDE ; (FORMAT STREAM "~%** key : ~a" (CHAOS::COMDE-KEY CHAOS::ME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~% type : ~a" (CHAOS::COMDE-TYPE CHAOS::ME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~% category : ~a" (CHAOS::COMDE-CATEGORY CHAOS::ME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~% parser : ~a" (CHAOS::COMDE-PARSER CHAOS::ME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; (FORMAT STREAM "~% evaluator : ~a" (CHAOS::COMDE-EVALUATOR CHAOS::ME)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T). ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL. ; in: DEFUN SHOW-TOP-ENTRIES ; (SORT CHAOS::KEYS #'STRING<=) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; in: DEFUN SHOW-DECL-ENTRIES ; (SORT CHAOS::KEYS #'STRING<=) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a LIST. ; in: DEFMACRO DEFINE ; (MEMBER CHAOS::CATEGORY CHAOS::.VALID-COM-CATEGORIES.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (MEMBER CHAOS::CATEGORY CHAOS::.VALID-DECL-CATEGORIES.) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a T, not a (OR FIXNUM (NOT NUMBER)). ; (FBOUNDP CHAOS::PARSER) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS SYMBOL), not a SYMBOL. ; (FBOUNDP CHAOS::EVALUATOR) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR CONS SYMBOL), not a SYMBOL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/define-tmpH1FK4I19.fasl ; compilation finished in 0:00:00.072 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-com.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-com.lisp ; in: DEFUN PARSE-IN-CONTEXT-MODEXP-WITH-TERM ; (LENGTH CHAOS::E) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN PARSE-PUSHD-COMMAND ; (LENGTH CHAOS::INP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN PARSE-POPD-COMMAND ; (LENGTH CHAOS::INP) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a SEQUENCE, not a VECTOR. ; in: DEFUN PARSE-CONTINUE-COMMAND ; (> CHAOS::NUM 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-com-tmpOGMGFZE8.fasl ; compilation finished in 0:00:00.096 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-decl.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-decl.lisp ; in: DEFUN PROCESS-IMPORTATION-FORM ; (FIND-IF #'(LAMBDA (CHAOS::X) (OR (EQL CHAOS::X #\.) (EQL CHAOS::X #\@))) ; CHAOS::PARAM) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a SEQUENCE, not a (OR LIST VECTOR). ; in: DEFUN PROCESS-SORT-AND-SUBSORT-FORM ; (APPEND CHAOS::FORM '(:<)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (APPEND CHAOS::FORM (LIST CHAOS::X)) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PROCESS-AXIOM-FORM ; (STRING CHAOS::X) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; in: DEFUN PARSE-MODULE-ELEMENTS ; (APPEND CHAOS::SIG CHAOS::AX) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; in: DEFUN PARSE-MODULE-ELEMENT ; (FUNCALL CHAOS::PARSER CHAOS::E) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PARSER is not known to be a function ; in: DEFUN PROCESS-VIEW-DECLARATION-FORM ; `("view" "from" ,(NTH 3 CHAOS::VIEW-FRAG) "to" ,(NTH 1 CHAOS::VIEW-FRAG) ; ,@(CDDDDR CHAOS::VIEW-FRAG) "}") ; --> SB-IMPL::|Append| ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; `("view" ,@CHAOS::VIEW-FRAG "}") ; --> SB-IMPL::|Append| ; ==> ; 1 ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-decl-tmpP2P3SY1J.fasl ; compilation finished in 0:00:00.148 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-form.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-form.lisp ; in: DEFUN CAFEOBJ->CHAOS ; (FORMAT CHAOS::PORT ; "~&;;; this file is generated by CafeOBJ to Chaos converter version 1.2") ; ; 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. ; (FORMAT CHAOS::PORT "~&;;; creation date = ~a" (CHAOS::GET-TIME-STRING)) ; ; 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. ; (FORMAT CHAOS::PORT "~%;;; source file = ~a" CHAOS::IN-FILE) ; ; 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. ; (FORMAT CHAOS::PORT "~&(in-package :chaos)~%") ; ; 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. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/trans-form-tmpH6YIZTI1.fasl ; compilation finished in 0:00:00.020 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/command-top.lisp" (written 15 NOV 2018 12:48:55 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cafeobj/command-top.lisp ; in: DEFUN CAFEOBJ-PROCESS-ARGS ; (APPEND (NREVERSE CHAOS::LPATHS) CHAOS::*CHAOS-LIBPATH*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (SETQ CHAOS::*CAFEOBJ-LOAD-INIT-FILE* T) ; (SETQ CHAOS::*CAFEOBJ-INITIAL-LOAD-FILES* NIL) ; (SETQ CHAOS::*CAFEOBJ-INITIAL-PRELUDE-FILE* NIL) ; (LET* ((CHAOS::ARGS (CHAOS::GET-ARG-STRING)) ; (CHAOS::ARGC (LENGTH CHAOS::ARGS))) ; (DECLARE (TYPE LIST CHAOS::ARGS)) ; (WHEN (< 0 CHAOS::ARGC) ; (LET (#) ; (CHAOS::WHILE ; # ; #)))) ; (LET ((CHAOS::*CHAOS-QUIET* T)) ; (WHEN ; (AND CHAOS::*CAFEOBJ-BATCH* ; (NULL CHAOS::*CAFEOBJ-INITIAL-LOAD-FILES*)) ; (RETURN-FROM CHAOS::CAFEOBJ-PROCESS-ARGS NIL)) ; (IF CHAOS::*CAFEOBJ-INITIAL-PRELUDE-FILE* ; (PROGN (FORMAT T "~%-- loading prelude") (SETQ #)) ; (UNLESS CHAOS::*CAFEOBJ-STANDARD-PRELUDE-PATH* ; (FORMAT T "~%-- loading standard prelude") ; (SETQ #))) ; (WHEN CHAOS::*CAFEOBJ-SECONDARY-PRELUDE-FILE* ; (FORMAT T "~%-- appending prelude") ; (SETQ CHAOS::*CAFEOBJ-SECONDARY-PRELUDE-PATH* #)) ; (CHAOS::LOAD-PRELUDE "site-init" 'CHAOS::PROCESS-CAFEOBJ-INPUT T))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; (CHAOS::WITH-CHAOS-TOP-ERROR ; NIL ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (SETQ CHAOS::*CAFEOBJ-LOAD-INIT-FILE* T) ; (SETQ CHAOS::*CAFEOBJ-INITIAL-LOAD-FILES* NIL) ; (SETQ CHAOS::*CAFEOBJ-INITIAL-PRELUDE-FILE* NIL) ; (LET* ((CHAOS::ARGS #) (CHAOS::ARGC #)) ; (DECLARE (TYPE LIST CHAOS::ARGS)) ; (WHEN (< 0 CHAOS::ARGC) ; (LET # ; #))) ; (LET ((CHAOS::*CHAOS-QUIET* T)) ; (WHEN (AND CHAOS::*CAFEOBJ-BATCH* #) ; (RETURN-FROM CHAOS::CAFEOBJ-PROCESS-ARGS NIL)) ; (IF CHAOS::*CAFEOBJ-INITIAL-PRELUDE-FILE* ; (PROGN # #) ; (UNLESS CHAOS::*CAFEOBJ-STANDARD-PRELUDE-PATH* # #)) ; (WHEN CHAOS::*CAFEOBJ-SECONDARY-PRELUDE-FILE* ; (FORMAT T "~%-- appending prelude") ; (SETQ #)) ; (CHAOS::LOAD-PRELUDE "site-init" 'CHAOS::PROCESS-CAFEOBJ-INPUT T)))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN CAFEOBJ-WHAT-IS ; (FORMAT T CHAOS::DESCRIPTION) ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING FUNCTION), not a SIMPLE-STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The second argument is a (OR STRING FUNCTION), not a FUNCTION. ; in: DEFUN GET-COMMAND-DESCRIPTION ; (STRING= CHAOS::LEVEL "??") ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING. ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY ; CHARACTER (*)). ; in: DEFUN CAFEOBJ-INPUT ; (CHAOS::WITH-CHAOS-TOP-ERROR ; NIL ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (IF CHAOS::*CAFEOBJ-BATCH* ; (LET (#) ; (CHAOS::CHAOS-INPUT-FILE :FILE CHAOS::F :PROC CHAOS::PROC ; :LOAD-PATH CHAOS::LOAD-PATH :SUFFIX '#)) ; (CHAOS::CHAOS-INPUT-FILE :FILE CHAOS::F :PROC CHAOS::PROC :LOAD-PATH ; CHAOS::LOAD-PATH :SUFFIX ; '(".cafe" ".mod"))))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (IF CHAOS::*CAFEOBJ-BATCH* ; (LET ((*PRINT-CASE* :DOWNCASE)) ; (CHAOS::CHAOS-INPUT-FILE :FILE CHAOS::F :PROC CHAOS::PROC :LOAD-PATH ; CHAOS::LOAD-PATH :SUFFIX '(".cafe" ".mod"))) ; (CHAOS::CHAOS-INPUT-FILE :FILE CHAOS::F :PROC CHAOS::PROC :LOAD-PATH ; CHAOS::LOAD-PATH :SUFFIX '(".cafe" ".mod")))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN CAFEOBJ-PROBE-FILE ; (<= (FILE-WRITE-DATE CHAOS::SRC) (FILE-WRITE-DATE CHAOS::BIN)) ; ; 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. ; in: DEFUN CAFEOBJ-EVALUATE-COMMAND ; (FUNCALL CHAOS::PARSER CHAOS::INP) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; PARSER is not known to be a function ; (FUNCALL CHAOS::EVALUATOR CHAOS::PFORM) ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; EVALUATOR is not known to be a function ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/command-top-tmpSJEPG7AU.fasl ; compilation finished in 0:00:00.188 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/commands.lisp" (written 20 JAN 2020 04:55:35 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/commands-tmpSNZATJRM.fasl ; compilation finished in 0:00:00.272 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/declarations.lisp" (written 15 NOV 2018 12:48:55 AM): ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/declarations-tmpK93FRK93.fasl ; compilation finished in 0:00:00.052 ; compiling file "/build/reproducible-path/cafeobj-1.6.0/cafeobj/cafeobj-top.lisp" (written 17 JAN 2019 06:56:23 AM): ; file: /build/reproducible-path/cafeobj-1.6.0/cafeobj/cafeobj-top.lisp ; in: DEFUN PROCESS-INIT-FILES-HANDLING-EXCEPTIONS ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (CHAOS::CAFEOBJ-INIT-FILES) ; (DOLIST (CHAOS::F (REVERSE CHAOS::*CAFEOBJ-INITIAL-LOAD-FILES*)) ; (CHAOS::CAFEOBJ-INPUT CHAOS::F))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; (CHAOS::WITH-CHAOS-TOP-ERROR ; NIL ; (CHAOS::WITH-CHAOS-ERROR ; NIL ; (CHAOS::CAFEOBJ-INIT-FILES) ; (DOLIST (CHAOS::F (REVERSE CHAOS::*CAFEOBJ-INITIAL-LOAD-FILES*)) ; (CHAOS::CAFEOBJ-INPUT CHAOS::F)))) ; --> LET IF LET IF FUNCALL ; ==> ; 1 ; ; note: unable to ; optimize away possible call to FDEFINITION at runtime ; because: ; STD-PROC is not known to be a function ; in: DEFUN CAFEOBJ-INIT-FILES ; (APPEND (NREVERSE CHAOS::LOAD-PATH) CHAOS::*CHAOS-LIBPATH*) ; ; note: unable to ; optimize ; due to type uncertainty: ; The first argument is a LIST, not a NULL. ; wrote /build/reproducible-path/cafeobj-1.6.0/tmpcache/common-lisp/sbcl-2.3.7.debian-linux-x86/build/reproducible-path/cafeobj-1.6.0/cafeobj/cafeobj-top-tmpUIQ1NDZ1.fasl ; compilation finished in 0:00:00.052 ; file: /build/reproducible-path/cafeobj-1.6.0/thstuff/cexec.lisp ; in: DEFUN CHAOS::TERM-HASH-COMB ; (LOGAND CHAOS::TERM-HASH-MASK ; (LOGAND CHAOS::TERM-HASH-MASK (+ CHAOS::X CHAOS::Y))) ; ; caught WARNING: ; undefined variable: CHAOS::TERM-HASH-MASK ; in: DEFUN CHAOS::TERM-HASH-EQ ; (LOGAND CHAOS::TERM-HASH-MASK (THE FIXNUM (CHAOS::ADDR-OF CHAOS::OBJECT))) ; ; caught WARNING: ; undefined variable: CHAOS::TERM-HASH-MASK ; in: DEFUN CHAOS::TERM-HASH-EQUAL ; (LOGAND CHAOS::TERM-HASH-MASK (SXHASH CHAOS::X)) ; ; caught WARNING: ; undefined variable: CHAOS::TERM-HASH-MASK ; ; caught WARNING: ; 7 more uses of undefined variable CHAOS::TERM-HASH-MASK ; ; compilation unit finished ; Undefined variable: ; CHAOS::TERM-HASH-MASK ; caught 4 WARNING conditions ; caught 1 STYLE-WARNING condition ; printed 2828 notes [undoing binding stack and other enclosing state... done] [performing final GC... done] [saving current Lisp image into ./dumps/sbcl/cafeobj.sbcl: writing 5992 bytes from the static space at 0x1100000 writing 30986240 bytes from the dynamic space at 0x77b25000 writing 7482384 bytes from the read-only space at 0x75c01000 done] chmod +x dumps/sbcl/cafeobj.sbcl cat ./xbin/cafeobj.in | \ sed -e 's:@FIRSTCHOICE@:sbcl:g' \ -e 's:@LIBPATH@:lib/cafeobj-1.6:g' \ -e 's:@SHAREPATH@:share/cafeobj-1.6:g' >./xbin/cafeobj touch build-stamp make[1]: Leaving directory '/build/reproducible-path/cafeobj-1.6.0' touch build-arch-stamp touch build-indep-stamp fakeroot debian/rules binary mkdir -p /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj-mode/usr/share/emacs/site-lisp cp elisp/cafeobj-mode.el /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj-mode/usr/share/emacs/site-lisp touch install-indep-stamp dh_testdir dh_testroot dh_installdocs README.md dh_installchangelogs dh_installemacsen dh_compress -X.pdf dh_fixperms dh_installdeb dh_gencontrol dh_md5sums dh_builddeb dpkg-deb: building package 'cafeobj-mode' in '../cafeobj-mode_1.6.0-2_all.deb'. dh_testdir dh_testroot dh_prep DESTDIR=/build/reproducible-path/cafeobj-1.6.0/debian/cafeobj /usr/bin/make install make[1]: Entering directory '/build/reproducible-path/cafeobj-1.6.0' /usr/bin/install -c -d /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/cafeobj-1.6/lib /usr/bin/install -c -m 0644 \ ./lib/lib/*.cafe \ /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/cafeobj-1.6/lib /usr/bin/install -c -d /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/cafeobj-1.6/prelude /usr/bin/install -c -m 0644 ./lib/prelude/*.bin \ /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/cafeobj-1.6/prelude /usr/bin/install -c -d /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/lib/cafeobj-1.6 cp -a dumps/* /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/lib/cafeobj-1.6 chmod 0755 /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/lib/cafeobj-1.6/*/* /usr/bin/install -c -d /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/bin /usr/bin/install -c -m 0755 xbin/cafeobj /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/bin # man page /usr/bin/install -c -d /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/man/man1 /usr/bin/install -c -m 0644 doc/etc/cafeobj.1 /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/man/man1 # doc files /usr/bin/install -c -d /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/doc//cafeobj /usr/bin/install -c -m 0644 \ doc/binspect/binspect.pdf doc/citp-manual/citp.pdf doc/manual/manual.pdf doc/namespace/namespace.pdf doc/PigNose/pnguide.pdf doc/RefCard/interp.pdf doc/RefCard/syntax.pdf doc/refman/reference-manual.pdf doc/search/search-predicate.pdf \ doc/etc/cafe-citp.txt \ elisp/cafeobj-mode.el \ lib/icons/cafeobj-logo.png \ lib/icons/cafeobj-logo-small.png \ /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/doc//cafeobj /usr/bin/install -c -d /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/doc//cafeobj/examples /usr/bin/install -c -m 0644 doc/examples/*.mod \ /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/doc//cafeobj/examples # emacs lisp file installation /usr/bin/install -c -d /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/emacs/site-lisp /usr/bin/install -c -m 0644 elisp/cafeobj-mode.el /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/emacs/site-lisp # end of installation routines touch install-stamp make[1]: Leaving directory '/build/reproducible-path/cafeobj-1.6.0' # make install does also install the cafeobj-mode.el, remove it rm /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/emacs/site-lisp/cafeobj-mode.el rmdir /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/emacs/site-lisp/ rmdir /build/reproducible-path/cafeobj-1.6.0/debian/cafeobj/usr/share/emacs touch install-arch-stamp dh_testdir dh_testroot dh_installdocs README.md dh_installchangelogs # do NOT strip otherwise the sbcl dump file is broken! #dh_strip dh_compress -X.pdf dh_fixperms dh_installdeb dh_shlibdeps dh_gencontrol dh_md5sums dh_builddeb dpkg-deb: building package 'cafeobj' in '../cafeobj_1.6.0-2_i386.deb'. dpkg-genbuildinfo --build=binary -O../cafeobj_1.6.0-2_i386.buildinfo dpkg-genchanges --build=binary -O../cafeobj_1.6.0-2_i386.changes dpkg-genchanges: info: binary-only upload (no source code included) dpkg-source --after-build . dpkg-buildpackage: info: binary-only upload (no source included) dpkg-genchanges: info: not including original source code in upload I: copying local configuration I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env I: removing directory /srv/workspace/pbuilder/82797 and its subdirectories I: Current time: Fri May 16 06:50:38 -12 2025 I: pbuilder-time-stamp: 1747421438 Sat Apr 13 12:27:42 UTC 2024 I: 1st build successful. Starting 2nd build on remote node ionos12-i386.debian.net. Sat Apr 13 12:27:42 UTC 2024 I: Preparing to do remote build '2' on ionos12-i386.debian.net. Sat Apr 13 12:29:11 UTC 2024 I: Deleting $TMPDIR on ionos12-i386.debian.net. Sat Apr 13 12:29:11 UTC 2024 I: cafeobj_1.6.0-2_i386.changes: Format: 1.8 Date: Wed, 19 Feb 2020 05:27:40 +0900 Source: cafeobj Binary: cafeobj cafeobj-mode Architecture: all i386 Version: 1.6.0-2 Distribution: unstable Urgency: medium Maintainer: Norbert Preining Changed-By: Norbert Preining Description: cafeobj - new generation algebraic specification and programming language cafeobj-mode - Emacs major mode for editing CafeOBJ source code Changes: cafeobj (1.6.0-2) unstable; urgency=medium . * add watch file Checksums-Sha1: c37866d3525541bb3efe8d677444cea532760407 24960 cafeobj-mode_1.6.0-2_all.deb 49e8f9ff030394400b36bc79a240609545cd46bb 5391 cafeobj_1.6.0-2_i386.buildinfo a2519c54f94daf9f33a5d43a61db2ae787914741 12100648 cafeobj_1.6.0-2_i386.deb Checksums-Sha256: 4124b952c2ec53abf3486a197fc74804b09b15cef67672f41d30013b71108a5c 24960 cafeobj-mode_1.6.0-2_all.deb 94126d979437b8f2b79ba085ff7d179982d305434700441f58e143138ab44d39 5391 cafeobj_1.6.0-2_i386.buildinfo 70d94aba01d5806ea122cac5514fd003fadecb29b83a36b6a0db37e0451a3d57 12100648 cafeobj_1.6.0-2_i386.deb Files: 2d68d336a099924de136196a0ab59ea5 24960 science optional cafeobj-mode_1.6.0-2_all.deb 2a7648d463827357fd06d656247699be 5391 science optional cafeobj_1.6.0-2_i386.buildinfo 42ced3b505af44a1e67e9990ce7443d3 12100648 science optional cafeobj_1.6.0-2_i386.deb Sat Apr 13 12:29:13 UTC 2024 I: diffoscope 264 will be used to compare the two builds: Running as unit: rb-diffoscope-i386_8-23625.service # Profiling output for: /usr/bin/diffoscope --timeout 7200 --html /srv/reproducible-results/rbuild-debian/r-b-build.NJZ5Qidq/cafeobj_1.6.0-2.diffoscope.html --text /srv/reproducible-results/rbuild-debian/r-b-build.NJZ5Qidq/cafeobj_1.6.0-2.diffoscope.txt --json /srv/reproducible-results/rbuild-debian/r-b-build.NJZ5Qidq/cafeobj_1.6.0-2.diffoscope.json --profile=- /srv/reproducible-results/rbuild-debian/r-b-build.NJZ5Qidq/b1/cafeobj_1.6.0-2_i386.changes /srv/reproducible-results/rbuild-debian/r-b-build.NJZ5Qidq/b2/cafeobj_1.6.0-2_i386.changes ## close_archive (total time: 0.000s) 0.000s 8 calls diffoscope.comparators.xz.XzContainer 0.000s 8 calls diffoscope.comparators.tar.TarContainer 0.000s 3 calls diffoscope.comparators.deb.DebContainer ## command (total time: 21.142s) 7.280s 88 calls objdump 7.181s 56 calls diff 2.593s 10 calls xz 2.216s 457 calls readelf 1.718s 11 calls strings 0.153s 2 calls objcopy 0.000s 7 calls cmp (internal) ## compare_files (cumulative) (total time: 67.670s) 13.473s 1 call abc.DotChangesFile 13.389s 1 call abc.DebFile 13.254s 2 calls abc.XzFile 10.603s 1 call abc.DebDataTarFile 10.252s 1 call abc.ElfFile 6.241s 4 calls diffoscope.comparators.elf.ElfCodeSection 0.380s 15 calls diffoscope.comparators.elf.ElfSection 0.051s 1 call abc.TarFile 0.020s 1 call abc.TextFile 0.007s 1 call abc.Md5sumsFile ## container_extract (total time: 2.954s) 2.594s 10 calls diffoscope.comparators.xz.XzContainer 0.218s 130 calls diffoscope.comparators.deb.DebTarContainer 0.136s 12 calls diffoscope.comparators.deb.DebContainer 0.006s 10 calls diffoscope.comparators.tar.TarContainer ## diff (total time: 0.005s) 0.005s 9 calls linediff ## has_same_content_as (total time: 0.002s) 0.000s 2 calls abc.DebFile 0.000s 2 calls abc.TextFile 0.000s 2 calls abc.Md5sumsFile 0.000s 1 call abc.DotChangesFile 0.000s 2 calls abc.XzFile 0.000s 1 call abc.TarFile 0.000s 15 calls diffoscope.comparators.elf.ElfSection 0.000s 1 call abc.ElfFile 0.000s 1 call abc.DebDataTarFile 0.000s 4 calls diffoscope.comparators.elf.ElfCodeSection ## main (total time: 14.589s) 14.512s 2 calls outputs 0.077s 1 call cleanup ## open_archive (total time: 0.000s) 0.000s 10 calls diffoscope.comparators.xz.XzContainer 0.000s 8 calls diffoscope.comparators.tar.TarContainer 0.000s 6 calls diffoscope.comparators.deb.DebContainer 0.000s 2 calls diffoscope.comparators.deb.DebTarContainer ## output (total time: 0.443s) 0.424s 1 call html 0.013s 1 call text 0.006s 1 call json ## recognizes (total time: 0.562s) 0.229s 12 calls diffoscope.comparators.binary.FilesystemFile 0.181s 898 calls diffoscope.comparators.utils.libarchive.LibarchiveMember 0.111s 216 calls diffoscope.comparators.debian.DebControlMember 0.040s 500 calls diffoscope.comparators.utils.archive.ArchiveMember ## specialize (total time: 0.191s) 0.191s 31 calls specialize Finished with result: success Main processes terminated with: code=exited/status=1 Service runtime: 14.951s CPU time consumed: 17.836s Sat Apr 13 12:29:36 UTC 2024 W: Diffoscope claims the build is reproducible, but there is a diffoscope file. Please investigate. Sat Apr 13 12:29:36 UTC 2024 E: cafeobj failed to build reproducibly in trixie on i386. Sat Apr 13 12:29:38 UTC 2024 I: Submitting .buildinfo files to external archives: Sat Apr 13 12:29:38 UTC 2024 I: Submitting 8.0K b1/cafeobj_1.6.0-2_i386.buildinfo.asc Sat Apr 13 12:29:39 UTC 2024 I: Submitting 8.0K b2/cafeobj_1.6.0-2_i386.buildinfo.asc Sat Apr 13 12:29:40 UTC 2024 I: Done submitting .buildinfo files to http://buildinfo.debian.net/api/submit. Sat Apr 13 12:29:40 UTC 2024 I: Done submitting .buildinfo files. Sat Apr 13 12:29:40 UTC 2024 I: Removing signed cafeobj_1.6.0-2_i386.buildinfo.asc files: removed './b1/cafeobj_1.6.0-2_i386.buildinfo.asc' removed './b2/cafeobj_1.6.0-2_i386.buildinfo.asc'