RUN: /usr/share/launchpad-buildd/slavebin/slave-prep ['slave-prep'] Forking launchpad-buildd slave process... Kernel version: Linux bos01-ppc64el-021 4.4.0-77-generic #98-Ubuntu SMP Wed Apr 26 08:33:06 UTC 2017 ppc64le Buildd toolchain package versions: launchpad-buildd_142 python-lpbuildd_142 sbuild_0.67.0-2ubuntu7 bzr-builder_0.7.3+bzr174~ppa13~ubuntu14.10.1 bzr_2.7.0-2ubuntu3 git-build-recipe_0.3.4~git201611291343.dcee459~ubuntu16.04.1 git_1:2.7.4-0ubuntu1 dpkg-dev_1.18.4ubuntu1.2 python-debian_0.1.27ubuntu2 qemu-user-static_1:2.5+dfsg-5ubuntu10.11. Syncing the system clock with the buildd NTP service... 7 May 23:07:56 ntpdate[1756]: adjust time server 10.211.37.1 offset 0.034579 sec RUN: /usr/share/launchpad-buildd/slavebin/unpack-chroot ['unpack-chroot', 'PACKAGEBUILD-12546888', '/home/buildd/filecache-default/6f2309b02db3cfdb85003f9659f6426e55596487'] Unpacking chroot for build PACKAGEBUILD-12546888 RUN: /usr/share/launchpad-buildd/slavebin/mount-chroot ['mount-chroot', 'PACKAGEBUILD-12546888'] Mounting chroot for build PACKAGEBUILD-12546888 RUN: /usr/share/launchpad-buildd/slavebin/override-sources-list ['override-sources-list', 'PACKAGEBUILD-12546888', 'deb http://ftpmaster.internal/ubuntu artful main universe', 'deb http://ftpmaster.internal/ubuntu artful-security main universe', 'deb http://ftpmaster.internal/ubuntu artful-updates main universe', 'deb http://ftpmaster.internal/ubuntu artful-proposed main universe'] Overriding sources.list in build-PACKAGEBUILD-12546888 RUN: /usr/share/launchpad-buildd/slavebin/update-debian-chroot ['update-debian-chroot', 'PACKAGEBUILD-12546888', 'ppc64el'] Updating debian chroot for build PACKAGEBUILD-12546888 Get:1 http://ftpmaster.internal/ubuntu artful InRelease [237 kB] Get:2 http://ftpmaster.internal/ubuntu artful-security InRelease [65.5 kB] Get:3 http://ftpmaster.internal/ubuntu artful-updates InRelease [65.5 kB] Get:4 http://ftpmaster.internal/ubuntu artful-proposed InRelease [85.4 kB] Get:5 http://ftpmaster.internal/ubuntu artful/main ppc64el Packages [1130 kB] Get:6 http://ftpmaster.internal/ubuntu artful/main Translation-en [565 kB] Get:7 http://ftpmaster.internal/ubuntu artful/universe ppc64el Packages [8000 kB] Get:8 http://ftpmaster.internal/ubuntu artful/universe Translation-en [4746 kB] Get:9 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el Packages [40.7 kB] Get:10 http://ftpmaster.internal/ubuntu artful-proposed/main Translation-en [25.8 kB] Get:11 http://ftpmaster.internal/ubuntu artful-proposed/universe ppc64el Packages [95.1 kB] Get:12 http://ftpmaster.internal/ubuntu artful-proposed/universe Translation-en [57.6 kB] Fetched 15.1 MB in 3s (3964 kB/s) Reading package lists... Reading package lists... Building dependency tree... Reading state information... Calculating upgrade... The following NEW packages will be installed: gcc-7-base The following packages will be upgraded: advancecomp apt apt-transport-https cpp-6 debianutils dmsetup g++-6 gcc-6 gcc-6-base init init-system-helpers libapparmor1 libapt-pkg5.0 libasan3 libasn1-8-heimdal libatomic1 libcc1-0 libdevmapper1.02.1 libgcc-6-dev libgcc1 libgnutls30 libgomp1 libgssapi3-heimdal libhcrypto4-heimdal libheimbase1-heimdal libheimntlm0-heimdal libhx509-5-heimdal libitm1 libkmod2 libkrb5-26-heimdal libroken18-heimdal libstdc++-6-dev libstdc++6 libsystemd0 libubsan0 libudev1 libusb-0.1-4 libwind0-heimdal linux-libc-dev systemd systemd-sysv 41 upgraded, 1 newly installed, 0 to remove and 0 not upgraded. Need to get 28.9 MB of archives. After this operation, 933 kB of additional disk space will be used. Get:1 http://ftpmaster.internal/ubuntu artful/main ppc64el debianutils ppc64el 4.8.1.1 [85.9 kB] Get:2 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el init-system-helpers all 1.48 [37.8 kB] Get:3 http://ftpmaster.internal/ubuntu artful/main ppc64el gcc-7-base ppc64el 7.1.0-4ubuntu1 [18.4 kB] Get:4 http://ftpmaster.internal/ubuntu artful/main ppc64el libgcc1 ppc64el 1:7.1.0-4ubuntu1 [29.6 kB] Get:5 http://ftpmaster.internal/ubuntu artful/main ppc64el libstdc++6 ppc64el 7.1.0-4ubuntu1 [446 kB] Get:6 http://ftpmaster.internal/ubuntu artful/main ppc64el libapt-pkg5.0 ppc64el 1.4.2 [823 kB] Get:7 http://ftpmaster.internal/ubuntu artful/main ppc64el apt ppc64el 1.4.2 [1132 kB] Get:8 http://ftpmaster.internal/ubuntu artful/main ppc64el libapparmor1 ppc64el 2.11.0-2ubuntu5 [30.0 kB] Get:9 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el libkmod2 ppc64el 24-1ubuntu1 [36.4 kB] Get:10 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el systemd ppc64el 233-6ubuntu1 [2256 kB] Get:11 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el libsystemd0 ppc64el 233-6ubuntu1 [205 kB] Get:12 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el init ppc64el 1.48 [5808 B] Get:13 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el systemd-sysv ppc64el 233-6ubuntu1 [13.6 kB] Get:14 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el libudev1 ppc64el 233-6ubuntu1 [55.8 kB] Get:15 http://ftpmaster.internal/ubuntu artful/main ppc64el libgomp1 ppc64el 7.1.0-4ubuntu1 [69.0 kB] Get:16 http://ftpmaster.internal/ubuntu artful/main ppc64el libitm1 ppc64el 7.1.0-4ubuntu1 [29.6 kB] Get:17 http://ftpmaster.internal/ubuntu artful/main ppc64el libatomic1 ppc64el 7.1.0-4ubuntu1 [8478 B] Get:18 http://ftpmaster.internal/ubuntu artful/main ppc64el libasan3 ppc64el 6.3.0-16ubuntu6 [280 kB] Get:19 http://ftpmaster.internal/ubuntu artful/main ppc64el libubsan0 ppc64el 7.1.0-4ubuntu1 [128 kB] Get:20 http://ftpmaster.internal/ubuntu artful/main ppc64el g++-6 ppc64el 6.3.0-16ubuntu6 [6443 kB] Get:21 http://ftpmaster.internal/ubuntu artful/main ppc64el libstdc++-6-dev ppc64el 6.3.0-16ubuntu6 [1439 kB] Get:22 http://ftpmaster.internal/ubuntu artful/main ppc64el gcc-6 ppc64el 6.3.0-16ubuntu6 [6246 kB] Get:23 http://ftpmaster.internal/ubuntu artful/main ppc64el libgcc-6-dev ppc64el 6.3.0-16ubuntu6 [659 kB] Get:24 http://ftpmaster.internal/ubuntu artful/main ppc64el libcc1-0 ppc64el 7.1.0-4ubuntu1 [39.1 kB] Get:25 http://ftpmaster.internal/ubuntu artful/main ppc64el cpp-6 ppc64el 6.3.0-16ubuntu6 [5676 kB] Get:26 http://ftpmaster.internal/ubuntu artful/main ppc64el gcc-6-base ppc64el 6.3.0-16ubuntu6 [17.4 kB] Get:27 http://ftpmaster.internal/ubuntu artful/main ppc64el libdevmapper1.02.1 ppc64el 2:1.02.136-1ubuntu6 [128 kB] Get:28 http://ftpmaster.internal/ubuntu artful/main ppc64el dmsetup ppc64el 2:1.02.136-1ubuntu6 [69.7 kB] Get:29 http://ftpmaster.internal/ubuntu artful/main ppc64el libroken18-heimdal ppc64el 7.1.0+dfsg-13 [39.0 kB] Get:30 http://ftpmaster.internal/ubuntu artful/main ppc64el libasn1-8-heimdal ppc64el 7.1.0+dfsg-13 [137 kB] Get:31 http://ftpmaster.internal/ubuntu artful/main ppc64el libgnutls30 ppc64el 3.5.8-5ubuntu1 [577 kB] Get:32 http://ftpmaster.internal/ubuntu artful/main ppc64el libheimbase1-heimdal ppc64el 7.1.0+dfsg-13 [28.4 kB] Get:33 http://ftpmaster.internal/ubuntu artful/main ppc64el libhcrypto4-heimdal ppc64el 7.1.0+dfsg-13 [94.5 kB] Get:34 http://ftpmaster.internal/ubuntu artful/main ppc64el libwind0-heimdal ppc64el 7.1.0+dfsg-13 [47.9 kB] Get:35 http://ftpmaster.internal/ubuntu artful/main ppc64el libhx509-5-heimdal ppc64el 7.1.0+dfsg-13 [101 kB] Get:36 http://ftpmaster.internal/ubuntu artful/main ppc64el libkrb5-26-heimdal ppc64el 7.1.0+dfsg-13 [194 kB] Get:37 http://ftpmaster.internal/ubuntu artful/main ppc64el libheimntlm0-heimdal ppc64el 7.1.0+dfsg-13 [15.6 kB] Get:38 http://ftpmaster.internal/ubuntu artful/main ppc64el libgssapi3-heimdal ppc64el 7.1.0+dfsg-13 [86.5 kB] Get:39 http://ftpmaster.internal/ubuntu artful/main ppc64el apt-transport-https ppc64el 1.4.2 [39.2 kB] Get:40 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el advancecomp ppc64el 1.23-1 [253 kB] Get:41 http://ftpmaster.internal/ubuntu artful/main ppc64el libusb-0.1-4 ppc64el 2:0.1.12-31 [16.0 kB] Get:42 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el linux-libc-dev ppc64el 4.10.0-21.23 [902 kB] debconf: delaying package configuration, since apt-utils is not installed Fetched 28.9 MB in 1s (26.6 MB/s) (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 ... 12321 files and directories currently installed.) Preparing to unpack .../debianutils_4.8.1.1_ppc64el.deb ... Unpacking debianutils (4.8.1.1) over (4.8.1) ... Setting up debianutils (4.8.1.1) ... (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 ... 12321 files and directories currently installed.) Preparing to unpack .../init-system-helpers_1.48_all.deb ... Unpacking init-system-helpers (1.48) over (1.47) ... Setting up init-system-helpers (1.48) ... Selecting previously unselected package gcc-7-base:ppc64el. (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 ... 12321 files and directories currently installed.) Preparing to unpack .../gcc-7-base_7.1.0-4ubuntu1_ppc64el.deb ... Unpacking gcc-7-base:ppc64el (7.1.0-4ubuntu1) ... Setting up gcc-7-base:ppc64el (7.1.0-4ubuntu1) ... (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 ... 12328 files and directories currently installed.) Preparing to unpack .../libgcc1_1%3a7.1.0-4ubuntu1_ppc64el.deb ... Unpacking libgcc1:ppc64el (1:7.1.0-4ubuntu1) over (1:6.3.0-14ubuntu3) ... Setting up libgcc1:ppc64el (1:7.1.0-4ubuntu1) ... (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 ... 12328 files and directories currently installed.) Preparing to unpack .../libstdc++6_7.1.0-4ubuntu1_ppc64el.deb ... Unpacking libstdc++6:ppc64el (7.1.0-4ubuntu1) over (6.3.0-14ubuntu3) ... Setting up libstdc++6:ppc64el (7.1.0-4ubuntu1) ... (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 ... 12328 files and directories currently installed.) Preparing to unpack .../libapt-pkg5.0_1.4.2_ppc64el.deb ... Unpacking libapt-pkg5.0:ppc64el (1.4.2) over (1.4.1ubuntu2) ... Setting up libapt-pkg5.0:ppc64el (1.4.2) ... (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 ... 12328 files and directories currently installed.) Preparing to unpack .../archives/apt_1.4.2_ppc64el.deb ... Unpacking apt (1.4.2) over (1.4.1ubuntu2) ... Setting up apt (1.4.2) ... (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 ... 12328 files and directories currently installed.) Preparing to unpack .../libapparmor1_2.11.0-2ubuntu5_ppc64el.deb ... Unpacking libapparmor1:ppc64el (2.11.0-2ubuntu5) over (2.11.0-2ubuntu4) ... Preparing to unpack .../libkmod2_24-1ubuntu1_ppc64el.deb ... Unpacking libkmod2:ppc64el (24-1ubuntu1) over (22-1.1ubuntu1) ... Preparing to unpack .../systemd_233-6ubuntu1_ppc64el.deb ... Unpacking systemd (233-6ubuntu1) over (232-21ubuntu3) ... dpkg: warning: unable to delete old directory '/etc/dbus-1/system.d': Directory not empty dpkg: warning: unable to delete old directory '/etc/dbus-1': Directory not empty Preparing to unpack .../libsystemd0_233-6ubuntu1_ppc64el.deb ... Unpacking libsystemd0:ppc64el (233-6ubuntu1) over (232-21ubuntu3) ... Setting up libsystemd0:ppc64el (233-6ubuntu1) ... (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 ... 12354 files and directories currently installed.) Preparing to unpack .../archives/init_1.48_ppc64el.deb ... Unpacking init (1.48) over (1.47) ... Setting up libapparmor1:ppc64el (2.11.0-2ubuntu5) ... Setting up libkmod2:ppc64el (24-1ubuntu1) ... Setting up systemd (233-6ubuntu1) ... Installing new version of config file /etc/systemd/resolved.conf ... addgroup: The group `systemd-journal' already exists as a system group. Exiting. Removing obsolete conffile /etc/dbus-1/system.d/org.freedesktop.hostname1.conf ... Removing obsolete conffile /etc/dbus-1/system.d/org.freedesktop.locale1.conf ... Removing obsolete conffile /etc/dbus-1/system.d/org.freedesktop.login1.conf ... Removing obsolete conffile /etc/dbus-1/system.d/org.freedesktop.network1.conf ... Removing obsolete conffile /etc/dbus-1/system.d/org.freedesktop.resolve1.conf ... Removing obsolete conffile /etc/dbus-1/system.d/org.freedesktop.systemd1.conf ... Removing obsolete conffile /etc/dbus-1/system.d/org.freedesktop.timedate1.conf ... (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 ... 12354 files and directories currently installed.) Preparing to unpack .../systemd-sysv_233-6ubuntu1_ppc64el.deb ... Unpacking systemd-sysv (233-6ubuntu1) over (232-21ubuntu3) ... Preparing to unpack .../libudev1_233-6ubuntu1_ppc64el.deb ... Unpacking libudev1:ppc64el (233-6ubuntu1) over (232-21ubuntu3) ... Setting up libudev1:ppc64el (233-6ubuntu1) ... (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 ... 12354 files and directories currently installed.) Preparing to unpack .../00-libgomp1_7.1.0-4ubuntu1_ppc64el.deb ... Unpacking libgomp1:ppc64el (7.1.0-4ubuntu1) over (6.3.0-14ubuntu3) ... Preparing to unpack .../01-libitm1_7.1.0-4ubuntu1_ppc64el.deb ... Unpacking libitm1:ppc64el (7.1.0-4ubuntu1) over (6.3.0-14ubuntu3) ... Preparing to unpack .../02-libatomic1_7.1.0-4ubuntu1_ppc64el.deb ... Unpacking libatomic1:ppc64el (7.1.0-4ubuntu1) over (6.3.0-14ubuntu3) ... Preparing to unpack .../03-libasan3_6.3.0-16ubuntu6_ppc64el.deb ... Unpacking libasan3:ppc64el (6.3.0-16ubuntu6) over (6.3.0-14ubuntu3) ... Preparing to unpack .../04-libubsan0_7.1.0-4ubuntu1_ppc64el.deb ... Unpacking libubsan0:ppc64el (7.1.0-4ubuntu1) over (6.3.0-14ubuntu3) ... Preparing to unpack .../05-g++-6_6.3.0-16ubuntu6_ppc64el.deb ... Unpacking g++-6 (6.3.0-16ubuntu6) over (6.3.0-14ubuntu3) ... Preparing to unpack .../06-libstdc++-6-dev_6.3.0-16ubuntu6_ppc64el.deb ... Unpacking libstdc++-6-dev:ppc64el (6.3.0-16ubuntu6) over (6.3.0-14ubuntu3) ... Preparing to unpack .../07-gcc-6_6.3.0-16ubuntu6_ppc64el.deb ... Unpacking gcc-6 (6.3.0-16ubuntu6) over (6.3.0-14ubuntu3) ... Preparing to unpack .../08-libgcc-6-dev_6.3.0-16ubuntu6_ppc64el.deb ... Unpacking libgcc-6-dev:ppc64el (6.3.0-16ubuntu6) over (6.3.0-14ubuntu3) ... Preparing to unpack .../09-libcc1-0_7.1.0-4ubuntu1_ppc64el.deb ... Unpacking libcc1-0:ppc64el (7.1.0-4ubuntu1) over (6.3.0-14ubuntu3) ... Preparing to unpack .../10-cpp-6_6.3.0-16ubuntu6_ppc64el.deb ... Unpacking cpp-6 (6.3.0-16ubuntu6) over (6.3.0-14ubuntu3) ... Preparing to unpack .../11-gcc-6-base_6.3.0-16ubuntu6_ppc64el.deb ... Unpacking gcc-6-base:ppc64el (6.3.0-16ubuntu6) over (6.3.0-14ubuntu3) ... Preparing to unpack .../12-libdevmapper1.02.1_2%3a1.02.136-1ubuntu6_ppc64el.deb ... Unpacking libdevmapper1.02.1:ppc64el (2:1.02.136-1ubuntu6) over (2:1.02.136-1ubuntu5) ... Preparing to unpack .../13-dmsetup_2%3a1.02.136-1ubuntu6_ppc64el.deb ... Unpacking dmsetup (2:1.02.136-1ubuntu6) over (2:1.02.136-1ubuntu5) ... Preparing to unpack .../14-libroken18-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libroken18-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../15-libasn1-8-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libasn1-8-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../16-libgnutls30_3.5.8-5ubuntu1_ppc64el.deb ... Unpacking libgnutls30:ppc64el (3.5.8-5ubuntu1) over (3.5.6-4ubuntu4) ... Preparing to unpack .../17-libheimbase1-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libheimbase1-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../18-libhcrypto4-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libhcrypto4-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../19-libwind0-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libwind0-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../20-libhx509-5-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libhx509-5-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../21-libkrb5-26-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libkrb5-26-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../22-libheimntlm0-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libheimntlm0-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../23-libgssapi3-heimdal_7.1.0+dfsg-13_ppc64el.deb ... Unpacking libgssapi3-heimdal:ppc64el (7.1.0+dfsg-13) over (7.1.0+dfsg-9ubuntu1) ... Preparing to unpack .../24-apt-transport-https_1.4.2_ppc64el.deb ... Unpacking apt-transport-https (1.4.2) over (1.4.1ubuntu2) ... Preparing to unpack .../25-advancecomp_1.23-1_ppc64el.deb ... Unpacking advancecomp (1.23-1) over (1.20-1) ... Preparing to unpack .../26-libusb-0.1-4_2%3a0.1.12-31_ppc64el.deb ... Unpacking libusb-0.1-4:ppc64el (2:0.1.12-31) over (2:0.1.12-30) ... Preparing to unpack .../27-linux-libc-dev_4.10.0-21.23_ppc64el.deb ... Unpacking linux-libc-dev:ppc64el (4.10.0-21.23) over (4.10.0-20.22) ... Setting up libgomp1:ppc64el (7.1.0-4ubuntu1) ... Setting up libatomic1:ppc64el (7.1.0-4ubuntu1) ... Setting up libcc1-0:ppc64el (7.1.0-4ubuntu1) ... Setting up apt-transport-https (1.4.2) ... Setting up systemd-sysv (233-6ubuntu1) ... Setting up libubsan0:ppc64el (7.1.0-4ubuntu1) ... Setting up gcc-6-base:ppc64el (6.3.0-16ubuntu6) ... Setting up linux-libc-dev:ppc64el (4.10.0-21.23) ... Setting up advancecomp (1.23-1) ... Setting up libgnutls30:ppc64el (3.5.8-5ubuntu1) ... Setting up libroken18-heimdal:ppc64el (7.1.0+dfsg-13) ... Setting up libdevmapper1.02.1:ppc64el (2:1.02.136-1ubuntu6) ... Processing triggers for libc-bin (2.24-9ubuntu2) ... Setting up libheimbase1-heimdal:ppc64el (7.1.0+dfsg-13) ... Setting up dmsetup (2:1.02.136-1ubuntu6) ... Setting up cpp-6 (6.3.0-16ubuntu6) ... Setting up libusb-0.1-4:ppc64el (2:0.1.12-31) ... Setting up libitm1:ppc64el (7.1.0-4ubuntu1) ... Setting up libasan3:ppc64el (6.3.0-16ubuntu6) ... Setting up libgcc-6-dev:ppc64el (6.3.0-16ubuntu6) ... Setting up libstdc++-6-dev:ppc64el (6.3.0-16ubuntu6) ... Setting up libwind0-heimdal:ppc64el (7.1.0+dfsg-13) ... Setting up init (1.48) ... Setting up libasn1-8-heimdal:ppc64el (7.1.0+dfsg-13) ... Setting up libhcrypto4-heimdal:ppc64el (7.1.0+dfsg-13) ... Setting up libhx509-5-heimdal:ppc64el (7.1.0+dfsg-13) ... Setting up gcc-6 (6.3.0-16ubuntu6) ... Setting up g++-6 (6.3.0-16ubuntu6) ... Setting up libkrb5-26-heimdal:ppc64el (7.1.0+dfsg-13) ... Setting up libheimntlm0-heimdal:ppc64el (7.1.0+dfsg-13) ... Setting up libgssapi3-heimdal:ppc64el (7.1.0+dfsg-13) ... Processing triggers for libc-bin (2.24-9ubuntu2) ... RUN: /usr/share/launchpad-buildd/slavebin/sbuild-package ['sbuild-package', 'PACKAGEBUILD-12546888', 'ppc64el', 'artful-proposed', '-c', 'chroot:autobuild', '--arch=ppc64el', '--dist=artful-proposed', '--purge=never', '--nolog', 'ecl_16.1.2-2.dsc'] Initiating build PACKAGEBUILD-12546888 with 4 jobs across 4 processor cores. Kernel reported to sbuild: 4.4.0-77-generic #98-Ubuntu SMP Wed Apr 26 08:33:06 UTC 2017 ppc64le sbuild (Debian sbuild) 0.67.0 (26 Dec 2015) on bos01-ppc64el-021.buildd +==============================================================================+ | ecl 16.1.2-2 (ppc64el) 07 May 2017 23:08 | +==============================================================================+ Package: ecl Version: 16.1.2-2 Source Version: 16.1.2-2 Distribution: artful-proposed Machine Architecture: ppc64el Host Architecture: ppc64el Build Architecture: ppc64el I: NOTICE: Log filtering will replace 'build/ecl-fOZi1T/ecl-16.1.2' with '<>' I: NOTICE: Log filtering will replace 'build/ecl-fOZi1T' with '<>' I: NOTICE: Log filtering will replace 'home/buildd/build-PACKAGEBUILD-12546888/chroot-autobuild' with '<>' +------------------------------------------------------------------------------+ | Fetch source files | +------------------------------------------------------------------------------+ Local sources ------------- ecl_16.1.2-2.dsc exists in .; copying to chroot Check architectures ------------------- Check dependencies ------------------ Merged Build-Depends: build-essential, fakeroot Filtered Build-Depends: build-essential, fakeroot dpkg-deb: building package 'sbuild-build-depends-core-dummy' in '/<>/resolver-vzmCWs/apt_archive/sbuild-build-depends-core-dummy.deb'. Ign:1 copy:/<>/resolver-vzmCWs/apt_archive ./ InRelease Get:2 copy:/<>/resolver-vzmCWs/apt_archive ./ Release [2119 B] Ign:3 copy:/<>/resolver-vzmCWs/apt_archive ./ Release.gpg Get:4 copy:/<>/resolver-vzmCWs/apt_archive ./ Sources [214 B] Get:5 copy:/<>/resolver-vzmCWs/apt_archive ./ Packages [527 B] Fetched 2860 B in 0s (0 B/s) Reading package lists... Reading package lists... +------------------------------------------------------------------------------+ | Install core build dependencies (apt-based resolver) | +------------------------------------------------------------------------------+ Installing build dependencies Reading package lists... Building dependency tree... Reading state information... The following NEW packages will be installed: sbuild-build-depends-core-dummy 0 upgraded, 1 newly installed, 0 to remove and 0 not upgraded. Need to get 778 B of archives. After this operation, 0 B of additional disk space will be used. Get:1 copy:/<>/resolver-vzmCWs/apt_archive ./ sbuild-build-depends-core-dummy 0.invalid.0 [778 B] debconf: delaying package configuration, since apt-utils is not installed Fetched 778 B in 0s (0 B/s) Selecting previously unselected package sbuild-build-depends-core-dummy. (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 ... 12352 files and directories currently installed.) Preparing to unpack .../sbuild-build-depends-core-dummy_0.invalid.0_ppc64el.deb ... Unpacking sbuild-build-depends-core-dummy (0.invalid.0) ... Setting up sbuild-build-depends-core-dummy (0.invalid.0) ... Merged Build-Depends: debhelper (>> 7.0.0), dh-autoreconf, libgmp-dev, file, texinfo, libncurses5-dev, fakeroot, libgc-dev (>= 1:7.1), chrpath, install-info, libatomic-ops-dev, libffi-dev Merged Build-Conflicts: autoconf2.13, automake1.4 Filtered Build-Depends: debhelper (>> 7.0.0), dh-autoreconf, libgmp-dev, file, texinfo, libncurses5-dev, fakeroot, libgc-dev (>= 1:7.1), chrpath, install-info, libatomic-ops-dev, libffi-dev Filtered Build-Conflicts: autoconf2.13, automake1.4 dpkg-deb: building package 'sbuild-build-depends-ecl-dummy' in '/<>/resolver-27OCeI/apt_archive/sbuild-build-depends-ecl-dummy.deb'. Ign:1 copy:/<>/resolver-27OCeI/apt_archive ./ InRelease Get:2 copy:/<>/resolver-27OCeI/apt_archive ./ Release [2119 B] Ign:3 copy:/<>/resolver-27OCeI/apt_archive ./ Release.gpg Get:4 copy:/<>/resolver-27OCeI/apt_archive ./ Sources [314 B] Get:5 copy:/<>/resolver-27OCeI/apt_archive ./ Packages [634 B] Fetched 3067 B in 0s (0 B/s) Reading package lists... Reading package lists... +------------------------------------------------------------------------------+ | Install ecl build dependencies (apt-based resolver) | +------------------------------------------------------------------------------+ Installing build dependencies Reading package lists... Building dependency tree... Reading state information... The following additional packages will be installed: autoconf automake autopoint autotools-dev bsdmainutils chrpath debhelper dh-autoreconf dh-strip-nondeterminism file gettext gettext-base groff-base install-info intltool-debian libarchive-zip-perl libatomic-ops-dev libbsd0 libcroco3 libffi-dev libfile-stripnondeterminism-perl libgc-dev libgc1c2 libglib2.0-0 libgmp-dev libgmpxx4ldbl libicu57 libmagic-mgc libmagic1 libncurses5-dev libpipeline1 libsigsegv2 libtext-unidecode-perl libtimedate-perl libtinfo-dev libtool libxml-libxml-perl libxml-namespacesupport-perl libxml-sax-base-perl libxml-sax-perl libxml2 m4 man-db po-debconf tex-common texinfo ucf Suggested packages: autoconf-archive gnu-standards autoconf-doc wamerican | wordlist whois vacation dh-make gettext-doc libasprintf-dev libgettextpo-dev groff gmp-doc libgmp10-doc libmpfr-dev ncurses-doc libtool-doc gfortran | fortran95-compiler gcj-jdk m4-doc less www-browser libmail-box-perl texlive-base texlive-latex-base texlive-generic-recommended texinfo-doc-nonfree texlive-fonts-recommended Recommended packages: curl | wget | lynx-cur libglib2.0-data shared-mime-info xdg-user-dirs libltdl-dev libxml-sax-expat-perl xml-core libmail-sendmail-perl The following packages will be REMOVED: pkg-create-dbgsym* The following NEW packages will be installed: autoconf automake autopoint autotools-dev bsdmainutils chrpath debhelper dh-autoreconf dh-strip-nondeterminism file gettext gettext-base groff-base install-info intltool-debian libarchive-zip-perl libatomic-ops-dev libbsd0 libcroco3 libffi-dev libfile-stripnondeterminism-perl libgc-dev libgc1c2 libglib2.0-0 libgmp-dev libgmpxx4ldbl libicu57 libmagic-mgc libmagic1 libncurses5-dev libpipeline1 libsigsegv2 libtext-unidecode-perl libtimedate-perl libtinfo-dev libtool libxml-libxml-perl libxml-namespacesupport-perl libxml-sax-base-perl libxml-sax-perl libxml2 m4 man-db po-debconf sbuild-build-depends-ecl-dummy tex-common texinfo ucf 0 upgraded, 48 newly installed, 1 to remove and 0 not upgraded. Need to get 19.5 MB of archives. After this operation, 83.7 MB of additional disk space will be used. Get:1 copy:/<>/resolver-27OCeI/apt_archive ./ sbuild-build-depends-ecl-dummy 0.invalid.0 [884 B] Get:2 http://ftpmaster.internal/ubuntu artful/main ppc64el install-info ppc64el 6.3.0.dfsg.1-1 [54.7 kB] Get:3 http://ftpmaster.internal/ubuntu artful/main ppc64el groff-base ppc64el 1.22.3-9 [1361 kB] Get:4 http://ftpmaster.internal/ubuntu artful/main ppc64el libbsd0 ppc64el 0.8.3-1 [48.2 kB] Get:5 http://ftpmaster.internal/ubuntu artful/main ppc64el bsdmainutils ppc64el 9.0.12ubuntu1 [179 kB] Get:6 http://ftpmaster.internal/ubuntu artful/main ppc64el libpipeline1 ppc64el 1.4.1-2 [24.1 kB] Get:7 http://ftpmaster.internal/ubuntu artful/main ppc64el man-db ppc64el 2.7.6.1-2 [890 kB] Get:8 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el libmagic-mgc ppc64el 1:5.30-1 [181 kB] Get:9 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el libmagic1 ppc64el 1:5.30-1 [71.8 kB] Get:10 http://ftpmaster.internal/ubuntu artful-proposed/main ppc64el file ppc64el 1:5.30-1 [22.5 kB] Get:11 http://ftpmaster.internal/ubuntu artful/main ppc64el ucf all 3.0036 [52.9 kB] Get:12 http://ftpmaster.internal/ubuntu artful/main ppc64el gettext-base ppc64el 0.19.8.1-2ubuntu1 [48.1 kB] Get:13 http://ftpmaster.internal/ubuntu artful/main ppc64el libglib2.0-0 ppc64el 2.52.0-1 [1069 kB] Get:14 http://ftpmaster.internal/ubuntu artful/main ppc64el libicu57 ppc64el 57.1-6 [7785 kB] Get:15 http://ftpmaster.internal/ubuntu artful/main ppc64el libxml2 ppc64el 2.9.4+dfsg1-2.2 [609 kB] Get:16 http://ftpmaster.internal/ubuntu artful/main ppc64el libsigsegv2 ppc64el 2.10-5 [14.2 kB] Get:17 http://ftpmaster.internal/ubuntu artful/main ppc64el m4 ppc64el 1.4.18-1 [202 kB] Get:18 http://ftpmaster.internal/ubuntu artful/main ppc64el autoconf all 2.69-10 [321 kB] Get:19 http://ftpmaster.internal/ubuntu artful/main ppc64el autotools-dev all 20161112.1 [39.5 kB] Get:20 http://ftpmaster.internal/ubuntu artful/main ppc64el automake all 1:1.15-5ubuntu1 [509 kB] Get:21 http://ftpmaster.internal/ubuntu artful/main ppc64el autopoint all 0.19.8.1-2ubuntu1 [411 kB] Get:22 http://ftpmaster.internal/ubuntu artful/universe ppc64el chrpath ppc64el 0.16-2 [13.3 kB] Get:23 http://ftpmaster.internal/ubuntu artful/main ppc64el libtool all 2.4.6-2 [194 kB] Get:24 http://ftpmaster.internal/ubuntu artful/main ppc64el dh-autoreconf all 14 [15.5 kB] Get:25 http://ftpmaster.internal/ubuntu artful/main ppc64el libarchive-zip-perl all 1.59-1 [84.0 kB] Get:26 http://ftpmaster.internal/ubuntu artful/main ppc64el libfile-stripnondeterminism-perl all 0.032-1 [12.9 kB] Get:27 http://ftpmaster.internal/ubuntu artful/main ppc64el libtimedate-perl all 2.3000-2 [37.5 kB] Get:28 http://ftpmaster.internal/ubuntu artful/main ppc64el dh-strip-nondeterminism all 0.032-1 [4894 B] Get:29 http://ftpmaster.internal/ubuntu artful/main ppc64el libcroco3 ppc64el 0.6.11-3 [74.4 kB] Get:30 http://ftpmaster.internal/ubuntu artful/main ppc64el gettext ppc64el 0.19.8.1-2ubuntu1 [1111 kB] Get:31 http://ftpmaster.internal/ubuntu artful/main ppc64el intltool-debian all 0.35.0+20060710.4 [24.9 kB] Get:32 http://ftpmaster.internal/ubuntu artful/main ppc64el po-debconf all 1.0.20 [232 kB] Get:33 http://ftpmaster.internal/ubuntu artful/main ppc64el debhelper all 10.2.5ubuntu2 [870 kB] Get:34 http://ftpmaster.internal/ubuntu artful/main ppc64el libatomic-ops-dev ppc64el 7.4.4-3 [71.0 kB] Get:35 http://ftpmaster.internal/ubuntu artful/main ppc64el libgc1c2 ppc64el 1:7.4.2-8ubuntu1 [76.8 kB] Get:36 http://ftpmaster.internal/ubuntu artful/main ppc64el libgc-dev ppc64el 1:7.4.2-8ubuntu1 [228 kB] Get:37 http://ftpmaster.internal/ubuntu artful/main ppc64el libgmpxx4ldbl ppc64el 2:6.1.2+dfsg-1 [9250 B] Get:38 http://ftpmaster.internal/ubuntu artful/main ppc64el libgmp-dev ppc64el 2:6.1.2+dfsg-1 [304 kB] Get:39 http://ftpmaster.internal/ubuntu artful/main ppc64el libtinfo-dev ppc64el 6.0+20160625-1ubuntu1 [89.1 kB] Get:40 http://ftpmaster.internal/ubuntu artful/main ppc64el libncurses5-dev ppc64el 6.0+20160625-1ubuntu1 [195 kB] Get:41 http://ftpmaster.internal/ubuntu artful/universe ppc64el libtext-unidecode-perl all 1.30-1 [99.0 kB] Get:42 http://ftpmaster.internal/ubuntu artful/main ppc64el libxml-namespacesupport-perl all 1.11-1 [13.2 kB] Get:43 http://ftpmaster.internal/ubuntu artful/main ppc64el libxml-sax-base-perl all 1.07-1 [21.5 kB] Get:44 http://ftpmaster.internal/ubuntu artful/main ppc64el libxml-sax-perl all 0.99+dfsg-2ubuntu1 [64.6 kB] Get:45 http://ftpmaster.internal/ubuntu artful/main ppc64el libxml-libxml-perl ppc64el 2.0128+dfsg-1build1 [302 kB] Get:46 http://ftpmaster.internal/ubuntu artful/main ppc64el tex-common all 6.06 [545 kB] Get:47 http://ftpmaster.internal/ubuntu artful/universe ppc64el texinfo ppc64el 6.3.0.dfsg.1-1 [746 kB] Get:48 http://ftpmaster.internal/ubuntu artful/main ppc64el libffi-dev ppc64el 3.2.1-6 [160 kB] debconf: delaying package configuration, since apt-utils is not installed Fetched 19.5 MB in 1s (15.9 MB/s) (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 ... 12352 files and directories currently installed.) Removing pkg-create-dbgsym (0.73) ... Selecting previously unselected package install-info. (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 ... 12343 files and directories currently installed.) Preparing to unpack .../install-info_6.3.0.dfsg.1-1_ppc64el.deb ... Unpacking install-info (6.3.0.dfsg.1-1) ... Setting up install-info (6.3.0.dfsg.1-1) ... Selecting previously unselected package groff-base. (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 ... 12356 files and directories currently installed.) Preparing to unpack .../00-groff-base_1.22.3-9_ppc64el.deb ... Unpacking groff-base (1.22.3-9) ... Selecting previously unselected package libbsd0:ppc64el. Preparing to unpack .../01-libbsd0_0.8.3-1_ppc64el.deb ... Unpacking libbsd0:ppc64el (0.8.3-1) ... Selecting previously unselected package bsdmainutils. Preparing to unpack .../02-bsdmainutils_9.0.12ubuntu1_ppc64el.deb ... Unpacking bsdmainutils (9.0.12ubuntu1) ... Selecting previously unselected package libpipeline1:ppc64el. Preparing to unpack .../03-libpipeline1_1.4.1-2_ppc64el.deb ... Unpacking libpipeline1:ppc64el (1.4.1-2) ... Selecting previously unselected package man-db. Preparing to unpack .../04-man-db_2.7.6.1-2_ppc64el.deb ... Unpacking man-db (2.7.6.1-2) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../05-libmagic-mgc_1%3a5.30-1_ppc64el.deb ... Unpacking libmagic-mgc (1:5.30-1) ... Selecting previously unselected package libmagic1:ppc64el. Preparing to unpack .../06-libmagic1_1%3a5.30-1_ppc64el.deb ... Unpacking libmagic1:ppc64el (1:5.30-1) ... Selecting previously unselected package file. Preparing to unpack .../07-file_1%3a5.30-1_ppc64el.deb ... Unpacking file (1:5.30-1) ... Selecting previously unselected package ucf. Preparing to unpack .../08-ucf_3.0036_all.deb ... Moving old data out of the way Unpacking ucf (3.0036) ... Selecting previously unselected package gettext-base. Preparing to unpack .../09-gettext-base_0.19.8.1-2ubuntu1_ppc64el.deb ... Unpacking gettext-base (0.19.8.1-2ubuntu1) ... Selecting previously unselected package libglib2.0-0:ppc64el. Preparing to unpack .../10-libglib2.0-0_2.52.0-1_ppc64el.deb ... Unpacking libglib2.0-0:ppc64el (2.52.0-1) ... Selecting previously unselected package libicu57:ppc64el. Preparing to unpack .../11-libicu57_57.1-6_ppc64el.deb ... Unpacking libicu57:ppc64el (57.1-6) ... Selecting previously unselected package libxml2:ppc64el. Preparing to unpack .../12-libxml2_2.9.4+dfsg1-2.2_ppc64el.deb ... Unpacking libxml2:ppc64el (2.9.4+dfsg1-2.2) ... Selecting previously unselected package libsigsegv2:ppc64el. Preparing to unpack .../13-libsigsegv2_2.10-5_ppc64el.deb ... Unpacking libsigsegv2:ppc64el (2.10-5) ... Selecting previously unselected package m4. Preparing to unpack .../14-m4_1.4.18-1_ppc64el.deb ... Unpacking m4 (1.4.18-1) ... Selecting previously unselected package autoconf. Preparing to unpack .../15-autoconf_2.69-10_all.deb ... Unpacking autoconf (2.69-10) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../16-autotools-dev_20161112.1_all.deb ... Unpacking autotools-dev (20161112.1) ... Selecting previously unselected package automake. Preparing to unpack .../17-automake_1%3a1.15-5ubuntu1_all.deb ... Unpacking automake (1:1.15-5ubuntu1) ... Selecting previously unselected package autopoint. Preparing to unpack .../18-autopoint_0.19.8.1-2ubuntu1_all.deb ... Unpacking autopoint (0.19.8.1-2ubuntu1) ... Selecting previously unselected package chrpath. Preparing to unpack .../19-chrpath_0.16-2_ppc64el.deb ... Unpacking chrpath (0.16-2) ... Selecting previously unselected package libtool. Preparing to unpack .../20-libtool_2.4.6-2_all.deb ... Unpacking libtool (2.4.6-2) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../21-dh-autoreconf_14_all.deb ... Unpacking dh-autoreconf (14) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../22-libarchive-zip-perl_1.59-1_all.deb ... Unpacking libarchive-zip-perl (1.59-1) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../23-libfile-stripnondeterminism-perl_0.032-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (0.032-1) ... Selecting previously unselected package libtimedate-perl. Preparing to unpack .../24-libtimedate-perl_2.3000-2_all.deb ... Unpacking libtimedate-perl (2.3000-2) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../25-dh-strip-nondeterminism_0.032-1_all.deb ... Unpacking dh-strip-nondeterminism (0.032-1) ... Selecting previously unselected package libcroco3:ppc64el. Preparing to unpack .../26-libcroco3_0.6.11-3_ppc64el.deb ... Unpacking libcroco3:ppc64el (0.6.11-3) ... Selecting previously unselected package gettext. Preparing to unpack .../27-gettext_0.19.8.1-2ubuntu1_ppc64el.deb ... Unpacking gettext (0.19.8.1-2ubuntu1) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../28-intltool-debian_0.35.0+20060710.4_all.deb ... Unpacking intltool-debian (0.35.0+20060710.4) ... Selecting previously unselected package po-debconf. Preparing to unpack .../29-po-debconf_1.0.20_all.deb ... Unpacking po-debconf (1.0.20) ... Selecting previously unselected package debhelper. Preparing to unpack .../30-debhelper_10.2.5ubuntu2_all.deb ... Unpacking debhelper (10.2.5ubuntu2) ... Selecting previously unselected package libatomic-ops-dev. Preparing to unpack .../31-libatomic-ops-dev_7.4.4-3_ppc64el.deb ... Unpacking libatomic-ops-dev (7.4.4-3) ... Selecting previously unselected package libgc1c2:ppc64el. Preparing to unpack .../32-libgc1c2_1%3a7.4.2-8ubuntu1_ppc64el.deb ... Unpacking libgc1c2:ppc64el (1:7.4.2-8ubuntu1) ... Selecting previously unselected package libgc-dev:ppc64el. Preparing to unpack .../33-libgc-dev_1%3a7.4.2-8ubuntu1_ppc64el.deb ... Unpacking libgc-dev:ppc64el (1:7.4.2-8ubuntu1) ... Selecting previously unselected package libgmpxx4ldbl:ppc64el. Preparing to unpack .../34-libgmpxx4ldbl_2%3a6.1.2+dfsg-1_ppc64el.deb ... Unpacking libgmpxx4ldbl:ppc64el (2:6.1.2+dfsg-1) ... Selecting previously unselected package libgmp-dev:ppc64el. Preparing to unpack .../35-libgmp-dev_2%3a6.1.2+dfsg-1_ppc64el.deb ... Unpacking libgmp-dev:ppc64el (2:6.1.2+dfsg-1) ... Selecting previously unselected package libtinfo-dev:ppc64el. Preparing to unpack .../36-libtinfo-dev_6.0+20160625-1ubuntu1_ppc64el.deb ... Unpacking libtinfo-dev:ppc64el (6.0+20160625-1ubuntu1) ... Selecting previously unselected package libncurses5-dev:ppc64el. Preparing to unpack .../37-libncurses5-dev_6.0+20160625-1ubuntu1_ppc64el.deb ... Unpacking libncurses5-dev:ppc64el (6.0+20160625-1ubuntu1) ... Selecting previously unselected package libtext-unidecode-perl. Preparing to unpack .../38-libtext-unidecode-perl_1.30-1_all.deb ... Unpacking libtext-unidecode-perl (1.30-1) ... Selecting previously unselected package libxml-namespacesupport-perl. Preparing to unpack .../39-libxml-namespacesupport-perl_1.11-1_all.deb ... Unpacking libxml-namespacesupport-perl (1.11-1) ... Selecting previously unselected package libxml-sax-base-perl. Preparing to unpack .../40-libxml-sax-base-perl_1.07-1_all.deb ... Unpacking libxml-sax-base-perl (1.07-1) ... Selecting previously unselected package libxml-sax-perl. Preparing to unpack .../41-libxml-sax-perl_0.99+dfsg-2ubuntu1_all.deb ... Unpacking libxml-sax-perl (0.99+dfsg-2ubuntu1) ... Selecting previously unselected package libxml-libxml-perl. Preparing to unpack .../42-libxml-libxml-perl_2.0128+dfsg-1build1_ppc64el.deb ... Unpacking libxml-libxml-perl (2.0128+dfsg-1build1) ... Selecting previously unselected package tex-common. Preparing to unpack .../43-tex-common_6.06_all.deb ... Unpacking tex-common (6.06) ... Selecting previously unselected package texinfo. Preparing to unpack .../44-texinfo_6.3.0.dfsg.1-1_ppc64el.deb ... Unpacking texinfo (6.3.0.dfsg.1-1) ... Selecting previously unselected package libffi-dev:ppc64el. Preparing to unpack .../45-libffi-dev_3.2.1-6_ppc64el.deb ... Unpacking libffi-dev:ppc64el (3.2.1-6) ... Selecting previously unselected package sbuild-build-depends-ecl-dummy. Preparing to unpack .../46-sbuild-build-depends-ecl-dummy_0.invalid.0_ppc64el.deb ... Unpacking sbuild-build-depends-ecl-dummy (0.invalid.0) ... Setting up chrpath (0.16-2) ... Setting up libarchive-zip-perl (1.59-1) ... Setting up libxml-namespacesupport-perl (1.11-1) ... Setting up libtimedate-perl (2.3000-2) ... Setting up libsigsegv2:ppc64el (2.10-5) ... Processing triggers for install-info (6.3.0.dfsg.1-1) ... Setting up groff-base (1.22.3-9) ... Setting up libglib2.0-0:ppc64el (2.52.0-1) ... No schema files found: doing nothing. Setting up libtext-unidecode-perl (1.30-1) ... Setting up libtinfo-dev:ppc64el (6.0+20160625-1ubuntu1) ... Setting up libgc1c2:ppc64el (1:7.4.2-8ubuntu1) ... Setting up libffi-dev:ppc64el (3.2.1-6) ... Setting up gettext-base (0.19.8.1-2ubuntu1) ... Setting up libpipeline1:ppc64el (1.4.1-2) ... Setting up m4 (1.4.18-1) ... Setting up libicu57:ppc64el (57.1-6) ... Setting up libbsd0:ppc64el (0.8.3-1) ... Setting up ucf (3.0036) ... Setting up libxml2:ppc64el (2.9.4+dfsg1-2.2) ... Setting up libmagic-mgc (1:5.30-1) ... Setting up libmagic1:ppc64el (1:5.30-1) ... Setting up libcroco3:ppc64el (0.6.11-3) ... Setting up libncurses5-dev:ppc64el (6.0+20160625-1ubuntu1) ... Setting up libxml-sax-base-perl (1.07-1) ... Processing triggers for libc-bin (2.24-9ubuntu2) ... Setting up autotools-dev (20161112.1) ... Setting up libatomic-ops-dev (7.4.4-3) ... Setting up bsdmainutils (9.0.12ubuntu1) ... update-alternatives: using /usr/bin/bsd-write to provide /usr/bin/write (write) in auto mode update-alternatives: using /usr/bin/bsd-from to provide /usr/bin/from (from) in auto mode Setting up libgmpxx4ldbl:ppc64el (2:6.1.2+dfsg-1) ... Setting up autopoint (0.19.8.1-2ubuntu1) ... Setting up libfile-stripnondeterminism-perl (0.032-1) ... Setting up libxml-sax-perl (0.99+dfsg-2ubuntu1) ... update-perl-sax-parsers: Registering Perl SAX parser XML::SAX::PurePerl with priority 10... update-perl-sax-parsers: Updating overall Perl SAX parser modules info file... Creating config file /etc/perl/XML/SAX/ParserDetails.ini with new version Setting up libgmp-dev:ppc64el (2:6.1.2+dfsg-1) ... Setting up libgc-dev:ppc64el (1:7.4.2-8ubuntu1) ... Setting up tex-common (6.06) ... update-language: texlive-base not installed and configured, doing nothing! Setting up gettext (0.19.8.1-2ubuntu1) ... Setting up autoconf (2.69-10) ... Setting up file (1:5.30-1) ... Setting up intltool-debian (0.35.0+20060710.4) ... Setting up automake (1:1.15-5ubuntu1) ... update-alternatives: using /usr/bin/automake-1.15 to provide /usr/bin/automake (automake) in auto mode Setting up man-db (2.7.6.1-2) ... Not building database; man-db/auto-update is not 'true'. Setting up libxml-libxml-perl (2.0128+dfsg-1build1) ... update-perl-sax-parsers: Registering Perl SAX parser XML::LibXML::SAX::Parser with priority 50... update-perl-sax-parsers: Registering Perl SAX parser XML::LibXML::SAX with priority 50... update-perl-sax-parsers: Updating overall Perl SAX parser modules info file... Replacing config file /etc/perl/XML/SAX/ParserDetails.ini with new version Setting up libtool (2.4.6-2) ... Setting up po-debconf (1.0.20) ... Setting up texinfo (6.3.0.dfsg.1-1) ... Setting up dh-autoreconf (14) ... Setting up debhelper (10.2.5ubuntu2) ... Setting up sbuild-build-depends-ecl-dummy (0.invalid.0) ... Setting up dh-strip-nondeterminism (0.032-1) ... (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 ... 15256 files and directories currently installed.) Purging configuration files for pkg-create-dbgsym (0.73) ... Processing triggers for libc-bin (2.24-9ubuntu2) ... +------------------------------------------------------------------------------+ | Build environment | +------------------------------------------------------------------------------+ Kernel: Linux 4.4.0-77-generic ppc64el (ppc64le) Toolchain package versions: binutils_2.28-4ubuntu1 dpkg-dev_1.18.23ubuntu4 g++-6_6.3.0-16ubuntu6 gcc-6_6.3.0-16ubuntu6 libc6-dev_2.24-9ubuntu2 libstdc++-6-dev_6.3.0-16ubuntu6 libstdc++6_7.1.0-4ubuntu1 linux-libc-dev_4.10.0-21.23 Package versions: adduser_3.113+nmu3ubuntu5 advancecomp_1.23-1 apt_1.4.2 apt-transport-https_1.4.2 autoconf_2.69-10 automake_1:1.15-5ubuntu1 autopoint_0.19.8.1-2ubuntu1 autotools-dev_20161112.1 base-files_9.6ubuntu99 base-passwd_3.5.43 bash_4.4-2ubuntu1 binutils_2.28-4ubuntu1 bsdmainutils_9.0.12ubuntu1 bsdutils_1:2.29-1ubuntu2 build-essential_12.1ubuntu2 bzip2_1.0.6-8.1 ca-certificates_20161130 chrpath_0.16-2 coreutils_8.26-3ubuntu3 cpp_4:6.3.0-2ubuntu1 cpp-6_6.3.0-16ubuntu6 dash_0.5.8-2.3ubuntu1 debconf_1.5.60ubuntu1 debhelper_10.2.5ubuntu2 debianutils_4.8.1.1 dh-autoreconf_14 dh-strip-nondeterminism_0.032-1 diffutils_1:3.5-3 dmsetup_2:1.02.136-1ubuntu6 dpkg_1.18.23ubuntu4 dpkg-dev_1.18.23ubuntu4 e2fslibs_1.43.4-2 e2fsprogs_1.43.4-2 fakeroot_1.21-1ubuntu2 file_1:5.30-1 findutils_4.6.0+git+20161106-2 g++_4:6.3.0-2ubuntu1 g++-6_6.3.0-16ubuntu6 gcc_4:6.3.0-2ubuntu1 gcc-6_6.3.0-16ubuntu6 gcc-6-base_6.3.0-16ubuntu6 gcc-7-base_7.1.0-4ubuntu1 gettext_0.19.8.1-2ubuntu1 gettext-base_0.19.8.1-2ubuntu1 gnupg_2.1.15-1ubuntu7 gnupg-agent_2.1.15-1ubuntu7 gpgv_2.1.15-1ubuntu7 grep_2.27-2 groff-base_1.22.3-9 gzip_1.6-5ubuntu1 hostname_3.18 init_1.48 init-system-helpers_1.48 initscripts_2.88dsf-59.3ubuntu2 insserv_1.14.0-5ubuntu3 install-info_6.3.0.dfsg.1-1 intltool-debian_0.35.0+20060710.4 libacl1_2.2.52-3build1 libapparmor1_2.11.0-2ubuntu5 libapt-pkg5.0_1.4.2 libarchive-zip-perl_1.59-1 libasan3_6.3.0-16ubuntu6 libasn1-8-heimdal_7.1.0+dfsg-13 libassuan0_2.4.3-2 libatomic-ops-dev_7.4.4-3 libatomic1_7.1.0-4ubuntu1 libattr1_1:2.4.47-2build1 libaudit-common_1:2.6.6-1ubuntu1 libaudit1_1:2.6.6-1ubuntu1 libblkid1_2.29-1ubuntu2 libbsd0_0.8.3-1 libbz2-1.0_1.0.6-8.1 libc-bin_2.24-9ubuntu2 libc-dev-bin_2.24-9ubuntu2 libc6_2.24-9ubuntu2 libc6-dev_2.24-9ubuntu2 libcap-ng0_0.7.7-3 libcap2_1:2.25-1 libcc1-0_7.1.0-4ubuntu1 libcomerr2_1.43.4-2 libcroco3_0.6.11-3 libcryptsetup4_2:1.7.2-0ubuntu1 libcurl3-gnutls_7.52.1-5ubuntu1 libdb5.3_5.3.28-12 libdebconfclient0_0.213ubuntu1 libdevmapper1.02.1_2:1.02.136-1ubuntu6 libdpkg-perl_1.18.23ubuntu4 libfakeroot_1.21-1ubuntu2 libfdisk1_2.29-1ubuntu2 libffi-dev_3.2.1-6 libffi6_3.2.1-6 libfile-stripnondeterminism-perl_0.032-1 libgc-dev_1:7.4.2-8ubuntu1 libgc1c2_1:7.4.2-8ubuntu1 libgcc-6-dev_6.3.0-16ubuntu6 libgcc1_1:7.1.0-4ubuntu1 libgcrypt20_1.7.6-1 libgdbm3_1.8.3-14 libglib2.0-0_2.52.0-1 libgmp-dev_2:6.1.2+dfsg-1 libgmp10_2:6.1.2+dfsg-1 libgmpxx4ldbl_2:6.1.2+dfsg-1 libgnutls30_3.5.8-5ubuntu1 libgomp1_7.1.0-4ubuntu1 libgpg-error0_1.26-2 libgssapi-krb5-2_1.15-2 libgssapi3-heimdal_7.1.0+dfsg-13 libhcrypto4-heimdal_7.1.0+dfsg-13 libheimbase1-heimdal_7.1.0+dfsg-13 libheimntlm0-heimdal_7.1.0+dfsg-13 libhogweed4_3.3-1 libhx509-5-heimdal_7.1.0+dfsg-13 libicu57_57.1-6 libidn11_1.33-1 libidn2-0_0.16-1 libip4tc0_1.6.0-3ubuntu2 libisl15_0.18-1 libitm1_7.1.0-4ubuntu1 libk5crypto3_1.15-2 libkeyutils1_1.5.9-9ubuntu1 libkmod2_24-1ubuntu1 libkrb5-26-heimdal_7.1.0+dfsg-13 libkrb5-3_1.15-2 libkrb5support0_1.15-2 libksba8_1.3.5-2 libldap-2.4-2_2.4.44+dfsg-4ubuntu1 libldap-common_2.4.44+dfsg-4ubuntu1 liblockfile-bin_1.14-1 liblockfile1_1.14-1 liblz4-1_0.0~r131-2ubuntu2 liblzma5_5.2.2-1.2 libmagic-mgc_1:5.30-1 libmagic1_1:5.30-1 libmount1_2.29-1ubuntu2 libmpc3_1.0.3-1 libmpfr4_3.1.5-1 libncurses5_6.0+20160625-1ubuntu1 libncurses5-dev_6.0+20160625-1ubuntu1 libncursesw5_6.0+20160625-1ubuntu1 libnettle6_3.3-1 libnpth0_1.3-1 libp11-kit0_0.23.3-5 libpam-modules_1.1.8-3.2ubuntu3 libpam-modules-bin_1.1.8-3.2ubuntu3 libpam-runtime_1.1.8-3.2ubuntu3 libpam0g_1.1.8-3.2ubuntu3 libpcre3_2:8.39-3 libperl5.24_5.24.1-2ubuntu1 libpipeline1_1.4.1-2 libpng16-16_1.6.29-2 libprocps6_2:3.3.12-1ubuntu2 libpsl5_0.17.0-4 libreadline7_7.0-0ubuntu2 libroken18-heimdal_7.1.0+dfsg-13 librtmp1_2.4+20151223.gitfa8646d.1-1 libsasl2-2_2.1.27~101-g0780600+dfsg-2ubuntu1 libsasl2-modules-db_2.1.27~101-g0780600+dfsg-2ubuntu1 libseccomp2_2.3.1-2.1ubuntu1 libselinux1_2.6-3 libsemanage-common_2.6-2 libsemanage1_2.6-2 libsepol1_2.6-2 libsigsegv2_2.10-5 libslang2_2.3.1-5ubuntu1 libsmartcols1_2.29-1ubuntu2 libsqlite3-0_3.16.2-3 libss2_1.43.4-2 libssl1.0.0_1.0.2g-1ubuntu12 libstdc++-6-dev_6.3.0-16ubuntu6 libstdc++6_7.1.0-4ubuntu1 libsystemd0_233-6ubuntu1 libtasn1-6_4.10-1 libtext-unidecode-perl_1.30-1 libtimedate-perl_2.3000-2 libtinfo-dev_6.0+20160625-1ubuntu1 libtinfo5_6.0+20160625-1ubuntu1 libtool_2.4.6-2 libubsan0_7.1.0-4ubuntu1 libudev1_233-6ubuntu1 libunistring0_0.9.3-5.2ubuntu1 libusb-0.1-4_2:0.1.12-31 libustr-1.0-1_1.0.4-6 libuuid1_2.29-1ubuntu2 libwind0-heimdal_7.1.0+dfsg-13 libxml-libxml-perl_2.0128+dfsg-1build1 libxml-namespacesupport-perl_1.11-1 libxml-sax-base-perl_1.07-1 libxml-sax-perl_0.99+dfsg-2ubuntu1 libxml2_2.9.4+dfsg1-2.2 linux-libc-dev_4.10.0-21.23 lockfile-progs_0.1.17build1 login_1:4.2-3.2ubuntu1 lsb-base_9.20160110ubuntu5 m4_1.4.18-1 make_4.1-9.1 man-db_2.7.6.1-2 mawk_1.3.3-17ubuntu2 mount_2.29-1ubuntu2 multiarch-support_2.24-9ubuntu2 ncurses-base_6.0+20160625-1ubuntu1 ncurses-bin_6.0+20160625-1ubuntu1 openssl_1.0.2g-1ubuntu12 optipng_0.7.6-1build1 passwd_1:4.2-3.2ubuntu1 patch_2.7.5-1build1 perl_5.24.1-2ubuntu1 perl-base_5.24.1-2ubuntu1 perl-modules-5.24_5.24.1-2ubuntu1 pinentry-curses_1.0.0-2 pkgbinarymangler_131 po-debconf_1.0.20 policyrcd-script-zg2_0.1-3 procps_2:3.3.12-1ubuntu2 readline-common_7.0-0ubuntu2 sbuild-build-depends-core-dummy_0.invalid.0 sbuild-build-depends-ecl-dummy_0.invalid.0 sed_4.4-1 sensible-utils_0.0.9 systemd_233-6ubuntu1 systemd-sysv_233-6ubuntu1 sysv-rc_2.88dsf-59.3ubuntu2 sysvinit-utils_2.88dsf-59.8git1 tar_1.29b-1.1 tex-common_6.06 texinfo_6.3.0.dfsg.1-1 tzdata_2017b-1 ubuntu-keyring_2016.10.27 ucf_3.0036 util-linux_2.29-1ubuntu2 xz-utils_5.2.2-1.2 zlib1g_1:1.2.11.dfsg-0ubuntu1 +------------------------------------------------------------------------------+ | Build | +------------------------------------------------------------------------------+ Unpack source ------------- gpgv: Signature made Sun May 7 15:08:34 2017 UTC gpgv: using RSA key gpgv: Can't check signature: No public key dpkg-source: warning: failed to verify signature on ./ecl_16.1.2-2.dsc dpkg-source: info: extracting ecl in ecl-16.1.2 dpkg-source: info: unpacking ecl_16.1.2.orig.tar.gz dpkg-source: info: unpacking ecl_16.1.2-2.debian.tar.xz dpkg-source: info: applying harden-configure.patch dpkg-source: info: applying patch-hurd.patch Check disc space ---------------- Sufficient free space for build User Environment ---------------- APT_CONFIG=/var/lib/sbuild/apt.conf DEB_BUILD_OPTIONS=parallel=4 HOME=/home/buildd LANG=C.UTF-8 LC_ALL=C.UTF-8 LOGNAME=buildd MAIL=/var/mail/buildd OLDPWD=/ PATH=/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games:/usr/local/games PWD=/<> SHELL=/bin/sh SUDO_COMMAND=/usr/sbin/chroot /<> su buildd -s /bin/sh -c cd '/<>' && 'env' SUDO_GID=2501 SUDO_UID=2001 SUDO_USER=buildd TERM=unknown USER=buildd USERNAME=root dpkg-buildpackage ----------------- dpkg-buildpackage: info: source package ecl dpkg-buildpackage: info: source version 16.1.2-2 dpkg-buildpackage: info: source distribution unstable dpkg-source --before-build ecl-16.1.2 dpkg-buildpackage: info: host architecture ppc64el fakeroot debian/rules clean dh clean --with autoreconf dh: Compatibility levels before 9 are deprecated (level 7 in use) dh_testdir dh_auto_clean dh_auto_clean: Compatibility levels before 9 are deprecated (level 7 in use) dh_autoreconf_clean dh_clean dh_clean: Compatibility levels before 9 are deprecated (level 7 in use) debian/rules build-arch dh build-arch --with autoreconf dh: Compatibility levels before 9 are deprecated (level 7 in use) dh_testdir -a dh_update_autotools_config -a debian/rules override_dh_autoreconf make[1]: Entering directory '/<>' dh_autoreconf autoreconf -- -f -i src/ make[1]: Leaving directory '/<>' debian/rules override_dh_auto_configure make[1]: Entering directory '/<>' touch src/configure.in && \ touch src/aclocal.m4 && \ touch src/configure configure dh_auto_configure -- \ --prefix=/usr --mandir=\${prefix}/share/man \ --infodir=\${prefix}/share/info \ --with-system-gmp=yes \ --with-tcp \ --with-clx \ --enable-threads=yes \ --enable-boehm=system \ --enable-libatomic=system \ --disable-rpath \ --with-x dh_auto_configure: Compatibility levels before 9 are deprecated (level 7 in use) ./configure --build=powerpc64le-linux-gnu --prefix=/usr --includedir=\${prefix}/include --mandir=\${prefix}/share/man --infodir=\${prefix}/share/info --sysconfdir=/etc --localstatedir=/var --disable-silent-rules --libexecdir=\${prefix}/lib/ecl --disable-maintainer-mode --disable-dependency-tracking --prefix=/usr --mandir=\${prefix}/share/man --infodir=\${prefix}/share/info --with-system-gmp=yes --with-tcp --with-clx --enable-threads=yes --enable-boehm=system --enable-libatomic=system --disable-rpath --with-x Creating directory `build' Switching to directory `build' to continue configuration. configure: WARNING: unrecognized options: --disable-silent-rules, --disable-maintainer-mode, --disable-dependency-tracking checking build system type... powerpc64le-unknown-linux-gnu checking host system type... powerpc64le-unknown-linux-gnu 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 for g++... g++ checking whether we are using the GNU C++ compiler... yes checking whether g++ accepts -g... yes checking how to run the C preprocessor... gcc -E checking for ranlib... ranlib checking for a BSD-compatible install... /usr/bin/install -c checking whether ln -s works... yes checking whether make sets $(MAKE)... yes checking for ranlib... (cached) ranlib checking for ar... ar checking for etags... no checking for emacs-etags... no checking for ld flags when building shared libraries... -shared checking for required libraries... -ldl checking for architecture... POWERPC64LE checking for software type... linux / checking for __thread local data... yes checking for install-info... /usr/bin/install-info checking for __gmpz_init in -lgmp... yes checking for grep that handles long lines and -e... /bin/grep checking for egrep... /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 gmp.h usability... yes checking gmp.h presence... yes checking for gmp.h... yes checking GMP autoconf... "yes." checking for getpwnam in -lsun... no checking for library containing strerror... none required checking for pthread_rwlock_init... yes checking for thread object files... threads/process threads/queue threads/mutex threads/condition_variable threads/semaphore threads/barrier threads/mailbox threads/rwlock checking for use of __thread... no checking for GC_get_thr_restart_signal in -lgc... yes checking for GC_register_my_thread in -lgc... yes checking gc.h usability... yes checking gc.h presence... yes checking for gc.h... yes checking for GC_set_start_callback in -lgc... yes checking whether we can use the existing Boehm-Weiser library ... yes checking if we use Boehm-Demers-Weiser precise garbage collector... no checking for ffi_closure_alloc in -lffi... yes checking ffi/ffi.h usability... no checking ffi/ffi.h presence... no checking for ffi/ffi.h... no checking ffi.h usability... yes checking ffi.h presence... yes checking for ffi.h... yes checking whether we can use the existing libffi library ... yes checking for soname flags... -Wl,-soname,libecl.so.16.1 checking for X... no checking for dirent.h that defines DIR... yes checking for library containing opendir... none required checking for stdbool.h that conforms to C99... yes checking for _Bool... yes checking for ANSI C header files... (cached) yes checking whether time.h and sys/time.h may both be included... yes checking fcntl.h usability... yes checking fcntl.h presence... yes checking for fcntl.h... yes checking limits.h usability... yes checking limits.h presence... yes checking for limits.h... yes checking netdb.h usability... yes checking netdb.h presence... yes checking for netdb.h... yes checking netinet/in.h usability... yes checking netinet/in.h presence... yes checking for netinet/in.h... yes checking stddef.h usability... yes checking stddef.h presence... yes checking for stddef.h... yes checking for stdlib.h... (cached) yes checking for string.h... (cached) yes checking sys/param.h usability... yes checking sys/param.h presence... yes checking for sys/param.h... yes checking sys/socket.h usability... yes checking sys/socket.h presence... yes checking for sys/socket.h... yes checking sys/time.h usability... yes checking sys/time.h presence... yes checking for sys/time.h... yes checking for unistd.h... (cached) yes checking fenv.h usability... yes checking fenv.h presence... yes checking for fenv.h... yes checking sched.h usability... yes checking sched.h presence... yes checking for sched.h... yes checking sys/resource.h usability... yes checking sys/resource.h presence... yes checking for sys/resource.h... yes checking sys/utsname.h usability... yes checking sys/utsname.h presence... yes checking for sys/utsname.h... yes checking float.h usability... yes checking float.h presence... yes checking for float.h... yes checking pwd.h usability... yes checking pwd.h presence... yes checking for pwd.h... yes checking dlfcn.h usability... yes checking dlfcn.h presence... yes checking for dlfcn.h... yes checking link.h usability... yes checking link.h presence... yes checking for link.h... yes checking mach-o/dyld.h usability... no checking mach-o/dyld.h presence... no checking for mach-o/dyld.h... no checking dirent.h usability... yes checking dirent.h presence... yes checking for dirent.h... yes checking sys/ioctl.h usability... yes checking sys/ioctl.h presence... yes checking for sys/ioctl.h... yes checking sys/select.h usability... yes checking sys/select.h presence... yes checking for sys/select.h... yes checking sys/wait.h usability... yes checking sys/wait.h presence... yes checking for sys/wait.h... yes checking semaphore.h usability... yes checking semaphore.h presence... yes checking for semaphore.h... yes checking for ulimit.h... yes checking for an ANSI C-conforming const... yes checking for inline... inline checking for size_t... yes checking whether struct tm is in sys/time.h or time.h... time.h checking for working volatile... yes checking for ptrdiff_t... yes checking size of long long... 64 checking whether byte ordering is bigendian... no checking appropiate type for fixnums... long int checking for stdint.h... (cached) yes checking for int8_t... yes checking for uint8_t... yes checking for int16_t... yes checking for uint16_t... yes checking for int32_t... yes checking for uint32_t... yes checking for int64_t... yes checking for uint64_t... yes checking character sequence for end of line... lf checking for _longjmp... yes checking for code to detect FP exceptions... not available checking for long double... yes checking for sinl... yes checking for cosl... yes checking for tanl... yes checking for logl... yes checking for expl... yes checking whether stack growns downwards... yes checking whether closedir returns void... no checking for error_at_line... yes checking for pid_t... yes checking vfork.h usability... no checking vfork.h presence... no checking for vfork.h... no checking for fork... yes checking for vfork... yes checking for working fork... yes checking for working vfork... (cached) yes checking whether gcc needs -traditional... no checking for stdlib.h... (cached) yes checking for GNU libc compatible malloc... yes checking for working memcmp... yes checking for stdlib.h... (cached) yes checking for unistd.h... (cached) yes checking for sys/param.h... (cached) yes checking for getpagesize... yes checking for working mmap... yes checking for stdlib.h... (cached) yes checking for GNU libc compatible realloc... yes checking for sys/select.h... (cached) yes checking for sys/socket.h... (cached) yes checking types of arguments for select... int,fd_set *,struct timeval * checking return type of signal handlers... void checking whether lstat correctly handles trailing slash... yes checking whether stat accepts an empty string... no checking for working strtod... yes checking for floor... yes checking for getcwd... yes checking for gethostbyaddr... yes checking for gethostbyname... yes checking for getpagesize... (cached) yes checking for memmove... yes checking for memset... yes checking for mkdir... yes checking for putenv... yes checking for socket... yes checking for sqrt... yes checking for strcasecmp... yes checking for strchr... yes checking for strerror... yes checking for strtol... yes checking for nanosleep... yes checking for alarm... yes checking for times... yes checking for select... yes checking for setenv... yes checking for putenv... (cached) yes checking for lstat... yes checking for mkstemp... yes checking for sigprocmask... yes checking for isatty... yes checking for tzset... yes checking for gettimeofday... yes checking for getrusage... yes checking for expf... yes checking for logf... yes checking for sqrtf... yes checking for cosf... yes checking for sinf... yes checking for tanf... yes checking for sinhf... yes checking for coshf... yes checking for tanhf... yes checking for floorf... yes checking for ceilf... yes checking for fabsf... yes checking for frexpf... yes checking for ldexpf... yes checking for log1p... yes checking for log1pf... yes checking for log1pl... yes checking for copysign... yes checking for sched_yield... yes checking for uname... yes checking for fseeko... yes checking for dladdr... yes checking for backtrace... yes checking for backtrace_symbols... yes checking sys/mman.h usability... yes checking sys/mman.h presence... yes checking for sys/mman.h... yes checking working environ... yes checking atomic_ops.h usability... yes checking atomic_ops.h presence... yes checking for atomic_ops.h... yes checking libatomic-ops version ... system = init form configure: creating ./config.status config.status: creating bare.lsp config.status: creating lsp/load.lsp config.status: creating clos/load.lsp config.status: creating cmp/load.lsp config.status: creating new-cmp/load.lsp config.status: creating ../Makefile config.status: WARNING: '../Makefile.in' seems to ignore the --datarootdir setting config.status: creating Makefile config.status: WARNING: '/<>/src/Makefile.in' seems to ignore the --datarootdir setting config.status: creating c/Makefile config.status: creating doc/Makefile config.status: WARNING: '/<>/src/doc/Makefile.in' seems to ignore the --datarootdir setting config.status: creating doc/ecl.man config.status: creating doc/ecl-config.man config.status: creating ecl/configpre.h config.status: creating bin/ecl-config.pre config.status: creating lsp/config.pre config.status: creating compile.pre config.status: creating cmp/cmpdefs.pre config.status: creating tests/config.lsp config.status: creating tests/Makefile config.status: creating ecl/config.h configure: WARNING: unrecognized options: --disable-silent-rules, --disable-maintainer-mode, --disable-dependency-tracking Configuration complete. To build ECL, issue make in this directory. make[1]: Leaving directory '/<>' dh_auto_build -a dh_auto_build: Compatibility levels before 9 are deprecated (level 7 in use) make -j1 make[1]: Entering directory '/<>' cd build; make make[2]: Entering directory '/<>/build' cp /<>/src/util/gdbinit .gdbinit if (echo c | grep gmp); then \ cd gmp && make install && \ cd .. && mv include/gmp.h ecl/ && rmdir include && \ mv ./libgmp.a ./libeclgmp.a; \ fi if (echo c | grep atomic); then \ cd atomic && make && make install && cd .. && \ rm -f -rf share ecl/atomic_ops_stack.h ecl/atomic_ops_malloc.h *atomic*gpl* && \ mv libatomic_ops.a libeclatomic.a; \ fi test -d ecl/gc || mkdir ecl/gc test -d ecl/gc/private || mkdir ecl/gc/private if (echo c | grep gc); then \ cd gc && make install && cd .. && \ cp -rf /<>/src/bdwgc/include/private/*.h ecl/gc/private/ && \ mv libgc.a libeclgc.a; \ fi if (echo c | grep libffi); then \ cd libffi && make install && cd .. && \ sed -e 's, ecl/foo.h && \ rm ecl/ffi.h && mv ecl/foo.h ecl/ffi.h && \ mv libffi.a libeclffi.a; \ fi sed -e 's,@ecldir\\@,/usr/lib/ecl-16.1.2/,g' < lsp/config.pre > lsp/config.lsp sed -e 's,@ecldir\\@,"/usr/lib/ecl-16.1.2/",g' \ -e 's,@libdir\\@,"/usr/lib/",g' \ -e 's,@includedir\\@,"/usr/include/",g' < cmp/cmpdefs.pre > cmp/cmpdefs.lsp test -d c/ecl || mkdir c/ecl sed 's,__declspec(dllimport),,g' /<>/src/h/external.h > c/ecl/external.h cp -rf /<>/src/h/*.h /<>/src/h/impl ecl/ cd c; make make[3]: Entering directory '/<>/build/c' cat /<>/src/c/symbols_list.h | \ sed -e 's%{\([A-Z ]*.*".*"\),[^,]*,[ ]*NULL,.*}%{\1,NULL}%g' \ -e 's%{\([A-Z ]*.*".*"\),[^,]*,[ ]*\([^,]*\),.*}%{\1,"\2"}%g' \ -e 's%{NULL.*%{NULL,NULL}};%' | \ sed -e 's%"\(IF_[A-Z0-9]*\)(\([^)]*\))"%\1("\2")%g' > tmp.h mv tmp.h /<>/src/c/symbols_list2.h if test -f ../CROSS-DPP; then touch dpp; else \ gcc -I/<>/src/c -I/<>/build -I./ /<>/src/c/dpp.c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -o dpp ; \ fi if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/main.d main.o.c ; else ./dpp /<>/src/c/main.d main.o.c ; fi dpp: /<>/src/c/main.d -> main.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o main.o main.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/symbol.d symbol.o.c ; else ./dpp /<>/src/c/symbol.d symbol.o.c ; fi dpp: /<>/src/c/symbol.d -> symbol.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o symbol.o symbol.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/package.d package.o.c ; else ./dpp /<>/src/c/package.d package.o.c ; fi dpp: /<>/src/c/package.d -> package.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o package.o package.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/cons.d cons.o.c ; else ./dpp /<>/src/c/cons.d cons.o.c ; fi dpp: /<>/src/c/cons.d -> cons.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o cons.o cons.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/list.d list.o.c ; else ./dpp /<>/src/c/list.d list.o.c ; fi dpp: /<>/src/c/list.d -> list.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o list.o list.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/apply.d apply.c ; else ./dpp /<>/src/c/apply.d apply.c ; fi dpp: /<>/src/c/apply.d -> apply.c gcc -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c apply.c -o apply.o if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/eval.d eval.o.c ; else ./dpp /<>/src/c/eval.d eval.o.c ; fi dpp: /<>/src/c/eval.d -> eval.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o eval.o eval.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/interpreter.d interpreter.o.c ; else ./dpp /<>/src/c/interpreter.d interpreter.o.c ; fi dpp: /<>/src/c/interpreter.d -> interpreter.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o interpreter.o interpreter.o.c In file included from /<>/build/ecl/ecl.h:85:0, from /<>/src/c/interpreter.d:18: /<>/src/c/interpreter.d: In function ‘ecl_interpret’: /<>/build/ecl/stacks.h:194:32: warning: initialization discards ‘volatile’ qualifier from pointer target type [-Wdiscarded-qualifiers] ecl_ihs_ptr const r = (rec); \ ^ /<>/src/c/interpreter.d:287:9: note: in expansion of macro ‘ecl_ihs_push’ ecl_ihs_push(the_env, &ihs, bytecodes, lex_env); ^~~~~~~~~~~~ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/compiler.d compiler.o.c ; else ./dpp /<>/src/c/compiler.d compiler.o.c ; fi dpp: /<>/src/c/compiler.d -> compiler.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o compiler.o compiler.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/disassembler.d disassembler.o.c ; else ./dpp /<>/src/c/disassembler.d disassembler.o.c ; fi dpp: /<>/src/c/disassembler.d -> disassembler.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o disassembler.o disassembler.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/instance.d instance.o.c ; else ./dpp /<>/src/c/instance.d instance.o.c ; fi dpp: /<>/src/c/instance.d -> instance.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o instance.o instance.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/gfun.d gfun.o.c ; else ./dpp /<>/src/c/gfun.d gfun.o.c ; fi dpp: /<>/src/c/gfun.d -> gfun.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o gfun.o gfun.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/clos/cache.d clos/cache.o.c ; else ./dpp /<>/src/c/clos/cache.d clos/cache.o.c ; fi dpp: /<>/src/c/clos/cache.d -> clos/cache.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o clos/cache.o clos/cache.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/clos/accessor.d clos/accessor.o.c ; else ./dpp /<>/src/c/clos/accessor.d clos/accessor.o.c ; fi dpp: /<>/src/c/clos/accessor.d -> clos/accessor.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o clos/accessor.o clos/accessor.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/reference.d reference.o.c ; else ./dpp /<>/src/c/reference.d reference.o.c ; fi dpp: /<>/src/c/reference.d -> reference.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o reference.o reference.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/character.d character.o.c ; else ./dpp /<>/src/c/character.d character.o.c ; fi dpp: /<>/src/c/character.d -> character.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o character.o character.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/file.d file.o.c ; else ./dpp /<>/src/c/file.d file.o.c ; fi dpp: /<>/src/c/file.d -> file.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o file.o file.o.c /<>/src/c/file.d: In function ‘ecl_off_t_to_integer’: /<>/src/c/file.d:5359:32: warning: right shift count >= width of type [-Wshift-count-overflow] ECL_BIGNUM_LIMBS(y)[1] = offset; ^~~ /<>/src/c/file.d: In function ‘ecl_integer_to_off_t’: /<>/src/c/file.d:5386:36: warning: left shift count >= width of type [-Wshift-count-overflow] } ^ /<>/src/c/file.d: In function ‘not_a_file_stream’: /<>/src/c/file.d:5430:16: warning: function declared ‘noreturn’ has a ‘return’ statement make_constant_base_string("~A is not an file stream"), ^ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ @':format-arguments', cl_list(1, strm), ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ @':expected-type', @'file-stream', ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ @':datum', strm); ~~~~~~~~~~~~~~~~~ } ~ /<>/src/c/file.d: In function ‘file_libc_error’: /<>/src/c/file.d:5498:1: warning: ‘noreturn’ function does return ^ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/read.d read.o.c ; else ./dpp /<>/src/c/read.d read.o.c ; fi dpp: /<>/src/c/read.d -> read.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o read.o read.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/print.d print.o.c ; else ./dpp /<>/src/c/print.d print.o.c ; fi dpp: /<>/src/c/print.d -> print.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o print.o print.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/error.d error.o.c ; else ./dpp /<>/src/c/error.d error.o.c ; fi dpp: /<>/src/c/error.d -> error.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o error.o error.o.c /<>/src/c/error.d: In function ‘si_signal_type_error’: /<>/src/c/error.d:252:16: warning: function declared ‘noreturn’ has a ‘return’ statement return cl_error(5, @'type-error', @':expected-type', type, ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ @':datum', value); ~~~~~~~~~~~~~~~~~~ In file included from /<>/build/ecl/ecl.h:82:0, from /<>/src/c/error.d:20: /<>/src/c/error.d: In function ‘cl_error’: /<>/build/ecl/object.h:244:33: warning: function declared ‘noreturn’ has a ‘return’ statement #define ECL_NIL ((cl_object)t_list) ^ /<>/src/c/error.d:537:30: note: in expansion of macro ‘ECL_NIL’ @) ^ /<>/src/c/error.d: In function ‘ecl_unrecoverable_error’: /<>/src/c/error.d:102:1: warning: ‘noreturn’ function does return } ^ /<>/src/c/error.d: In function ‘FEprogram_error’: /<>/src/c/error.d:160:1: warning: ‘noreturn’ function does return } ^ /<>/src/c/error.d: In function ‘FEprogram_error_noreturn’: /<>/src/c/error.d:185:1: warning: ‘noreturn’ function does return } ^ /<>/src/c/error.d: In function ‘FEcontrol_error’: /<>/src/c/error.d:197:1: warning: ‘noreturn’ function does return } ^ /<>/src/c/error.d: In function ‘FEreader_error’: /<>/src/c/error.d:228:1: warning: ‘noreturn’ function does return } ^ /<>/src/c/error.d: In function ‘FEwrong_type_only_arg’: /<>/src/c/error.d:283:1: warning: ‘noreturn’ function does return } ^ /<>/src/c/error.d: In function ‘FEwrong_type_nth_arg’: /<>/src/c/error.d:307:1: warning: ‘noreturn’ function does return } ^ /<>/src/c/error.d: In function ‘FEwrong_type_key_arg’: /<>/src/c/error.d:331:1: warning: ‘noreturn’ function does return } ^ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/string.d string.o.c ; else ./dpp /<>/src/c/string.d string.o.c ; fi dpp: /<>/src/c/string.d -> string.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o string.o string.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/cfun.d cfun.o.c ; else ./dpp /<>/src/c/cfun.d cfun.o.c ; fi dpp: /<>/src/c/cfun.d -> cfun.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o cfun.o cfun.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/reader/parse_integer.d reader/parse_integer.o.c ; else ./dpp /<>/src/c/reader/parse_integer.d reader/parse_integer.o.c ; fi dpp: /<>/src/c/reader/parse_integer.d -> reader/parse_integer.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o reader/parse_integer.o reader/parse_integer.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/reader/parse_number.d reader/parse_number.o.c ; else ./dpp /<>/src/c/reader/parse_number.d reader/parse_number.o.c ; fi dpp: /<>/src/c/reader/parse_number.d -> reader/parse_number.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o reader/parse_number.o reader/parse_number.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/float_to_digits.d printer/float_to_digits.o.c ; else ./dpp /<>/src/c/printer/float_to_digits.d printer/float_to_digits.o.c ; fi dpp: /<>/src/c/printer/float_to_digits.d -> printer/float_to_digits.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/float_to_digits.o printer/float_to_digits.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/float_to_string.d printer/float_to_string.o.c ; else ./dpp /<>/src/c/printer/float_to_string.d printer/float_to_string.o.c ; fi dpp: /<>/src/c/printer/float_to_string.d -> printer/float_to_string.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/float_to_string.o printer/float_to_string.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/integer_to_string.d printer/integer_to_string.o.c ; else ./dpp /<>/src/c/printer/integer_to_string.d printer/integer_to_string.o.c ; fi dpp: /<>/src/c/printer/integer_to_string.d -> printer/integer_to_string.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/integer_to_string.o printer/integer_to_string.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/write_ugly.d printer/write_ugly.o.c ; else ./dpp /<>/src/c/printer/write_ugly.d printer/write_ugly.o.c ; fi dpp: /<>/src/c/printer/write_ugly.d -> printer/write_ugly.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/write_ugly.o printer/write_ugly.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/write_object.d printer/write_object.o.c ; else ./dpp /<>/src/c/printer/write_object.d printer/write_object.o.c ; fi dpp: /<>/src/c/printer/write_object.d -> printer/write_object.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/write_object.o printer/write_object.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/write_symbol.d printer/write_symbol.o.c ; else ./dpp /<>/src/c/printer/write_symbol.d printer/write_symbol.o.c ; fi dpp: /<>/src/c/printer/write_symbol.d -> printer/write_symbol.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/write_symbol.o printer/write_symbol.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/write_array.d printer/write_array.o.c ; else ./dpp /<>/src/c/printer/write_array.d printer/write_array.o.c ; fi dpp: /<>/src/c/printer/write_array.d -> printer/write_array.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/write_array.o printer/write_array.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/write_list.d printer/write_list.o.c ; else ./dpp /<>/src/c/printer/write_list.d printer/write_list.o.c ; fi dpp: /<>/src/c/printer/write_list.d -> printer/write_list.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/write_list.o printer/write_list.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/write_code.d printer/write_code.o.c ; else ./dpp /<>/src/c/printer/write_code.d printer/write_code.o.c ; fi dpp: /<>/src/c/printer/write_code.d -> printer/write_code.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/write_code.o printer/write_code.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/write_sse.d printer/write_sse.o.c ; else ./dpp /<>/src/c/printer/write_sse.d printer/write_sse.o.c ; fi dpp: /<>/src/c/printer/write_sse.d -> printer/write_sse.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/write_sse.o printer/write_sse.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/printer/print_unreadable.d printer/print_unreadable.o.c ; else ./dpp /<>/src/c/printer/print_unreadable.d printer/print_unreadable.o.c ; fi dpp: /<>/src/c/printer/print_unreadable.d -> printer/print_unreadable.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o printer/print_unreadable.o printer/print_unreadable.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/ffi/libraries.d ffi/libraries.o.c ; else ./dpp /<>/src/c/ffi/libraries.d ffi/libraries.o.c ; fi dpp: /<>/src/c/ffi/libraries.d -> ffi/libraries.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o ffi/libraries.o ffi/libraries.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/ffi/backtrace.d ffi/backtrace.o.c ; else ./dpp /<>/src/c/ffi/backtrace.d ffi/backtrace.o.c ; fi dpp: /<>/src/c/ffi/backtrace.d -> ffi/backtrace.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o ffi/backtrace.o ffi/backtrace.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/ffi/mmap.d ffi/mmap.o.c ; else ./dpp /<>/src/c/ffi/mmap.d ffi/mmap.o.c ; fi dpp: /<>/src/c/ffi/mmap.d -> ffi/mmap.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o ffi/mmap.o ffi/mmap.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/ffi/cdata.d ffi/cdata.o.c ; else ./dpp /<>/src/c/ffi/cdata.d ffi/cdata.o.c ; fi dpp: /<>/src/c/ffi/cdata.d -> ffi/cdata.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o ffi/cdata.o ffi/cdata.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/cos.d numbers/cos.o.c ; else ./dpp /<>/src/c/numbers/cos.d numbers/cos.o.c ; fi dpp: /<>/src/c/numbers/cos.d -> numbers/cos.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/cos.o numbers/cos.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/sin.d numbers/sin.o.c ; else ./dpp /<>/src/c/numbers/sin.d numbers/sin.o.c ; fi dpp: /<>/src/c/numbers/sin.d -> numbers/sin.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/sin.o numbers/sin.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/tan.d numbers/tan.o.c ; else ./dpp /<>/src/c/numbers/tan.d numbers/tan.o.c ; fi dpp: /<>/src/c/numbers/tan.d -> numbers/tan.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/tan.o numbers/tan.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/atan.d numbers/atan.o.c ; else ./dpp /<>/src/c/numbers/atan.d numbers/atan.o.c ; fi dpp: /<>/src/c/numbers/atan.d -> numbers/atan.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/atan.o numbers/atan.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/cosh.d numbers/cosh.o.c ; else ./dpp /<>/src/c/numbers/cosh.d numbers/cosh.o.c ; fi dpp: /<>/src/c/numbers/cosh.d -> numbers/cosh.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/cosh.o numbers/cosh.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/sinh.d numbers/sinh.o.c ; else ./dpp /<>/src/c/numbers/sinh.d numbers/sinh.o.c ; fi dpp: /<>/src/c/numbers/sinh.d -> numbers/sinh.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/sinh.o numbers/sinh.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/tanh.d numbers/tanh.o.c ; else ./dpp /<>/src/c/numbers/tanh.d numbers/tanh.o.c ; fi dpp: /<>/src/c/numbers/tanh.d -> numbers/tanh.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/tanh.o numbers/tanh.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/exp.d numbers/exp.o.c ; else ./dpp /<>/src/c/numbers/exp.d numbers/exp.o.c ; fi dpp: /<>/src/c/numbers/exp.d -> numbers/exp.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/exp.o numbers/exp.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/expt.d numbers/expt.o.c ; else ./dpp /<>/src/c/numbers/expt.d numbers/expt.o.c ; fi dpp: /<>/src/c/numbers/expt.d -> numbers/expt.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/expt.o numbers/expt.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/log.d numbers/log.o.c ; else ./dpp /<>/src/c/numbers/log.d numbers/log.o.c ; fi dpp: /<>/src/c/numbers/log.d -> numbers/log.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/log.o numbers/log.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/sqrt.d numbers/sqrt.o.c ; else ./dpp /<>/src/c/numbers/sqrt.d numbers/sqrt.o.c ; fi dpp: /<>/src/c/numbers/sqrt.d -> numbers/sqrt.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/sqrt.o numbers/sqrt.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/abs.d numbers/abs.o.c ; else ./dpp /<>/src/c/numbers/abs.d numbers/abs.o.c ; fi dpp: /<>/src/c/numbers/abs.d -> numbers/abs.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/abs.o numbers/abs.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/zerop.d numbers/zerop.o.c ; else ./dpp /<>/src/c/numbers/zerop.d numbers/zerop.o.c ; fi dpp: /<>/src/c/numbers/zerop.d -> numbers/zerop.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/zerop.o numbers/zerop.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/plusp.d numbers/plusp.o.c ; else ./dpp /<>/src/c/numbers/plusp.d numbers/plusp.o.c ; fi dpp: /<>/src/c/numbers/plusp.d -> numbers/plusp.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/plusp.o numbers/plusp.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/minusp.d numbers/minusp.o.c ; else ./dpp /<>/src/c/numbers/minusp.d numbers/minusp.o.c ; fi dpp: /<>/src/c/numbers/minusp.d -> numbers/minusp.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/minusp.o numbers/minusp.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/negate.d numbers/negate.o.c ; else ./dpp /<>/src/c/numbers/negate.d numbers/negate.o.c ; fi dpp: /<>/src/c/numbers/negate.d -> numbers/negate.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/negate.o numbers/negate.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/conjugate.d numbers/conjugate.o.c ; else ./dpp /<>/src/c/numbers/conjugate.d numbers/conjugate.o.c ; fi dpp: /<>/src/c/numbers/conjugate.d -> numbers/conjugate.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/conjugate.o numbers/conjugate.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/one_plus.d numbers/one_plus.o.c ; else ./dpp /<>/src/c/numbers/one_plus.d numbers/one_plus.o.c ; fi dpp: /<>/src/c/numbers/one_plus.d -> numbers/one_plus.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/one_plus.o numbers/one_plus.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/one_minus.d numbers/one_minus.o.c ; else ./dpp /<>/src/c/numbers/one_minus.d numbers/one_minus.o.c ; fi dpp: /<>/src/c/numbers/one_minus.d -> numbers/one_minus.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/one_minus.o numbers/one_minus.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/plus.d numbers/plus.o.c ; else ./dpp /<>/src/c/numbers/plus.d numbers/plus.o.c ; fi dpp: /<>/src/c/numbers/plus.d -> numbers/plus.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/plus.o numbers/plus.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/minus.d numbers/minus.o.c ; else ./dpp /<>/src/c/numbers/minus.d numbers/minus.o.c ; fi dpp: /<>/src/c/numbers/minus.d -> numbers/minus.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/minus.o numbers/minus.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/times.d numbers/times.o.c ; else ./dpp /<>/src/c/numbers/times.d numbers/times.o.c ; fi dpp: /<>/src/c/numbers/times.d -> numbers/times.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/times.o numbers/times.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/divide.d numbers/divide.o.c ; else ./dpp /<>/src/c/numbers/divide.d numbers/divide.o.c ; fi dpp: /<>/src/c/numbers/divide.d -> numbers/divide.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/divide.o numbers/divide.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/number_compare.d numbers/number_compare.o.c ; else ./dpp /<>/src/c/numbers/number_compare.d numbers/number_compare.o.c ; fi dpp: /<>/src/c/numbers/number_compare.d -> numbers/number_compare.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/number_compare.o numbers/number_compare.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/number_equalp.d numbers/number_equalp.o.c ; else ./dpp /<>/src/c/numbers/number_equalp.d numbers/number_equalp.o.c ; fi dpp: /<>/src/c/numbers/number_equalp.d -> numbers/number_equalp.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/number_equalp.o numbers/number_equalp.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/minmax.d numbers/minmax.o.c ; else ./dpp /<>/src/c/numbers/minmax.d numbers/minmax.o.c ; fi dpp: /<>/src/c/numbers/minmax.d -> numbers/minmax.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/minmax.o numbers/minmax.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/floor.d numbers/floor.o.c ; else ./dpp /<>/src/c/numbers/floor.d numbers/floor.o.c ; fi dpp: /<>/src/c/numbers/floor.d -> numbers/floor.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/floor.o numbers/floor.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/ceiling.d numbers/ceiling.o.c ; else ./dpp /<>/src/c/numbers/ceiling.d numbers/ceiling.o.c ; fi dpp: /<>/src/c/numbers/ceiling.d -> numbers/ceiling.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/ceiling.o numbers/ceiling.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/round.d numbers/round.o.c ; else ./dpp /<>/src/c/numbers/round.d numbers/round.o.c ; fi dpp: /<>/src/c/numbers/round.d -> numbers/round.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/round.o numbers/round.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/numbers/truncate.d numbers/truncate.o.c ; else ./dpp /<>/src/c/numbers/truncate.d numbers/truncate.o.c ; fi dpp: /<>/src/c/numbers/truncate.d -> numbers/truncate.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o numbers/truncate.o numbers/truncate.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/typespec.d typespec.o.c ; else ./dpp /<>/src/c/typespec.d typespec.o.c ; fi dpp: /<>/src/c/typespec.d -> typespec.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o typespec.o typespec.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/assignment.d assignment.o.c ; else ./dpp /<>/src/c/assignment.d assignment.o.c ; fi dpp: /<>/src/c/assignment.d -> assignment.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o assignment.o assignment.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/predicate.d predicate.o.c ; else ./dpp /<>/src/c/predicate.d predicate.o.c ; fi dpp: /<>/src/c/predicate.d -> predicate.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o predicate.o predicate.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/number.d number.o.c ; else ./dpp /<>/src/c/number.d number.o.c ; fi dpp: /<>/src/c/number.d -> number.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o number.o number.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/num_pred.d num_pred.o.c ; else ./dpp /<>/src/c/num_pred.d num_pred.o.c ; fi dpp: /<>/src/c/num_pred.d -> num_pred.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o num_pred.o num_pred.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/num_arith.d num_arith.o.c ; else ./dpp /<>/src/c/num_arith.d num_arith.o.c ; fi dpp: /<>/src/c/num_arith.d -> num_arith.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o num_arith.o num_arith.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/num_co.d num_co.o.c ; else ./dpp /<>/src/c/num_co.d num_co.o.c ; fi dpp: /<>/src/c/num_co.d -> num_co.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o num_co.o num_co.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/num_log.d num_log.o.c ; else ./dpp /<>/src/c/num_log.d num_log.o.c ; fi dpp: /<>/src/c/num_log.d -> num_log.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o num_log.o num_log.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/num_rand.d num_rand.o.c ; else ./dpp /<>/src/c/num_rand.d num_rand.o.c ; fi dpp: /<>/src/c/num_rand.d -> num_rand.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o num_rand.o num_rand.o.c /<>/src/c/num_rand.d: In function ‘generate_int64’: /<>/src/c/num_rand.d:69:17: warning: type defaults to ‘int’ in declaration of ‘mag01’ [-Wimplicit-int] static mag01[2]={0x0UL, MATRIX_A}; ^~~~~ /<>/src/c/num_rand.d:47:18: warning: overflow in implicit constant conversion [-Woverflow] #define MATRIX_A 0xB5026F5AA96619E9ULL /* constant vector a */ ^ /<>/src/c/num_rand.d:69:34: note: in expansion of macro ‘MATRIX_A’ static mag01[2]={0x0UL, MATRIX_A}; ^~~~~~~~ /<>/src/c/num_rand.d: In function ‘init_random_state’: /<>/src/c/num_rand.d:216:17: warning: ignoring return value of ‘read’, declared with attribute warn_unused_result [-Wunused-result] read(file_handler, &seed, sizeof(ulong)); ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/array.d array.o.c ; else ./dpp /<>/src/c/array.d array.o.c ; fi dpp: /<>/src/c/array.d -> array.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o array.o array.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/vector_push.d vector_push.o.c ; else ./dpp /<>/src/c/vector_push.d vector_push.o.c ; fi dpp: /<>/src/c/vector_push.d -> vector_push.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o vector_push.o vector_push.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/sequence.d sequence.o.c ; else ./dpp /<>/src/c/sequence.d sequence.o.c ; fi dpp: /<>/src/c/sequence.d -> sequence.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o sequence.o sequence.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/cmpaux.d cmpaux.o.c ; else ./dpp /<>/src/c/cmpaux.d cmpaux.o.c ; fi dpp: /<>/src/c/cmpaux.d -> cmpaux.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o cmpaux.o cmpaux.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/macros.d macros.o.c ; else ./dpp /<>/src/c/macros.d macros.o.c ; fi dpp: /<>/src/c/macros.d -> macros.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o macros.o macros.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/backq.d backq.o.c ; else ./dpp /<>/src/c/backq.d backq.o.c ; fi dpp: /<>/src/c/backq.d -> backq.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o backq.o backq.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/stacks.d stacks.o.c ; else ./dpp /<>/src/c/stacks.d stacks.o.c ; fi dpp: /<>/src/c/stacks.d -> stacks.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o stacks.o stacks.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/time.d time.o.c ; else ./dpp /<>/src/c/time.d time.o.c ; fi dpp: /<>/src/c/time.d -> time.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o time.o time.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/unixint.d unixint.o.c ; else ./dpp /<>/src/c/unixint.d unixint.o.c ; fi dpp: /<>/src/c/unixint.d -> unixint.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unixint.o unixint.o.c /<>/src/c/unixint.d: In function ‘deferred_signal_handler’: /<>/src/c/unixint.d:518:17: warning: ignoring return value of ‘write’, declared with attribute warn_unused_result [-Wunused-result] ecl_giveup_spinlock(&signal_thread_spinlock); ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ /<>/src/c/unixint.d: In function ‘asynchronous_signal_servicing_thread’: /<>/src/c/unixint.d:552:9: warning: ignoring return value of ‘pipe’, declared with attribute warn_unused_result [-Wunused-result] ecl_giveup_spinlock(&signal_thread_spinlock); ^~~~~~~~~~~~~~~~~~~~~~~~ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/mapfun.d mapfun.o.c ; else ./dpp /<>/src/c/mapfun.d mapfun.o.c ; fi dpp: /<>/src/c/mapfun.d -> mapfun.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o mapfun.o mapfun.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/multival.d multival.o.c ; else ./dpp /<>/src/c/multival.d multival.o.c ; fi dpp: /<>/src/c/multival.d -> multival.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o multival.o multival.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/hash.d hash.o.c ; else ./dpp /<>/src/c/hash.d hash.o.c ; fi dpp: /<>/src/c/hash.d -> hash.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o hash.o hash.o.c /<>/src/c/hash.d: In function ‘copy_entry’: /<>/src/c/hash.d:514:53: warning: passing argument 1 of ‘GC_call_with_alloc_lock’ from incompatible pointer type [-Wincompatible-pointer-types] if (GC_call_with_alloc_lock(normalize_weak_key_entry, ^~~~~~~~~~~~~~~~~~~~~~~~ In file included from /usr/include/gc.h:2:0, from /<>/build/ecl/config.h:84, from /<>/build/ecl/ecl.h:37, from /<>/src/c/hash.d:22: /usr/include/gc/gc.h:1199:23: note: expected ‘GC_fn_type {aka void * (*)(void *)}’ but argument is of type ‘void * (*)(struct ecl_hashtable_entry *)’ GC_API void * GC_CALL GC_call_with_alloc_lock(GC_fn_type /* fn */, ^~~~~~~~~~~~~~~~~~~~~~~ /<>/src/c/hash.d:520:53: warning: passing argument 1 of ‘GC_call_with_alloc_lock’ from incompatible pointer type [-Wincompatible-pointer-types] if (GC_call_with_alloc_lock(normalize_weak_value_entry, ^~~~~~~~~~~~~~~~~~~~~~~~~~ In file included from /usr/include/gc.h:2:0, from /<>/build/ecl/config.h:84, from /<>/build/ecl/ecl.h:37, from /<>/src/c/hash.d:22: /usr/include/gc/gc.h:1199:23: note: expected ‘GC_fn_type {aka void * (*)(void *)}’ but argument is of type ‘void * (*)(struct ecl_hashtable_entry *)’ GC_API void * GC_CALL GC_call_with_alloc_lock(GC_fn_type /* fn */, ^~~~~~~~~~~~~~~~~~~~~~~ /<>/src/c/hash.d:526:53: warning: passing argument 1 of ‘GC_call_with_alloc_lock’ from incompatible pointer type [-Wincompatible-pointer-types] if (GC_call_with_alloc_lock(normalize_weak_key_and_value_entry, ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ In file included from /usr/include/gc.h:2:0, from /<>/build/ecl/config.h:84, from /<>/build/ecl/ecl.h:37, from /<>/src/c/hash.d:22: /usr/include/gc/gc.h:1199:23: note: expected ‘GC_fn_type {aka void * (*)(void *)}’ but argument is of type ‘void * (*)(struct ecl_hashtable_entry *)’ GC_API void * GC_CALL GC_call_with_alloc_lock(GC_fn_type /* fn */, ^~~~~~~~~~~~~~~~~~~~~~~ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/format.d format.o.c ; else ./dpp /<>/src/c/format.d format.o.c ; fi dpp: /<>/src/c/format.d -> format.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o format.o format.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/pathname.d pathname.o.c ; else ./dpp /<>/src/c/pathname.d pathname.o.c ; fi dpp: /<>/src/c/pathname.d -> pathname.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o pathname.o pathname.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/structure.d structure.o.c ; else ./dpp /<>/src/c/structure.d structure.o.c ; fi dpp: /<>/src/c/structure.d -> structure.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o structure.o structure.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/load.d load.o.c ; else ./dpp /<>/src/c/load.d load.o.c ; fi dpp: /<>/src/c/load.d -> load.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o load.o load.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/unixfsys.d unixfsys.o.c ; else ./dpp /<>/src/c/unixfsys.d unixfsys.o.c ; fi dpp: /<>/src/c/unixfsys.d -> unixfsys.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unixfsys.o unixfsys.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/unixsys.d unixsys.o.c ; else ./dpp /<>/src/c/unixsys.d unixsys.o.c ; fi dpp: /<>/src/c/unixsys.d -> unixsys.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unixsys.o unixsys.o.c /<>/src/c/unixsys.d: In function ‘si_run_program’: /<>/src/c/unixsys.d:714:66: warning: passing argument 2 of ‘execve’ from incompatible pointer type [-Wincompatible-pointer-types] execve((char*)command->base_string.self, argv_ptr, pstrings); ^~~~~~~~ In file included from /<>/src/c/unixsys.d:27:0: /usr/include/unistd.h:554:12: note: expected ‘char * const*’ but argument is of type ‘void **’ extern int execve (const char *__path, char *const __argv[], ^~~~~~ /<>/src/c/unixsys.d:716:66: warning: passing argument 2 of ‘execvp’ from incompatible pointer type [-Wincompatible-pointer-types] execvp((char*)command->base_string.self, argv_ptr); ^~~~~~~~ In file included from /<>/src/c/unixsys.d:27:0: /usr/include/unistd.h:581:12: note: expected ‘char * const*’ but argument is of type ‘void **’ extern int execvp (const char *__file, char *const __argv[]) ^~~~~~ /<>/src/c/unixsys.d:775:56: warning: passing argument 5 of ‘ecl_make_stream_from_fd’ makes integer from pointer without a cast [-Wint-conversion] parent_read = 0; ^ In file included from /<>/build/ecl/ecl.h:83:0, from /<>/src/c/unixsys.d:29: ./ecl/external.h:740:26: note: expected ‘int’ but argument is of type ‘cl_object {aka union cl_lispunion *}’ extern ECL_API cl_object ecl_make_stream_from_fd(cl_object fname, int fd, enum ecl_smmode smm, cl_fixnum byte_size, int flags, cl_object external_format); ^~~~~~~~~~~~~~~~~~~~~~~ /<>/src/c/unixsys.d:783:55: warning: passing argument 5 of ‘ecl_make_stream_from_fd’ makes integer from pointer without a cast [-Wint-conversion] parent_error = 0; ^ In file included from /<>/build/ecl/ecl.h:83:0, from /<>/src/c/unixsys.d:29: ./ecl/external.h:740:26: note: expected ‘int’ but argument is of type ‘cl_object {aka union cl_lispunion *}’ extern ECL_API cl_object ecl_make_stream_from_fd(cl_object fname, int fd, enum ecl_smmode smm, cl_fixnum byte_size, int flags, cl_object external_format); ^~~~~~~~~~~~~~~~~~~~~~~ /<>/src/c/unixsys.d:791:56: warning: passing argument 5 of ‘ecl_make_stream_from_fd’ makes integer from pointer without a cast [-Wint-conversion] } ^ In file included from /<>/build/ecl/ecl.h:83:0, from /<>/src/c/unixsys.d:29: ./ecl/external.h:740:26: note: expected ‘int’ but argument is of type ‘cl_object {aka union cl_lispunion *}’ extern ECL_API cl_object ecl_make_stream_from_fd(cl_object fname, int fd, enum ecl_smmode smm, cl_fixnum byte_size, int flags, cl_object external_format); ^~~~~~~~~~~~~~~~~~~~~~~ /<>/src/c/unixsys.d:680:9: warning: ignoring return value of ‘pipe’, declared with attribute warn_unused_result [-Wunused-result] pipe(pipe_fd); ^~~~~~~~~~~~~ /<>/src/c/unixsys.d: In function ‘create_descriptor’: /<>/src/c/unixsys.d:493:17: warning: ignoring return value of ‘pipe’, declared with attribute warn_unused_result [-Wunused-result] if (direction == @':input') { ^~~~~~~~ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/serialize.d serialize.o.c ; else ./dpp /<>/src/c/serialize.d serialize.o.c ; fi dpp: /<>/src/c/serialize.d -> serialize.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o serialize.o serialize.o.c /<>/src/c/serialize.d: In function ‘serialize_one’: /<>/src/c/serialize.d:311:40: warning: assignment makes pointer from integer without a cast [-Wint-conversion] buffer->bytecodes.code = serialize_bits(pool, buffer->bytecodes.code, ^ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/ffi.d ffi.o.c ; else ./dpp /<>/src/c/ffi.d ffi.o.c ; fi dpp: /<>/src/c/ffi.d -> ffi.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o ffi.o ffi.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/sse2.d sse2.o.c ; else ./dpp /<>/src/c/sse2.d sse2.o.c ; fi dpp: /<>/src/c/sse2.d -> sse2.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o sse2.o sse2.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/big.d big.o.c ; else ./dpp /<>/src/c/big.d big.o.c ; fi dpp: /<>/src/c/big.d -> big.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o big.o big.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/process.d threads/process.o.c ; else ./dpp /<>/src/c/threads/process.d threads/process.o.c ; fi dpp: /<>/src/c/threads/process.d -> threads/process.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/process.o threads/process.o.c /<>/src/c/threads/process.d: In function ‘mp_exit_process’: /<>/src/c/threads/process.d:600:1: warning: ‘noreturn’ function does return ^ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/queue.d threads/queue.o.c ; else ./dpp /<>/src/c/threads/queue.d threads/queue.o.c ; fi dpp: /<>/src/c/threads/queue.d -> threads/queue.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/queue.o threads/queue.o.c /<>/src/c/threads/queue.d: In function ‘ecl_wait_on’: /<>/src/c/threads/queue.d:255:52: warning: passing argument 3 of ‘GC_pthread_sigmask’ discards ‘volatile’ qualifier from pointer target type [-Wdiscarded-qualifiers] pthread_sigmask(SIG_BLOCK, &empty, &original); ^ In file included from /usr/include/gc/gc.h:1443:0, from /usr/include/gc.h:2, from /<>/build/ecl/config.h:84, from /<>/build/ecl/ecl.h:37, from /<>/src/c/threads/queue.d:22: /usr/include/gc/gc_pthread_redirects.h:43:16: note: expected ‘sigset_t * {aka struct *}’ but argument is of type ‘volatile sigset_t * {aka volatile struct *}’ GC_API int GC_pthread_sigmask(int /* how */, const sigset_t *, ^~~~~~~~~~~~~~~~~~ /<>/src/c/threads/queue.d:276:36: warning: passing argument 1 of ‘sigsuspend’ discards ‘volatile’ qualifier from pointer target type [-Wdiscarded-qualifiers] sigsuspend(&original); ^ In file included from /<>/src/c/threads/queue.d:21:0: /usr/include/signal.h:254:12: note: expected ‘const sigset_t * {aka const struct *}’ but argument is of type ‘volatile sigset_t * {aka volatile struct *}’ extern int sigsuspend (const sigset_t *__set) __nonnull ((1)); ^~~~~~~~~~ /<>/src/c/threads/queue.d:299:46: warning: passing argument 2 of ‘GC_pthread_sigmask’ discards ‘volatile’ qualifier from pointer target type [-Wdiscarded-qualifiers] pthread_sigmask(SIG_SETMASK, &original, NULL); ^ In file included from /usr/include/gc/gc.h:1443:0, from /usr/include/gc.h:2, from /<>/build/ecl/config.h:84, from /<>/build/ecl/ecl.h:37, from /<>/src/c/threads/queue.d:22: /usr/include/gc/gc_pthread_redirects.h:43:16: note: expected ‘const sigset_t * {aka const struct *}’ but argument is of type ‘volatile sigset_t * {aka volatile struct *}’ GC_API int GC_pthread_sigmask(int /* how */, const sigset_t *, ^~~~~~~~~~~~~~~~~~ if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/mutex.d threads/mutex.o.c ; else ./dpp /<>/src/c/threads/mutex.d threads/mutex.o.c ; fi dpp: /<>/src/c/threads/mutex.d -> threads/mutex.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/mutex.o threads/mutex.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/condition_variable.d threads/condition_variable.o.c ; else ./dpp /<>/src/c/threads/condition_variable.d threads/condition_variable.o.c ; fi dpp: /<>/src/c/threads/condition_variable.d -> threads/condition_variable.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/condition_variable.o threads/condition_variable.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/semaphore.d threads/semaphore.o.c ; else ./dpp /<>/src/c/threads/semaphore.d threads/semaphore.o.c ; fi dpp: /<>/src/c/threads/semaphore.d -> threads/semaphore.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/semaphore.o threads/semaphore.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/barrier.d threads/barrier.o.c ; else ./dpp /<>/src/c/threads/barrier.d threads/barrier.o.c ; fi dpp: /<>/src/c/threads/barrier.d -> threads/barrier.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/barrier.o threads/barrier.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/mailbox.d threads/mailbox.o.c ; else ./dpp /<>/src/c/threads/mailbox.d threads/mailbox.o.c ; fi dpp: /<>/src/c/threads/mailbox.d -> threads/mailbox.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/mailbox.o threads/mailbox.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/rwlock.d threads/rwlock.o.c ; else ./dpp /<>/src/c/threads/rwlock.d threads/rwlock.o.c ; fi dpp: /<>/src/c/threads/rwlock.d -> threads/rwlock.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/rwlock.o threads/rwlock.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/alloc_2.d alloc_2.o.c ; else ./dpp /<>/src/c/alloc_2.d alloc_2.o.c ; fi dpp: /<>/src/c/alloc_2.d -> alloc_2.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o alloc_2.o alloc_2.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/tcp.d tcp.o.c ; else ./dpp /<>/src/c/tcp.d tcp.o.c ; fi dpp: /<>/src/c/tcp.d -> tcp.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o tcp.o tcp.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd.o /<>/src/c/unicode/ucd.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd-0000.o /<>/src/c/unicode/ucd-0000.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd-0016.o /<>/src/c/unicode/ucd-0016.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd-0032.o /<>/src/c/unicode/ucd-0032.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd-0048.o /<>/src/c/unicode/ucd-0048.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd-0064.o /<>/src/c/unicode/ucd-0064.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd-0080.o /<>/src/c/unicode/ucd-0080.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd-0096.o /<>/src/c/unicode/ucd-0096.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd_names_char.o /<>/src/c/unicode/ucd_names_char.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd_names_codes.o /<>/src/c/unicode/ucd_names_codes.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd_names_pair.o /<>/src/c/unicode/ucd_names_pair.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o unicode/ucd_names_str.o /<>/src/c/unicode/ucd_names_str.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/threads/atomic.d threads/atomic.o.c ; else ./dpp /<>/src/c/threads/atomic.d threads/atomic.o.c ; fi dpp: /<>/src/c/threads/atomic.d -> threads/atomic.o.c gcc -DECLDIR="\"/usr/lib/ecl-16.1.2\"" -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -o threads/atomic.o threads/atomic.o.c if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/all_symbols.d all_symbols.c ; else ./dpp /<>/src/c/all_symbols.d all_symbols.c ; fi dpp: /<>/src/c/all_symbols.d -> all_symbols.c gcc -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -I./ all_symbols.c -o all_symbols.o gcc -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -DECL_FINAL -I./ all_symbols.c -o all_symbols2.o rm -f ../libeclmin.a ar cr ../libeclmin.a main.o symbol.o package.o cons.o list.o apply.o eval.o interpreter.o compiler.o disassembler.o instance.o gfun.o clos/cache.o clos/accessor.o reference.o character.o file.o read.o print.o error.o string.o cfun.o reader/parse_integer.o reader/parse_number.o printer/float_to_digits.o printer/float_to_string.o printer/integer_to_string.o printer/write_ugly.o printer/write_object.o printer/write_symbol.o printer/write_array.o printer/write_list.o printer/write_code.o printer/write_sse.o printer/print_unreadable.o ffi/libraries.o ffi/backtrace.o ffi/mmap.o ffi/cdata.o numbers/cos.o numbers/sin.o numbers/tan.o numbers/atan.o numbers/cosh.o numbers/sinh.o numbers/tanh.o numbers/exp.o numbers/expt.o numbers/log.o numbers/sqrt.o numbers/abs.o numbers/zerop.o numbers/plusp.o numbers/minusp.o numbers/negate.o numbers/conjugate.o numbers/one_plus.o numbers/one_minus.o numbers/plus.o numbers/minus.o numbers/times.o numbers/divide.o numbers/number_compare.o numbers/number_equalp.o numbers/minmax.o numbers/floor.o numbers/ceiling.o numbers/round.o numbers/truncate.o typespec.o assignment.o predicate.o number.o num_pred.o num_arith.o num_co.o num_log.o num_rand.o array.o vector_push.o sequence.o cmpaux.o macros.o backq.o stacks.o time.o unixint.o mapfun.o multival.o hash.o format.o pathname.o structure.o load.o unixfsys.o unixsys.o serialize.o ffi.o sse2.o big.o threads/process.o threads/queue.o threads/mutex.o threads/condition_variable.o threads/semaphore.o threads/barrier.o threads/mailbox.o threads/rwlock.o alloc_2.o tcp.o unicode/ucd.o unicode/ucd-0000.o unicode/ucd-0016.o unicode/ucd-0032.o unicode/ucd-0048.o unicode/ucd-0064.o unicode/ucd-0080.o unicode/ucd-0096.o unicode/ucd_names_char.o unicode/ucd_names_codes.o unicode/ucd_names_pair.o unicode/ucd_names_str.o threads/atomic.o ranlib ../libeclmin.a if test -f ../CROSS-DPP ; then ../CROSS-DPP /<>/src/c/cinit.d cinit.c ; else ./dpp /<>/src/c/cinit.d cinit.c ; fi dpp: /<>/src/c/cinit.d -> cinit.c gcc -I. -I/<>/build -I/<>/src/c -I../ecl/gc -DECL_API -DECL_NO_LEGACY -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -c -I./ cinit.c -o ../cinit.o make[3]: Leaving directory '/<>/build/c' if [ -f CROSS-COMPILER ]; then \ touch ecl_min; \ else \ gcc -o ecl_min cinit.o c/all_symbols.o -L./ libeclmin.a -latomic_ops -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm ;\ fi sed -e 's,@ecldir\\@,/usr/lib/ecl-16.1.2/,g' \ -e 's,@libdir\\@,/usr/lib/,g' < compile.pre > compile.lsp echo "#" `uname -a` > build-stamp head -8 config.log | tail -6 >> build-stamp if [ -f CROSS-COMPILER ]; then \ ./CROSS-COMPILER compile; \ else \ ECLDIR=`pwd`/ ./ecl_min compile; \ fi ;*** Lisp core booted **** ECL (Embeddable Common Lisp) ;;; ;;; Welcome to bare.lsp. Let's bring this instance up! ;;; ;;; ;;; About to load lsp/load.lsp ;;; ;;; Loading src:lsp;export.lsp ;;; Loading src:lsp;defmacro.lsp ;;; Loading src:lsp;helpfile.lsp ;;; Loading src:lsp;evalmacros.lsp ;;; Loading src:lsp;cmuutil.lsp ;;; Loading src:lsp;setf.lsp ;;; Loading src:lsp;predlib.lsp ;;; Loading src:lsp;seq.lsp ;;; Loading src:lsp;arraylib.lsp ;;; Loading src:lsp;assert.lsp ;;; Loading src:lsp;defstruct.lsp ;;; Loading src:lsp;iolib.lsp ;;; Loading src:lsp;listlib.lsp ;;; Loading src:lsp;mislib.lsp ;;; Loading src:lsp;numlib.lsp ;;; Loading src:lsp;packlib.lsp ;;; Loading src:lsp;seqlib.lsp ;;; Loading src:lsp;trace.lsp ;;; Loading src:lsp;loop2.lsp ;;; Loading src:lsp;format.lsp ;;; Loading src:lsp;defpackage.lsp ;;; Loading src:lsp;ffi.lsp ;;; Loading src:lsp;mp.lsp ;;; Loading build:lsp;config.lsp ;;; Loading src:lsp;module.lsp ;;; Loading src:lsp;cmdline.lsp ;;; Loading src:lsp;autoload.lsp ;;; Loading src:lsp;cdr-5.lsp ;;; Loading clos/load.lsp ;;; Loading src:clos;package.lsp ;;; Loading src:clos;cpl.lsp ;;; Loading src:clos;std-slot-value.lsp ;;; Loading src:clos;slot.lsp ;;; Loading src:clos;boot.lsp ;;; Loading src:clos;kernel.lsp ;;; Loading src:clos;method.lsp ;;; Loading src:clos;combin.lsp ;;; Loading src:clos;std-accessors.lsp ;;; Loading src:clos;defclass.lsp ;;; Loading src:clos;slotvalue.lsp ;;; Loading src:clos;standard.lsp ;;; Loading src:clos;builtin.lsp ;;; Loading src:clos;change.lsp ;;; Loading src:clos;stdmethod.lsp ;;; Loading src:clos;generic.lsp ;;; Loading src:clos;fixup.lsp ;;; Loading src:clos;conditions.lsp ;;; Loading src:clos;print.lsp ;;; Loading src:clos;streams.lsp ;;; Loading src:lsp;pprint.lsp ;;; Loading src:lsp;describe.lsp ;;; Loading src:clos;inspect.lsp ;;; Loading src:lsp;top.lsp ;;; Loading src:lsp;process.lsp ;;; Loading src:lsp;unicode.lsp ;;; Loading ext:bytecmp;bytecmp.lsp ;;; Loading ext:ecl-cdb;ecl-cdb.lisp ;;; Loading ext:ecl-cdb;ecl-help.lisp ;;; Loading src:clos;walk.lsp ;;; Loading lsp/format.lsp ;;; About to load cmp/load.lsp ;;; Loading "/<>/src/cmp/cmppackage.lsp" ;;; Loading "/<>/src/cmp/cmptypes.lsp" ;;; Loading "/<>/src/cmp/cmpglobals.lsp" ;;; Loading "/<>/build/cmp/cmpdefs.lsp" ;;; Loading "/<>/src/cmp/cmpmac.lsp" ;;; Loading "/<>/src/cmp/cmpform.lsp" ;;; Loading "/<>/src/cmp/cmptables.lsp" ;;; Loading "/<>/src/cmp/cmpinline.lsp" ;;; Loading "/<>/src/cmp/cmputil.lsp" ;;; Loading "/<>/src/cmp/cmptype-arith.lsp" ;;; Loading "/<>/src/cmp/cmptype-prop.lsp" ;;; Loading "/<>/src/cmp/cmptype.lsp" ;;; Loading "/<>/src/cmp/cmptype-assert.lsp" ;;; Loading "/<>/src/cmp/cmpenv-api.lsp" ;;; Loading "/<>/src/cmp/cmpenv-fun.lsp" ;;; Loading "/<>/src/cmp/cmpenv-declare.lsp" ;;; Loading "/<>/src/cmp/cmpenv-proclaim.lsp" ;;; Loading "/<>/src/cmp/cmpenv-declaim.lsp" ;;; Loading "/<>/src/cmp/cmpc-machine.lsp" ;;; Loading "/<>/src/cmp/cmpc-wt.lsp" ;;; Loading "/<>/src/cmp/cmpc-inliner.lsp" ;;; Loading "/<>/src/cmp/cmpbind.lsp" ;;; Loading "/<>/src/cmp/cmpblock.lsp" ;;; Loading "/<>/src/cmp/cmpcall.lsp" ;;; Loading "/<>/src/cmp/cmpcatch.lsp" ;;; Loading "/<>/src/cmp/cmppolicy.lsp" ;;; Loading "/<>/src/cmp/cmpeval.lsp" ;;; Loading "/<>/src/cmp/cmpexit.lsp" ;;; Loading "/<>/src/cmp/cmpflet.lsp" ;;; Loading "/<>/src/cmp/cmpfun.lsp" ;;; Loading "/<>/src/cmp/cmpif.lsp" ;;; Loading "/<>/src/cmp/cmplam.lsp" ;;; Loading "/<>/src/cmp/cmplet.lsp" ;;; Loading "/<>/src/cmp/cmploc.lsp" ;;; Loading "/<>/src/cmp/cmpmap.lsp" ;;; Loading "/<>/src/cmp/cmpstack.lsp" ;;; Loading "/<>/src/cmp/cmpmulti.lsp" ;;; Loading "/<>/src/cmp/cmpspecial.lsp" ;;; Loading "/<>/src/cmp/cmptag.lsp" ;;; Loading "/<>/src/cmp/cmptop.lsp" ;;; Loading "/<>/src/cmp/cmpvar.lsp" ;;; Loading "/<>/src/cmp/cmpwt.lsp" ;;; Loading "/<>/src/cmp/cmpffi.lsp" ;;; Loading "/<>/src/cmp/cmpcbk.lsp" ;;; Loading "/<>/src/cmp/cmpct.lsp" ;;; Loading "/<>/src/cmp/cmpnum.lsp" ;;; Loading "/<>/src/cmp/cmpname.lsp" ;;; Loading "/<>/src/cmp/cmpopt.lsp" ;;; Loading "/<>/src/cmp/cmpopt-bits.lsp" ;;; Loading "/<>/src/cmp/cmpopt-clos.lsp" ;;; Loading "/<>/src/cmp/cmpopt-constant.lsp" ;;; Loading "/<>/src/cmp/cmpopt-cons.lsp" ;;; Loading "/<>/src/cmp/cmpopt-printer.lsp" ;;; Loading "/<>/src/cmp/cmpopt-sequence.lsp" ;;; Loading "/<>/src/cmp/cmpopt-type.lsp" ;;; Loading "/<>/src/cmp/cmpprop.lsp" ;;; Loading "/<>/src/cmp/cmpclos.lsp" ;;; Loading "/<>/src/cmp/cmpstructures.lsp" ;;; Loading "/<>/src/cmp/cmparray.lsp" ;;; Loading "/<>/src/cmp/cmpos-run.lsp" ;;; Loading "/<>/src/cmp/cmpos-features.lsp" ;;; System features: (64-BIT GCC GCC-COMPILER ELF LP64 PPC PPC64) ;;; Loading "/<>/src/cmp/cmpmain.lsp" ;;; Loading "/<>/src/cmp/proclamations.lsp" ;;; Loading "/<>/src/cmp/sysfun.lsp" ;;; ;;; Now we are in shape to do something useful. ;;; End of bare.lsp (compile-file "src:lsp;export.lsp" :output-file #P"BUILD:LSP;EXPORT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;EXPORT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN EVAL-FEATURE ...). ;;; Compiling (DEFUN DO-READ-FEATURE ...). ;;; Compiling (DEFUN SHARP-+-READER ...). ;;; Compiling (DEFUN SHARP---READER ...). ;;; End of Pass 1. ;;; Emitting code for DOLIST. ;;; Emitting code for DOTIMES. ;;; Emitting code for DO/DO*-EXPAND. ;;; Emitting code for EVAL-FEATURE. ;;; Emitting code for DO-READ-FEATURE. ;;; Emitting code for SHARP-+-READER. ;;; Emitting code for SHARP---READER. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/export.c -o lsp/export.o ;;; Finished compiling SRC:LSP;EXPORT.LSP. ;;; (compile-file "src:lsp;defmacro.lsp" :output-file #P"BUILD:LSP;DEFMACRO.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;DEFMACRO.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN SEARCH-KEYWORD ...). ;;; Function SEARCH-KEYWORD proclaimed (0,65536) ;;; Compiling (DEFUN CHECK-KEYWORD ...). ;;; Function CHECK-KEYWORD proclaimed (0,65536) ;;; Compiling (DEFUN DM-TOO-MANY-ARGUMENTS ...). ;;; Function DM-TOO-MANY-ARGUMENTS proclaimed (1,1) ;;; Compiling (DEFUN DM-TOO-FEW-ARGUMENTS ...). ;;; Function DM-TOO-FEW-ARGUMENTS proclaimed (1,1) ;;; Compiling (DEFUN DESTRUCTURE ...). ;;; Compiling (DEFUN FIND-DOCUMENTATION ...). ;;; Function FIND-DOCUMENTATION proclaimed (0,65536) ;;; Compiling (DEFUN REMOVE-DOCUMENTATION ...). ;;; Function REMOVE-DOCUMENTATION proclaimed (0,65536) ;;; Compiling (DEFUN FIND-DECLARATIONS ...). ;;; Function FIND-DECLARATIONS proclaimed (0,65536) ;;; Compiling (DEFUN EXPAND-DEFMACRO ...). ;;; Compiling (DEFMACRO DESTRUCTURING-BIND ...). ;;; Compiling (DEFUN CMP-ENV-FOR-BYTECODES ...). ;;; Compiling (DEFUN MACROLET-FUNCTIONS ...). ;;; Note: ;;; in file DEFMACRO.LSP, position 15460 ;;; at (DEFUN MACROLET-FUNCTIONS ...) ;;; Checking type of #:LET64 to be LIST ;;; Note: ;;; in file DEFMACRO.LSP, position 15460 ;;; at (DEFUN MACROLET-FUNCTIONS ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST59) to be LIST ;;; Note: ;;; in file DEFMACRO.LSP, position 15460 ;;; at (DEFUN MACROLET-FUNCTIONS ...) ;;; Checking type of #:LOOP-LIST-TAIL61 to be CONS ;;; Compiling (DEFUN CMP-ENV-REGISTER-MACROLET ...). ;;; End of Pass 1. ;;; Emitting code for SEARCH-KEYWORD. ;;; Emitting code for CHECK-KEYWORD. ;;; Emitting code for DM-TOO-MANY-ARGUMENTS. ;;; Emitting code for DM-TOO-FEW-ARGUMENTS. ;;; Emitting code for DESTRUCTURE. ;;; Emitting code for DM-V. ;;; Emitting code for DM-VL. ;;; Emitting code for TEMPSYM. ;;; Emitting code for FIND-DOCUMENTATION. ;;; Emitting code for REMOVE-DOCUMENTATION. ;;; Emitting code for FIND-DECLARATIONS. ;;; Emitting code for EXPAND-DEFMACRO. ;;; Emitting code for DESTRUCTURING-BIND. ;;; Emitting code for CMP-ENV-FOR-BYTECODES. ;;; Emitting code for LOCAL-FUN-ERROR-FUNCTION. ;;; Emitting code for LOCAL-VAR-ERROR-FUNCTION. ;;; Emitting code for #:G46. ;;; Emitting code for #:G45. ;;; Emitting code for MACROLET-FUNCTIONS. ;;; Emitting code for #:G62. ;;; Emitting code for CMP-ENV-REGISTER-MACROLET. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/defmacro.c -o lsp/defmacro.o ;;; Finished compiling SRC:LSP;DEFMACRO.LSP. ;;; (compile-file "src:lsp;helpfile.lsp" :output-file #P"BUILD:LSP;HELPFILE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;HELPFILE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *KEEP-DOCUMENTATION* ...). ;;; Compiling (DEFUN NEW-DOCUMENTATION-POOL ...). ;;; Compiling (DEFUN RECORD-CONS ...). ;;; Compiling (DEFUN RECORD-FIELD ...). ;;; Compiling (DEFUN SET-RECORD-FIELD ...). ;;; Note: ;;; in file HELPFILE.LSP, position 1486 ;;; at (DEFUN SET-RECORD-FIELD ...) ;;; Checking type of FIELD to be CONS ;;; Compiling (DEFUN REM-RECORD-FIELD ...). ;;; Compiling (DEFUN ANNOTATE ...). ;;; Compiling (DEFUN REMOVE-ANNOTATION ...). ;;; Compiling (DEFUN GET-ANNOTATION ...). ;;; Compiling (DEFUN DUMP-DOCUMENTATION ...). ;;; Note: ;;; in file HELPFILE.LSP, position 3321 ;;; at (DEFUN DUMP-DOCUMENTATION ...) ;;; Checking type of *DOCUMENTATION-POOL* to be CONS ;;; Compiling (DEFUN GET-DOCUMENTATION ...). ;;; Function GET-DOCUMENTATION proclaimed (0,65536) ;;; Compiling (DEFUN SET-DOCUMENTATION ...). ;;; Function SET-DOCUMENTATION proclaimed (0,65536) ;;; Compiling (DEFUN EXPAND-SET-DOCUMENTATION ...). ;;; Function EXPAND-SET-DOCUMENTATION proclaimed (0,65536) ;;; Compiling (DEFUN MAKE-DSPEC ...). ;;; Compiling (DEFUN DEFAULT-ANNOTATION-LOGIC ...). ;;; End of Pass 1. ;;; Emitting code for NEW-DOCUMENTATION-POOL. ;;; Emitting code for RECORD-CONS. ;;; Emitting code for RECORD-FIELD. ;;; Emitting code for SET-RECORD-FIELD. ;;; Emitting code for REM-RECORD-FIELD. ;;; Emitting code for ANNOTATE. ;;; Emitting code for REMOVE-ANNOTATION. ;;; Emitting code for GET-ANNOTATION. ;;; Emitting code for DUMP-DOCUMENTATION. ;;; Emitting code for GET-DOCUMENTATION. ;;; Emitting code for SET-DOCUMENTATION. ;;; Emitting code for EXPAND-SET-DOCUMENTATION. ;;; Emitting code for MAKE-DSPEC. ;;; Emitting code for OPTIONAL-ANNOTATION. ;;; Emitting code for DEFAULT-ANNOTATION-LOGIC. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/helpfile.c -o lsp/helpfile.o ;;; Finished compiling SRC:LSP;HELPFILE.LSP. ;;; (compile-file "src:lsp;evalmacros.lsp" :output-file #P"BUILD:LSP;EVALMACROS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;EVALMACROS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO UNLESS ...). ;;; Compiling (DEFMACRO DEFMACRO ...). ;;; Compiling (DEFMACRO DEFVAR ...). ;;; Compiling (DEFMACRO DEFPARAMETER ...). ;;; Compiling (DEFMACRO DEFCONSTANT ...). ;;; Compiling (DEFPARAMETER *DEFUN-INLINE-HOOK* ...). ;;; Compiling (DEFMACRO DEFUN ...). ;;; Compiling (DEFMACRO DEFINE-COMPILER-MACRO ...). ;;; Compiling (DEFUN COMPILER-MACRO-FUNCTION ...). ;;; Compiling (DEFMACRO LAMBDA ...). ;;; Compiling (DEFMACRO LAMBDA-BLOCK ...). ;;; Compiling (DEFMACRO PSETQ ...). ;;; Compiling (DEFMACRO COND ...). ;;; Compiling (DEFMACRO PROG ...). ;;; Compiling (DEFMACRO PROG* ...). ;;; Compiling (DEFMACRO PROG1 ...). ;;; Compiling (DEFMACRO PROG2 ...). ;;; Compiling (DEFMACRO MULTIPLE-VALUE-LIST ...). ;;; Compiling (DEFMACRO MULTIPLE-VALUE-SETQ ...). ;;; Compiling (DEFMACRO MULTIPLE-VALUE-BIND ...). ;;; Compiling (DEFUN WHILE-UNTIL ...). ;;; Compiling (DEFMACRO WHILE ...). ;;; Compiling (DEFMACRO UNTIL ...). ;;; Compiling (DEFMACRO CASE ...). ;;; Compiling (DEFMACRO RETURN ...). ;;; Compiling (DEFMACRO IN-PACKAGE ...). ;;; Compiling (DEFMACRO DEFINE-SYMBOL-MACRO ...). ;;; Compiling (DEFMACRO NTH-VALUE ...). ;;; Compiling (DEFUN MAYBE-UNQUOTE ...). ;;; Compiling (DEFUN MAYBE-QUOTE ...). ;;; Compiling (DEFMACRO TRULY-THE ...). ;;; Compiling (DEFMACRO CHECKED-VALUE ...). ;;; End of Pass 1. ;;; Emitting code for UNLESS. ;;; Emitting code for DEFMACRO. ;;; Emitting code for DEFVAR. ;;; Emitting code for DEFPARAMETER. ;;; Emitting code for DEFCONSTANT. ;;; Emitting code for DEFUN. ;;; Emitting code for DEFINE-COMPILER-MACRO. ;;; Emitting code for COMPILER-MACRO-FUNCTION. ;;; Emitting code for LOOP. ;;; Emitting code for LAMBDA. ;;; Emitting code for LAMBDA-BLOCK. ;;; Emitting code for PSETQ. ;;; Emitting code for COND. ;;; Emitting code for PROG. ;;; Emitting code for PROG*. ;;; Emitting code for PROG1. ;;; Emitting code for PROG2. ;;; Emitting code for MULTIPLE-VALUE-LIST. ;;; Emitting code for MULTIPLE-VALUE-SETQ. ;;; Emitting code for MULTIPLE-VALUE-BIND. ;;; Emitting code for WHILE-UNTIL. ;;; Emitting code for WHILE. ;;; Emitting code for UNTIL. ;;; Emitting code for CASE. ;;; Emitting code for RETURN. ;;; Emitting code for DECLAIM. ;;; Emitting code for C-DECLAIM. ;;; Emitting code for IN-PACKAGE. ;;; Emitting code for DEFINE-SYMBOL-MACRO. ;;; Emitting code for NTH-VALUE. ;;; Emitting code for MAYBE-UNQUOTE. ;;; Emitting code for MAYBE-QUOTE. ;;; Emitting code for TRULY-THE. ;;; Emitting code for CHECKED-VALUE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/evalmacros.c -o lsp/evalmacros.o ;;; Finished compiling SRC:LSP;EVALMACROS.LSP. ;;; (compile-file "src:lsp;cmuutil.lsp" :output-file #P"BUILD:LSP;CMUUTIL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;CMUUTIL.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO WITH-UNIQUE-NAMES ...). ;;; Note: ;;; in file CMUUTIL.LSP, position 5534 ;;; at (FSET 'WITH-UNIQUE-NAMES ...) ;;; Checking type of #:LET40 to be LIST ;;; Note: ;;; in file CMUUTIL.LSP, position 5534 ;;; at (FSET 'WITH-UNIQUE-NAMES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST35) to be LIST ;;; Note: ;;; in file CMUUTIL.LSP, position 5534 ;;; at (FSET 'WITH-UNIQUE-NAMES ...) ;;; Checking type of #:LOOP-LIST-TAIL37 to be CONS ;;; Compiling (DEFMACRO WITH-CLEAN-SYMBOLS ...). ;;; Note: ;;; in file CMUUTIL.LSP, position 5817 ;;; at (FSET 'WITH-CLEAN-SYMBOLS ...) ;;; Checking type of #:LET55 to be LIST ;;; Note: ;;; in file CMUUTIL.LSP, position 5817 ;;; at (FSET 'WITH-CLEAN-SYMBOLS ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST50) to be LIST ;;; Note: ;;; in file CMUUTIL.LSP, position 5817 ;;; at (FSET 'WITH-CLEAN-SYMBOLS ...) ;;; Checking type of #:LOOP-LIST-TAIL52 to be CONS ;;; End of Pass 1. ;;; Emitting code for WITH-UNIQUE-NAMES. ;;; Emitting code for #:G38. ;;; Emitting code for WITH-CLEAN-SYMBOLS. ;;; Emitting code for #:G53. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/cmuutil.c -o lsp/cmuutil.o ;;; Finished compiling SRC:LSP;CMUUTIL.LSP. ;;; (compile-file "src:lsp;setf.lsp" :output-file #P"BUILD:LSP;SETF.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;SETF.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN DO-SETF-METHOD-EXPANSION ...). ;;; Style warning: ;;; in file SETF.LSP, position 766 ;;; at (DEFUN DO-SETF-METHOD-EXPANSION ...) ;;; ! Variable I, declared as IGNORE, found in a lisp form. ;;; Style warning: ;;; in file SETF.LSP, position 766 ;;; at (DEFUN DO-SETF-METHOD-EXPANSION ...) ;;; ! Variable I, declared as IGNORE, found in a lisp form. ;;; Compiling (DEFUN DO-DEFSETF ...). ;;; Function DO-DEFSETF proclaimed (2,3) ;;; Compiling (DEFUN DO-DEFINE-SETF-METHOD ...). ;;; Function DO-DEFINE-SETF-METHOD proclaimed (2,2) ;;; Compiling (DEFMACRO DEFSETF ...). ;;; Compiling (DEFMACRO DEFINE-SETF-EXPANDER ...). ;;; Compiling (DEFUN GET-SETF-EXPANSION ...). ;;; Compiling (DEFUN TRIVIAL-SETF-FORM ...). ;;; Compiling (DEFUN TRY-SIMPLER-EXPANSION ...). ;;; Compiling (DEFUN SETF-EXPAND-1 ...). ;;; Compiling (DEFUN SETF-EXPAND ...). ;;; Compiling (DEFMACRO SETF ...). ;;; Compiling (DEFMACRO WITH-SETF-EXPANSIONS ...). ;;; Compiling (DEFMACRO PSETF ...). ;;; Note: ;;; in file SETF.LSP, position 18671 ;;; at (FSET 'PSETF ...) ;;; Checking type of #:LET135 to be LIST ;;; Note: ;;; in file SETF.LSP, position 18671 ;;; at (FSET 'PSETF ...) ;;; Checking type of #:LET137 to be LIST ;;; Note: ;;; in file SETF.LSP, position 18671 ;;; at (FSET 'PSETF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST130) to be LIST ;;; Note: ;;; in file SETF.LSP, position 18671 ;;; at (FSET 'PSETF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST131) to be LIST ;;; Note: ;;; in file SETF.LSP, position 18671 ;;; at (FSET 'PSETF ...) ;;; Checking type of #:LOOP-LIST-TAIL133 to be CONS ;;; Note: ;;; in file SETF.LSP, position 18671 ;;; at (FSET 'PSETF ...) ;;; Checking type of #:LET147 to be LIST ;;; Note: ;;; in file SETF.LSP, position 18671 ;;; at (FSET 'PSETF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST140) to be LIST ;;; Note: ;;; in file SETF.LSP, position 18671 ;;; at (FSET 'PSETF ...) ;;; Checking type of #:LOOP-LIST-TAIL142 to be CONS ;;; Compiling (DEFMACRO WITH-EXPANSION-SETTER ...). ;;; Compiling (DEFMACRO SHIFTF ...). ;;; Note: ;;; in file SETF.LSP, position 20430 ;;; at (FSET 'SHIFTF ...) ;;; Checking type of #:LET188 to be LIST ;;; Note: ;;; in file SETF.LSP, position 20430 ;;; at (FSET 'SHIFTF ...) ;;; Checking type of #:LET190 to be LIST ;;; Note: ;;; in file SETF.LSP, position 20430 ;;; at (FSET 'SHIFTF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST183) to be LIST ;;; Note: ;;; in file SETF.LSP, position 20430 ;;; at (FSET 'SHIFTF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST184) to be LIST ;;; Note: ;;; in file SETF.LSP, position 20430 ;;; at (FSET 'SHIFTF ...) ;;; Checking type of #:LOOP-LIST-TAIL186 to be CONS ;;; Note: ;;; in file SETF.LSP, position 20430 ;;; at (FSET 'SHIFTF ...) ;;; Checking type of #:LET200 to be LIST ;;; Note: ;;; in file SETF.LSP, position 20430 ;;; at (FSET 'SHIFTF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST193) to be LIST ;;; Note: ;;; in file SETF.LSP, position 20430 ;;; at (FSET 'SHIFTF ...) ;;; Checking type of #:LOOP-LIST-TAIL195 to be CONS ;;; Compiling (DEFMACRO ROTATEF ...). ;;; Note: ;;; in file SETF.LSP, position 21063 ;;; at (FSET 'ROTATEF ...) ;;; Checking type of #:LET228 to be LIST ;;; Note: ;;; in file SETF.LSP, position 21063 ;;; at (FSET 'ROTATEF ...) ;;; Checking type of #:LET230 to be LIST ;;; Note: ;;; in file SETF.LSP, position 21063 ;;; at (FSET 'ROTATEF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST223) to be LIST ;;; Note: ;;; in file SETF.LSP, position 21063 ;;; at (FSET 'ROTATEF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST224) to be LIST ;;; Note: ;;; in file SETF.LSP, position 21063 ;;; at (FSET 'ROTATEF ...) ;;; Checking type of #:LOOP-LIST-TAIL226 to be CONS ;;; Note: ;;; in file SETF.LSP, position 21063 ;;; at (FSET 'ROTATEF ...) ;;; Checking type of #:LET240 to be LIST ;;; Note: ;;; in file SETF.LSP, position 21063 ;;; at (FSET 'ROTATEF ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST233) to be LIST ;;; Note: ;;; in file SETF.LSP, position 21063 ;;; at (FSET 'ROTATEF ...) ;;; Checking type of #:LOOP-LIST-TAIL235 to be CONS ;;; Compiling (DEFMACRO DEFINE-MODIFY-MACRO ...). ;;; Compiling (DEFMACRO REMF ...). ;;; Compiling (DEFINE-MODIFY-MACRO INCF ...). ;;; Compiling (DEFINE-MODIFY-MACRO DECF ...). ;;; Compiling (DEFMACRO PUSH ...). ;;; Compiling (DEFMACRO PUSHNEW ...). ;;; Compiling (DEFMACRO POP ...). ;;; End of Pass 1. ;;; Emitting code for DO-SETF-METHOD-EXPANSION. ;;; Emitting code for DO-DEFSETF. ;;; Emitting code for #:G13. ;;; Emitting code for #:G14. ;;; Emitting code for DO-DEFINE-SETF-METHOD. ;;; Emitting code for DEFSETF. ;;; Emitting code for DEFINE-SETF-EXPANDER. ;;; Emitting code for GET-SETF-EXPANSION. ;;; Emitting code for CAR. ;;; Emitting code for CDR. ;;; Emitting code for CAAR. ;;; Emitting code for CDAR. ;;; Emitting code for CADR. ;;; Emitting code for CDDR. ;;; Emitting code for CAAAR. ;;; Emitting code for CDAAR. ;;; Emitting code for CADAR. ;;; Emitting code for CDDAR. ;;; Emitting code for CAADR. ;;; Emitting code for CDADR. ;;; Emitting code for CADDR. ;;; Emitting code for CDDDR. ;;; Emitting code for CAAAAR. ;;; Emitting code for CDAAAR. ;;; Emitting code for CADAAR. ;;; Emitting code for CDDAAR. ;;; Emitting code for CAADAR. ;;; Emitting code for CDADAR. ;;; Emitting code for CADDAR. ;;; Emitting code for CDDDAR. ;;; Emitting code for CAAADR. ;;; Emitting code for CDAADR. ;;; Emitting code for CADADR. ;;; Emitting code for CDDADR. ;;; Emitting code for CAADDR. ;;; Emitting code for CDADDR. ;;; Emitting code for CADDDR. ;;; Emitting code for CDDDDR. ;;; Emitting code for FIRST. ;;; Emitting code for SECOND. ;;; Emitting code for THIRD. ;;; Emitting code for FOURTH. ;;; Emitting code for FIFTH. ;;; Emitting code for SIXTH. ;;; Emitting code for SEVENTH. ;;; Emitting code for EIGHTH. ;;; Emitting code for NINTH. ;;; Emitting code for TENTH. ;;; Emitting code for REST. ;;; Emitting code for MACRO-FUNCTION. ;;; Emitting code for GET. ;;; Emitting code for NTH. ;;; Emitting code for GETHASH. ;;; Emitting code for COMPILER-MACRO-FUNCTION. ;;; Emitting code for GETF. ;;; Emitting code for SUBSEQ. ;;; Emitting code for THE. ;;; Emitting code for APPLY. ;;; Emitting code for LDB. ;;; Emitting code for MASK-FIELD. ;;; Emitting code for TRIVIAL-SETF-FORM. ;;; Emitting code for TRY-SIMPLER-EXPANSION. ;;; Emitting code for SETF-EXPAND-1. ;;; Emitting code for SETF-EXPAND. ;;; Emitting code for SETF. ;;; Emitting code for WITH-SETF-EXPANSIONS. ;;; Emitting code for PSETF. ;;; Emitting code for #:G126. ;;; Emitting code for #:G143. ;;; Emitting code for THUNK. ;;; Emitting code for WITH-EXPANSION-SETTER. ;;; Emitting code for SHIFTF. ;;; Emitting code for #:G179. ;;; Emitting code for #:G196. ;;; Emitting code for THUNK. ;;; Emitting code for ROTATEF. ;;; Emitting code for #:G219. ;;; Emitting code for #:G236. ;;; Emitting code for THUNK. ;;; Emitting code for DEFINE-MODIFY-MACRO. ;;; Emitting code for REMF. ;;; Emitting code for INCF. ;;; Emitting code for #:G280. ;;; Emitting code for DECF. ;;; Emitting code for #:G292. ;;; Emitting code for PUSH. ;;; Emitting code for PUSHNEW. ;;; Emitting code for POP. ;;; Emitting code for VALUES. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/setf.c -o lsp/setf.o ;;; Finished compiling SRC:LSP;SETF.LSP. ;;; (compile-file "src:lsp;predlib.lsp" :output-file #P"BUILD:LSP;PREDLIB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;PREDLIB.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN CONSTANTLY-T ...). ;;; Compiling (DEFUN CONSTANTLY-NIL ...). ;;; Compiling (DEFUN CONSTANTLY ...). ;;; Function CONSTANTLY proclaimed (1,1) ;;; Compiling (DEFPARAMETER *SUBTYPEP-CACHE* ...). ;;; Compiling (DEFPARAMETER *UPGRADED-ARRAY-ELEMENT-TYPE-CACHE* ...). ;;; Compiling (DEFUN SUBTYPEP-CLEAR-CACHE ...). ;;; Compiling (DEFUN CREATE-TYPE-NAME ...). ;;; Compiling (DEFUN DO-DEFTYPE ...). ;;; Function DO-DEFTYPE proclaimed (0,65536) ;;; Compiling (DEFMACRO DEFTYPE ...). ;;; Compiling (DEFUN SIMPLE-ARRAY-P ...). ;;; Compiling (DEFUN COMPLEX-ARRAY-P ...). ;;; Compiling (DEFUN RATIOP ...). ;;; Function RATIOP proclaimed (1,1) ;;; Compiling (DEFUN SHORT-FLOAT-P ...). ;;; Function SHORT-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN SINGLE-FLOAT-P ...). ;;; Function SINGLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN DOUBLE-FLOAT-P ...). ;;; Function DOUBLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN LONG-FLOAT-P ...). ;;; Function LONG-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN UPGRADED-ARRAY-ELEMENT-TYPE ...). ;;; Note: ;;; in file PREDLIB.LSP, position 16271 ;;; at (DEFUN UPGRADED-ARRAY-ELEMENT-TYPE ...) ;;; Checking type of (LOGAND 127 (HASH-EQL ELEMENT-TYPE)) to be (INTEGER 0 127) ;;; Function UPGRADED-ARRAY-ELEMENT-TYPE proclaimed (1,2) ;;; Compiling (DEFUN UPGRADED-COMPLEX-PART-TYPE ...). ;;; Function UPGRADED-COMPLEX-PART-TYPE proclaimed (1,2) ;;; Compiling (DEFUN IN-INTERVAL-P ...). ;;; Compiling (DEFUN ERROR-TYPE-SPECIFIER ...). ;;; Compiling (DEFUN MATCH-DIMENSIONS ...). ;;; Compiling (DEFUN TYPEP ...). ;;; Function TYPEP proclaimed (2,3) ;;; Compiling (DEFUN SUBCLASSP ...). ;;; Function SUBCLASSP proclaimed (0,65536) ;;; Compiling (DEFUN OF-CLASS-P ...). ;;; Function OF-CLASS-P proclaimed (0,65536) ;;; Compiling (DEFUN NORMALIZE-TYPE ...). ;;; Compiling (DEFUN EXPAND-DEFTYPE ...). ;;; Compiling (DEFUN COERCE ...). ;;; Function COERCE proclaimed (2,2) ;;; Compiling (DEFPARAMETER *SAVE-TYPES-DATABASE* ...). ;;; Compiling (DEFPARAMETER *HIGHEST-TYPE-TAG* ...). ;;; Compiling (DEFPARAMETER *MEMBER-TYPES* ...). ;;; Compiling (DEFPARAMETER *INTERVALS-MASK* ...). ;;; Compiling (DEFPARAMETER *ELEMENTARY-TYPES* ...). ;;; Compiling (DEFUN NEW-TYPE-TAG ...). ;;; Compiling (DEFUN FIND-REGISTERED-TAG ...). ;;; Compiling (DEFUN MAYBE-SAVE-TYPES ...). ;;; Compiling (DEFUN UPDATE-TYPES ...). ;;; Compiling (DEFUN FIND-TYPE-BOUNDS ...). ;;; Compiling (DEFUN REGISTER-TYPE ...). ;;; Compiling (DEFUN REGISTER-MEMBER-TYPE ...). ;;; Compiling (DEFUN SIMPLE-MEMBER-TYPE ...). ;;; Compiling (DEFUN NUMBER-MEMBER-TYPE ...). ;;; Compiling (DEFUN PUSH-TYPE ...). ;;; Compiling (DEFUN REGISTER-SATISFIES-TYPE ...). ;;; Compiling (DEFUN REGISTER-CLASS ...). ;;; Compiling (DEFUN REGISTER-ARRAY-TYPE ...). ;;; Note: ;;; in file PREDLIB.LSP, position 37577 ;;; at (DEFUN REGISTER-ARRAY-TYPE ...) ;;; Checking type of #:LET252 to be LIST ;;; Note: ;;; in file PREDLIB.LSP, position 37577 ;;; at (DEFUN REGISTER-ARRAY-TYPE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST247) to be LIST ;;; Note: ;;; in file PREDLIB.LSP, position 37577 ;;; at (DEFUN REGISTER-ARRAY-TYPE ...) ;;; Checking type of #:LOOP-LIST-TAIL249 to be CONS ;;; Compiling (DEFUN FAST-UPGRADED-ARRAY-ELEMENT-TYPE ...). ;;; Compiling (DEFUN PARSE-ARRAY-TYPE ...). ;;; Compiling (DEFUN ARRAY-TYPE-<= ...). ;;; Compiling (DEFUN ARRAY-TYPE-P ...). ;;; Compiling (DEFUN REGISTER-ELEMENTARY-INTERVAL ...). ;;; Compiling (DEFUN REGISTER-INTERVAL-TYPE ...). ;;; Compiling (DEFUN BOUNDS-<= ...). ;;; Compiling (DEFUN BOUNDS-< ...). ;;; Compiling (DEFUN CANONICAL-COMPLEX-TYPE ...). ;;; Compiling (DEFUN REGISTER-CONS-TYPE ...). ;;; Compiling (DEFUN FIND-BUILT-IN-TAG ...). ;;; Compiling (DEFUN EXTEND-TYPE-TAG ...). ;;; Compiling (DEFUN CANONICAL-TYPE ...). ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of #:LET299 to be LIST ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST295) to be LIST ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of #:LOOP-LIST-TAIL297 to be CONS ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of #:LET306 to be LIST ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST302) to be LIST ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of #:LOOP-LIST-TAIL304 to be CONS ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of #:LET314 to be LIST ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST310) to be LIST ;;; Note: ;;; in file PREDLIB.LSP, position 53765 ;;; at (DEFUN CANONICAL-TYPE ...) ;;; Checking type of #:LOOP-LIST-TAIL312 to be CONS ;;; Compiling (DEFUN SAFE-CANONICAL-TYPE ...). ;;; Compiling (DEFUN FAST-SUBTYPEP ...). ;;; Compiling (DEFUN SUBTYPEP ...). ;;; Function SUBTYPEP proclaimed (2,3) ;;; Compiling (DEFUN FAST-TYPE= ...). ;;; Compiling (DEFUN TYPE= ...). ;;; End of Pass 1. ;;; Emitting code for CONSTANTLY-T. ;;; Emitting code for CONSTANTLY-NIL. ;;; Emitting code for CONSTANTLY. ;;; Emitting code for #:G3. ;;; Emitting code for SUBTYPEP-CLEAR-CACHE. ;;; Emitting code for CREATE-TYPE-NAME. ;;; Emitting code for DO-DEFTYPE. ;;; Emitting code for DEFTYPE. ;;; Emitting code for MAPTREE. ;;; Emitting code for VERIFY-TREE. ;;; Emitting code for SET-DEFAULT. ;;; Emitting code for REAL. ;;; Emitting code for SHORT-FLOAT. ;;; Emitting code for MOD. ;;; Emitting code for SIGNED-BYTE. ;;; Emitting code for UNSIGNED-BYTE. ;;; Emitting code for VECTOR. ;;; Emitting code for STRING. ;;; Emitting code for BASE-STRING. ;;; Emitting code for EXTENDED-STRING. ;;; Emitting code for BIT-VECTOR. ;;; Emitting code for SIMPLE-VECTOR. ;;; Emitting code for SIMPLE-STRING. ;;; Emitting code for SIMPLE-BASE-STRING. ;;; Emitting code for SIMPLE-BIT-VECTOR. ;;; Emitting code for SIMPLE-ARRAY-P. ;;; Emitting code for COMPLEX-ARRAY-P. ;;; Emitting code for RATIOP. ;;; Emitting code for SHORT-FLOAT-P. ;;; Emitting code for SINGLE-FLOAT-P. ;;; Emitting code for DOUBLE-FLOAT-P. ;;; Emitting code for LONG-FLOAT-P. ;;; Emitting code for UPGRADED-ARRAY-ELEMENT-TYPE. ;;; Emitting code for UPGRADED-COMPLEX-PART-TYPE. ;;; Emitting code for IN-INTERVAL-P. ;;; Emitting code for ERROR-TYPE-SPECIFIER. ;;; Emitting code for MATCH-DIMENSIONS. ;;; Emitting code for TYPEP. ;;; Emitting code for SUBCLASSP. ;;; Emitting code for OF-CLASS-P. ;;; Emitting code for NORMALIZE-TYPE. ;;; Emitting code for EXPAND-DEFTYPE. ;;; Emitting code for COERCE. ;;; Emitting code for FAIL. ;;; Emitting code for NEW-TYPE-TAG. ;;; Emitting code for FIND-REGISTERED-TAG. ;;; Emitting code for MAYBE-SAVE-TYPES. ;;; Emitting code for UPDATE-TYPES. ;;; Emitting code for FIND-TYPE-BOUNDS. ;;; Emitting code for REGISTER-TYPE. ;;; Emitting code for REGISTER-MEMBER-TYPE. ;;; Emitting code for SIMPLE-MEMBER-TYPE. ;;; Emitting code for NUMBER-MEMBER-TYPE. ;;; Emitting code for PUSH-TYPE. ;;; Emitting code for REGISTER-SATISFIES-TYPE. ;;; Emitting code for REGISTER-CLASS. ;;; Emitting code for #:G242. ;;; Emitting code for #:G243. ;;; Emitting code for REGISTER-ARRAY-TYPE. ;;; Emitting code for #:G250. ;;; Emitting code for FAST-UPGRADED-ARRAY-ELEMENT-TYPE. ;;; Emitting code for PARSE-ARRAY-TYPE. ;;; Emitting code for ARRAY-TYPE-<=. ;;; Emitting code for ARRAY-TYPE-P. ;;; Emitting code for REGISTER-ELEMENTARY-INTERVAL. ;;; Emitting code for #:G272. ;;; Emitting code for #:G273. ;;; Emitting code for REGISTER-INTERVAL-TYPE. ;;; Emitting code for BOUNDS-<=. ;;; Emitting code for BOUNDS-<. ;;; Emitting code for CANONICAL-COMPLEX-TYPE. ;;; Emitting code for REGISTER-CONS-TYPE. ;;; Emitting code for FIND-BUILT-IN-TAG. ;;; Emitting code for EXTEND-TYPE-TAG. ;;; Emitting code for CANONICAL-TYPE. ;;; Emitting code for SAFE-CANONICAL-TYPE. ;;; Emitting code for FAST-SUBTYPEP. ;;; Emitting code for SUBTYPEP. ;;; Emitting code for FAST-TYPE=. ;;; Emitting code for TYPE=. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/predlib.c -o lsp/predlib.o ;;; Finished compiling SRC:LSP;PREDLIB.LSP. ;;; (compile-file "src:lsp;seq.lsp" :output-file #P"BUILD:LSP;SEQ.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;SEQ.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN ERROR-NOT-A-SEQUENCE ...). ;;; Compiling (DEFUN ERROR-SEQUENCE-INDEX ...). ;;; Compiling (DEFUN ERROR-SEQUENCE-TYPE ...). ;;; Compiling (DEFUN ERROR-SEQUENCE-LENGTH ...). ;;; Compiling (DEFUN CLOSEST-SEQUENCE-TYPE ...). ;;; Compiling (DEFUN MAKE-SEQUENCE ...). ;;; Function MAKE-SEQUENCE proclaimed (2,65536) ;;; Compiling (DEFUN MAKE-SEQ-ITERATOR ...). ;;; Function MAKE-SEQ-ITERATOR proclaimed (1,2) ;;; Compiling (DEFUN SEQ-ITERATOR-REF ...). ;;; Function SEQ-ITERATOR-REF proclaimed (2,2) ;;; Compiling (DEFUN SEQ-ITERATOR-SET ...). ;;; Function SEQ-ITERATOR-SET proclaimed (3,3) ;;; Compiling (DEFUN SEQ-ITERATOR-NEXT ...). ;;; Function SEQ-ITERATOR-NEXT proclaimed (2,2) ;;; Compiling (DEFUN SEQ-ITERATOR-LIST-POP ...). ;;; Compiling (DEFUN COERCE-TO-LIST ...). ;;; Function COERCE-TO-LIST proclaimed (0,65536) ;;; Compiling (DEFUN COERCE-TO-VECTOR ...). ;;; Note: ;;; in file SEQ.LSP, position 8632 ;;; at (DEFUN COERCE-TO-VECTOR ...) ;;; Checking type of #:LET37 to be INDEX ;;; Function COERCE-TO-VECTOR proclaimed (4,4) ;;; Compiling (DEFUN CONCATENATE ...). ;;; Note: ;;; in file SEQ.LSP, position 9465 ;;; at (DEFUN CONCATENATE ...) ;;; Checking type of #:LET53 to be LIST ;;; Note: ;;; in file SEQ.LSP, position 9465 ;;; at (DEFUN CONCATENATE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST49) to be LIST ;;; Note: ;;; in file SEQ.LSP, position 9465 ;;; at (DEFUN CONCATENATE ...) ;;; Checking type of #:LOOP-LIST-TAIL51 to be CONS ;;; Function CONCATENATE proclaimed (1,65536) ;;; Compiling (DEFUN MAP ...). ;;; Note: ;;; in file SEQ.LSP, position 10109 ;;; at (DEFUN MAP ...) ;;; Checking type of #:LET69 to be LIST ;;; Note: ;;; in file SEQ.LSP, position 10109 ;;; at (DEFUN MAP ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST65) to be LIST ;;; Note: ;;; in file SEQ.LSP, position 10109 ;;; at (DEFUN MAP ...) ;;; Checking type of #:LOOP-LIST-TAIL67 to be CONS ;;; Function MAP proclaimed (3,65536) ;;; Compiling (DEFUN SOME ...). ;;; Function SOME proclaimed (2,65536) ;;; Compiling (DEFUN EVERY ...). ;;; Function EVERY proclaimed (2,65536) ;;; Compiling (DEFUN EVERY* ...). ;;; Note: ;;; in file SEQ.LSP, position 12237 ;;; at (DEFUN EVERY* ...) ;;; Checking type of #:LET104 to be LIST ;;; Note: ;;; in file SEQ.LSP, position 12237 ;;; at (DEFUN EVERY* ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST100) to be LIST ;;; Note: ;;; in file SEQ.LSP, position 12237 ;;; at (DEFUN EVERY* ...) ;;; Checking type of #:LOOP-LIST-TAIL102 to be CONS ;;; Compiling (DEFUN NOTANY ...). ;;; Function NOTANY proclaimed (2,65536) ;;; Compiling (DEFUN NOTEVERY ...). ;;; Function NOTEVERY proclaimed (2,65536) ;;; Compiling (DEFUN MAP-INTO ...). ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of #:LET111 to be LIST ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST107) to be LIST ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of #:LOOP-LIST-TAIL109 to be CONS ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of (APPLY #'MIN (IF (VECTORP RESULT-SEQUENCE) (ARRAY-DIMENSION RESULT-SEQUENCE 0) (LENGTH RESULT-SEQUENCE)) (MAPCAR #'LENGTH SEQUENCES)) to be FIXNUM ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of #:LET118 to be LIST ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST114) to be LIST ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of #:LOOP-LIST-TAIL116 to be CONS ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of #:LET130 to be LIST ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST126) to be LIST ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of #:LOOP-LIST-TAIL128 to be CONS ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of V to be CONS ;;; Note: ;;; in file SEQ.LSP, position 13058 ;;; at (DEFUN MAP-INTO ...) ;;; Checking type of I to be CONS ;;; Function MAP-INTO proclaimed (2,65536) ;;; End of Pass 1. ;;; Emitting code for ERROR-NOT-A-SEQUENCE. ;;; Emitting code for ERROR-SEQUENCE-INDEX. ;;; Emitting code for ERROR-SEQUENCE-TYPE. ;;; Emitting code for ERROR-SEQUENCE-LENGTH. ;;; Emitting code for CLOSEST-SEQUENCE-TYPE. ;;; Emitting code for MAKE-SEQUENCE. ;;; Emitting code for MAKE-SEQ-ITERATOR. ;;; Emitting code for SEQ-ITERATOR-REF. ;;; Emitting code for SEQ-ITERATOR-SET. ;;; Emitting code for SEQ-ITERATOR-NEXT. ;;; Emitting code for SEQ-ITERATOR-LIST-POP. ;;; Emitting code for COERCE-TO-LIST. ;;; Emitting code for COERCE-TO-VECTOR. ;;; Emitting code for CONCATENATE. ;;; Emitting code for MAP. ;;; Emitting code for SOME. ;;; Emitting code for EVERY. ;;; Emitting code for EVERY*. ;;; Emitting code for NOTANY. ;;; Emitting code for NOTEVERY. ;;; Emitting code for MAP-INTO. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/seq.c -o lsp/seq.o ;;; Finished compiling SRC:LSP;SEQ.LSP. ;;; (compile-file "src:lsp;arraylib.lsp" :output-file #P"BUILD:LSP;ARRAYLIB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;ARRAYLIB.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-ARRAY ...). ;;; Function MAKE-ARRAY proclaimed (1,65536) ;;; Compiling (DEFUN FILL-ARRAY-WITH-SEQ ...). ;;; Compiling (DEFUN VECTOR ...). ;;; Function VECTOR proclaimed (0,65536) ;;; Compiling (DEFUN ARRAY-DIMENSIONS ...). ;;; Function ARRAY-DIMENSIONS proclaimed (1,1) ;;; Compiling (DEFUN ARRAY-IN-BOUNDS-P ...). ;;; Note: ;;; in file ARRAYLIB.LSP, position 5076 ;;; at (DEFUN ARRAY-IN-BOUNDS-P ...) ;;; In function ARRAY-IN-BOUNDS-P, checking types of arguments ARRAY. ;;; Note: ;;; in file ARRAYLIB.LSP, position 5076 ;;; at (DEFUN ARRAY-IN-BOUNDS-P ...) ;;; Checking type of ARRAY to be ARRAY ;;; Function ARRAY-IN-BOUNDS-P proclaimed (1,65536) ;;; Compiling (DEFUN ROW-MAJOR-INDEX-INNER ...). ;;; Compiling (DEFUN ARRAY-ROW-MAJOR-INDEX ...). ;;; Note: ;;; in file ARRAYLIB.LSP, position 6855 ;;; at (DEFUN ARRAY-ROW-MAJOR-INDEX ...) ;;; In function ARRAY-ROW-MAJOR-INDEX, checking types of arguments ARRAY. ;;; Note: ;;; in file ARRAYLIB.LSP, position 6855 ;;; at (DEFUN ARRAY-ROW-MAJOR-INDEX ...) ;;; Checking type of ARRAY to be ARRAY ;;; Function ARRAY-ROW-MAJOR-INDEX proclaimed (1,65536) ;;; Compiling (DEFUN BIT ...). ;;; Note: ;;; in file ARRAYLIB.LSP, position 7215 ;;; at (DEFUN BIT ...) ;;; In function BIT, checking types of arguments BIT-ARRAY. ;;; Note: ;;; in file ARRAYLIB.LSP, position 7215 ;;; at (DEFUN BIT ...) ;;; Checking type of BIT-ARRAY to be ARRAY ;;; Function BIT proclaimed (1,65536) ;;; Compiling (DEFUN SBIT ...). ;;; Note: ;;; in file ARRAYLIB.LSP, position 7520 ;;; at (DEFUN SBIT ...) ;;; In function SBIT, checking types of arguments BIT-ARRAY. ;;; Note: ;;; in file ARRAYLIB.LSP, position 7520 ;;; at (DEFUN SBIT ...) ;;; Checking type of BIT-ARRAY to be ARRAY ;;; Function SBIT proclaimed (1,65536) ;;; Compiling (DEFUN BIT-AND ...). ;;; Function BIT-AND proclaimed (2,3) ;;; Compiling (DEFUN BIT-IOR ...). ;;; Function BIT-IOR proclaimed (2,3) ;;; Compiling (DEFUN BIT-XOR ...). ;;; Function BIT-XOR proclaimed (2,3) ;;; Compiling (DEFUN BIT-EQV ...). ;;; Function BIT-EQV proclaimed (2,3) ;;; Compiling (DEFUN BIT-NAND ...). ;;; Function BIT-NAND proclaimed (2,3) ;;; Compiling (DEFUN BIT-NOR ...). ;;; Function BIT-NOR proclaimed (2,3) ;;; Compiling (DEFUN BIT-ANDC1 ...). ;;; Function BIT-ANDC1 proclaimed (2,3) ;;; Compiling (DEFUN BIT-ANDC2 ...). ;;; Function BIT-ANDC2 proclaimed (2,3) ;;; Compiling (DEFUN BIT-ORC1 ...). ;;; Function BIT-ORC1 proclaimed (2,3) ;;; Compiling (DEFUN BIT-ORC2 ...). ;;; Function BIT-ORC2 proclaimed (2,3) ;;; Compiling (DEFUN BIT-NOT ...). ;;; Function BIT-NOT proclaimed (1,2) ;;; Compiling (DEFUN VECTOR-POP ...). ;;; Function VECTOR-POP proclaimed (1,1) ;;; Compiling (DEFUN COPY-ARRAY-CONTENTS ...). ;;; Compiling (DEFUN ADJUST-ARRAY ...). ;;; Function ADJUST-ARRAY proclaimed (2,65536) ;;; Compiling (DEFUN SHRINK-VECTOR ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-ARRAY. ;;; Emitting code for FILL-ARRAY-WITH-SEQ. ;;; Emitting code for ITERATE-OVER-CONTENTS. ;;; Emitting code for VECTOR. ;;; Emitting code for ARRAY-DIMENSIONS. ;;; Emitting code for ARRAY-IN-BOUNDS-P. ;;; Emitting code for ROW-MAJOR-INDEX-INNER. ;;; Emitting code for INDEXING-ERROR. ;;; Emitting code for ARRAY-ROW-MAJOR-INDEX. ;;; Emitting code for BIT. ;;; Emitting code for SBIT. ;;; Emitting code for BIT-AND. ;;; Emitting code for BIT-IOR. ;;; Emitting code for BIT-XOR. ;;; Emitting code for BIT-EQV. ;;; Emitting code for BIT-NAND. ;;; Emitting code for BIT-NOR. ;;; Emitting code for BIT-ANDC1. ;;; Emitting code for BIT-ANDC2. ;;; Emitting code for BIT-ORC1. ;;; Emitting code for BIT-ORC2. ;;; Emitting code for BIT-NOT. ;;; Emitting code for VECTOR-POP. ;;; Emitting code for COPY-ARRAY-CONTENTS. ;;; Emitting code for DO-COPY. ;;; Emitting code for ADJUST-ARRAY. ;;; Emitting code for SHRINK-VECTOR. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/arraylib.c -o lsp/arraylib.o ;;; Finished compiling SRC:LSP;ARRAYLIB.LSP. ;;; (compile-file "src:lsp;assert.lsp" :output-file #P"BUILD:LSP;ASSERT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;ASSERT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN READ-EVALUATED-FORM ...). ;;; Compiling (DEFUN WRONG-TYPE-ARGUMENT ...). ;;; Function WRONG-TYPE-ARGUMENT proclaimed (0,65536) ;;; Compiling (DEFMACRO CHECK-TYPE ...). ;;; Compiling (DEFUN DO-CHECK-TYPE ...). ;;; Function DO-CHECK-TYPE proclaimed (4,4) ;;; Compiling (DEFMACRO ASSERT ...). ;;; Compiling (DEFUN ACCUMULATE-CASES ...). ;;; Compiling (DEFUN ECASE-ERROR ...). ;;; Function ECASE-ERROR proclaimed (2,2) ;;; Compiling (DEFMACRO ECASE ...). ;;; Compiling (DEFUN CCASE-ERROR ...). ;;; Function CCASE-ERROR proclaimed (3,3) ;;; Compiling (DEFUN REMOVE-OTHERWISE-FROM-CLAUSES ...). ;;; Note: ;;; in file ASSERT.LSP, position 5276 ;;; at (DEFUN REMOVE-OTHERWISE-FROM-CLAUSES ...) ;;; Checking type of #:LET67 to be LIST ;;; Note: ;;; in file ASSERT.LSP, position 5276 ;;; at (DEFUN REMOVE-OTHERWISE-FROM-CLAUSES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST61) to be LIST ;;; Note: ;;; in file ASSERT.LSP, position 5276 ;;; at (DEFUN REMOVE-OTHERWISE-FROM-CLAUSES ...) ;;; Checking type of #:LOOP-LIST-TAIL63 to be CONS ;;; Compiling (DEFMACRO CCASE ...). ;;; Compiling (DEFMACRO TYPECASE ...). ;;; Compiling (DEFUN ETYPECASE-ERROR ...). ;;; Function ETYPECASE-ERROR proclaimed (2,2) ;;; Compiling (DEFMACRO ETYPECASE ...). ;;; Compiling (DEFUN CTYPECASE-ERROR ...). ;;; Function CTYPECASE-ERROR proclaimed (3,3) ;;; Compiling (DEFMACRO CTYPECASE ...). ;;; Note: ;;; in file ASSERT.LSP, position 8630 ;;; at (FSET 'CTYPECASE ...) ;;; Checking type of #:LET121 to be LIST ;;; Note: ;;; in file ASSERT.LSP, position 8630 ;;; at (FSET 'CTYPECASE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST116) to be LIST ;;; Note: ;;; in file ASSERT.LSP, position 8630 ;;; at (FSET 'CTYPECASE ...) ;;; Checking type of #:LOOP-LIST-TAIL118 to be CONS ;;; End of Pass 1. ;;; Emitting code for READ-EVALUATED-FORM. ;;; Emitting code for WRONG-TYPE-ARGUMENT. ;;; Emitting code for #:G4. ;;; Emitting code for #:G5. ;;; Emitting code for CHECK-TYPE. ;;; Emitting code for DO-CHECK-TYPE. ;;; Emitting code for #:G23. ;;; Emitting code for #:G24. ;;; Emitting code for ASSERT. ;;; Emitting code for ACCUMULATE-CASES. ;;; Emitting code for ECASE-ERROR. ;;; Emitting code for ECASE. ;;; Emitting code for CCASE-ERROR. ;;; Emitting code for #:G54. ;;; Emitting code for #:G55. ;;; Emitting code for REMOVE-OTHERWISE-FROM-CLAUSES. ;;; Emitting code for #:G64. ;;; Emitting code for CCASE. ;;; Emitting code for TYPECASE. ;;; Emitting code for ETYPECASE-ERROR. ;;; Emitting code for ETYPECASE. ;;; Emitting code for CTYPECASE-ERROR. ;;; Emitting code for #:G102. ;;; Emitting code for #:G103. ;;; Emitting code for CTYPECASE. ;;; Emitting code for #:G119. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/assert.c -o lsp/assert.o lsp/assert.c: In function ‘si_ecase_error’: lsp/assert.c:512:10: warning: function declared ‘noreturn’ has a ‘return’ statement return value0; ^~~~~~ lsp/assert.c: In function ‘si_etypecase_error’: lsp/assert.c:920:10: warning: function declared ‘noreturn’ has a ‘return’ statement return value0; ^~~~~~ ;;; Finished compiling SRC:LSP;ASSERT.LSP. ;;; (compile-file "src:lsp;defstruct.lsp" :output-file #P"BUILD:LSP;DEFSTRUCT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;DEFSTRUCT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN STRUCTURE-TYPE-ERROR ...). ;;; Function STRUCTURE-TYPE-ERROR proclaimed (0,65536) ;;; Compiling (DEFUN MAKE-ACCESS-FUNCTION ...). ;;; Note: ;;; in file DEFSTRUCT.LSP, position 1012 ;;; at (DEFUN MAKE-ACCESS-FUNCTION ...) ;;; Checking type of (NTHCDR 5 #:G0) to be CONS ;;; Compiling (DEFUN DO-SETF-STRUCTURE-METHOD ...). ;;; Compiling (DEFUN PROCESS-BOA-LAMBDA-LIST ...). ;;; Note: ;;; in file DEFSTRUCT.LSP, position 3092 ;;; at (DEFUN PROCESS-BOA-LAMBDA-LIST ...) ;;; Checking type of #:G13 to be CONS ;;; Note: ;;; in file DEFSTRUCT.LSP, position 3092 ;;; at (DEFUN PROCESS-BOA-LAMBDA-LIST ...) ;;; Checking type of #:G17 to be CONS ;;; Note: ;;; in file DEFSTRUCT.LSP, position 3092 ;;; at (DEFUN PROCESS-BOA-LAMBDA-LIST ...) ;;; Checking type of #:G22 to be CONS ;;; Compiling (DEFUN MAKE-CONSTRUCTOR ...). ;;; Compiling (DEFUN MAKE-PREDICATE ...). ;;; Note: ;;; in file DEFSTRUCT.LSP, position 8472 ;;; at (DEFUN MAKE-PREDICATE ...) ;;; Checking type of #:LET40 to be FIXNUM ;;; Note: ;;; in file DEFSTRUCT.LSP, position 8472 ;;; at (DEFUN MAKE-PREDICATE ...) ;;; Checking type of (1- I) to be FIXNUM ;;; Compiling (DEFUN PARSE-SLOT-DESCRIPTION ...). ;;; Compiling (DEFUN OVERWRITE-SLOT-DESCRIPTIONS ...). ;;; Note: ;;; in file DEFSTRUCT.LSP, position 11057 ;;; at (DEFUN OVERWRITE-SLOT-DESCRIPTIONS ...) ;;; Checking type of (CDDDR #:G60) to be CONS ;;; Note: ;;; in file DEFSTRUCT.LSP, position 11057 ;;; at (DEFUN OVERWRITE-SLOT-DESCRIPTIONS ...) ;;; Checking type of (CDDDDR #:G62) to be CONS ;;; Note: ;;; in file DEFSTRUCT.LSP, position 11057 ;;; at (DEFUN OVERWRITE-SLOT-DESCRIPTIONS ...) ;;; Checking type of (NTHCDR 5 #:G64) to be CONS ;;; Compiling (DEFUN DEFINE-STRUCTURE ...). ;;; Note: ;;; in file DEFSTRUCT.LSP, position 12134 ;;; at (DEFUN DEFINE-STRUCTURE ...) ;;; Checking type of #:LET75 to be LIST ;;; Note: ;;; in file DEFSTRUCT.LSP, position 12134 ;;; at (DEFUN DEFINE-STRUCTURE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST70) to be LIST ;;; Note: ;;; in file DEFSTRUCT.LSP, position 12134 ;;; at (DEFUN DEFINE-STRUCTURE ...) ;;; Checking type of #:LOOP-LIST-TAIL72 to be CONS ;;; Function DEFINE-STRUCTURE proclaimed (0,65536) ;;; Compiling (DEFMACRO DEFSTRUCT ...). ;;; Note: ;;; in file DEFSTRUCT.LSP, position 14462 ;;; at (FSET 'DEFSTRUCT ...) ;;; Checking type of #:LET115 to be LIST ;;; Note: ;;; in file DEFSTRUCT.LSP, position 14462 ;;; at (FSET 'DEFSTRUCT ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST110) to be LIST ;;; Note: ;;; in file DEFSTRUCT.LSP, position 14462 ;;; at (FSET 'DEFSTRUCT ...) ;;; Checking type of #:LOOP-LIST-TAIL112 to be CONS ;;; Note: ;;; in file DEFSTRUCT.LSP, position 14462 ;;; at (FSET 'DEFSTRUCT ...) ;;; Checking type of #:LET125 to be LIST ;;; Note: ;;; in file DEFSTRUCT.LSP, position 14462 ;;; at (FSET 'DEFSTRUCT ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST120) to be LIST ;;; Note: ;;; in file DEFSTRUCT.LSP, position 14462 ;;; at (FSET 'DEFSTRUCT ...) ;;; Checking type of #:LOOP-LIST-TAIL122 to be CONS ;;; End of Pass 1. ;;; Emitting code for STRUCTURE-TYPE-ERROR. ;;; Emitting code for MAKE-ACCESS-FUNCTION. ;;; Emitting code for #:G2. ;;; Emitting code for #:G3. ;;; Emitting code for DO-SETF-STRUCTURE-METHOD. ;;; Emitting code for #:G4. ;;; Emitting code for #:G5. ;;; Emitting code for #:G6. ;;; Emitting code for PROCESS-BOA-LAMBDA-LIST. ;;; Emitting code for MAKE-CONSTRUCTOR. ;;; Emitting code for MAKE-PREDICATE. ;;; Emitting code for #:G36. ;;; Emitting code for #:G37. ;;; Emitting code for #:G38. ;;; Emitting code for #:G39. ;;; Emitting code for PARSE-SLOT-DESCRIPTION. ;;; Emitting code for OVERWRITE-SLOT-DESCRIPTIONS. ;;; Emitting code for DEFINE-STRUCTURE. ;;; Emitting code for #:G73. ;;; Emitting code for DEFSTRUCT. ;;; Emitting code for #:G113. ;;; Emitting code for #:G123. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/defstruct.c -o lsp/defstruct.o ;;; Finished compiling SRC:LSP;DEFSTRUCT.LSP. ;;; (compile-file "src:lsp;iolib.lsp" :output-file #P"BUILD:LSP;IOLIB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;IOLIB.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO WITH-OPEN-STREAM ...). ;;; Compiling (DEFMACRO WITH-INPUT-FROM-STRING ...). ;;; Compiling (DEFMACRO WITH-OUTPUT-TO-STRING ...). ;;; Compiling (DEFUN READ-FROM-STRING ...). ;;; Function READ-FROM-STRING proclaimed (1,65536) ;;; Compiling (DEFUN STRING-TO-OBJECT ...). ;;; Function STRING-TO-OBJECT proclaimed (1,2) ;;; Compiling (DEFUN WRITE-TO-STRING ...). ;;; Function WRITE-TO-STRING proclaimed (1,65536) ;;; Compiling (DEFUN PRIN1-TO-STRING ...). ;;; Function PRIN1-TO-STRING proclaimed (1,1) ;;; Compiling (DEFUN PRINC-TO-STRING ...). ;;; Function PRINC-TO-STRING proclaimed (1,1) ;;; Compiling (DEFMACRO WITH-OPEN-FILE ...). ;;; Compiling (DEFUN Y-OR-N-P ...). ;;; Function Y-OR-N-P proclaimed (0,65536) ;;; Compiling (DEFUN YES-OR-NO-P ...). ;;; Function YES-OR-NO-P proclaimed (0,65536) ;;; Compiling (DEFUN SHARP-A-READER ...). ;;; Note: ;;; in file IOLIB.LSP, position 6833 ;;; at (DEFUN SHARP-A-READER ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; Compiling (DEFUN SHARP-S-READER ...). ;;; Note: ;;; in file IOLIB.LSP, position 7728 ;;; at (DEFUN SHARP-S-READER ...) ;;; Checking type of LL to be CONS ;;; Compiling (DEFPARAMETER *DRIBBLE-CLOSURE* ...). ;;; Compiling (DEFUN DRIBBLE ...). ;;; Function DRIBBLE proclaimed (0,1) ;;; Compiling (DEFMACRO WITH-STANDARD-IO-SYNTAX ...). ;;; Compiling (DEFMACRO WITH-ECL-IO-SYNTAX ...). ;;; Compiling (DEFMACRO PRINT-UNREADABLE-OBJECT ...). ;;; Compiling (DEFUN LOAD-ENCODING ...). ;;; Function LOAD-ENCODING proclaimed (1,1) ;;; Compiling (DEFUN MAKE-ENCODING ...). ;;; Function MAKE-ENCODING proclaimed (1,1) ;;; End of Pass 1. ;;; Emitting code for WITH-OPEN-STREAM. ;;; Emitting code for WITH-INPUT-FROM-STRING. ;;; Emitting code for WITH-OUTPUT-TO-STRING. ;;; Emitting code for READ-FROM-STRING. ;;; Emitting code for STRING-TO-OBJECT. ;;; Emitting code for WRITE-TO-STRING. ;;; Emitting code for PRIN1-TO-STRING. ;;; Emitting code for PRINC-TO-STRING. ;;; Emitting code for WITH-OPEN-FILE. ;;; Emitting code for Y-OR-N-P. ;;; Emitting code for YES-OR-NO-P. ;;; Emitting code for SHARP-A-READER. ;;; Emitting code for SHARP-S-READER. ;;; Emitting code for DRIBBLE. ;;; Emitting code for #:G72. ;;; Emitting code for WITH-STANDARD-IO-SYNTAX. ;;; Emitting code for WITH-ECL-IO-SYNTAX. ;;; Emitting code for PRINT-UNREADABLE-OBJECT. ;;; Emitting code for ALL-ENCODINGS. ;;; Emitting code for LOAD-ENCODING. ;;; Emitting code for MAKE-ENCODING. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/iolib.c -o lsp/iolib.o ;;; Finished compiling SRC:LSP;IOLIB.LSP. ;;; (compile-file "src:lsp;listlib.lsp" :output-file #P"BUILD:LSP;LISTLIB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;LISTLIB.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN UNION ...). ;;; Note: ;;; in file LISTLIB.LSP, position 665 ;;; at (DEFUN UNION ...) ;;; Checking type of LAST to be CONS ;;; Note: ;;; in file LISTLIB.LSP, position 665 ;;; at (DEFUN UNION ...) ;;; Checking type of LAST to be CONS ;;; Function UNION proclaimed (2,65536) ;;; Compiling (DEFUN NUNION ...). ;;; Note: ;;; in file LISTLIB.LSP, position 1226 ;;; at (DEFUN NUNION ...) ;;; Checking type of LAST to be CONS ;;; Note: ;;; in file LISTLIB.LSP, position 1226 ;;; at (DEFUN NUNION ...) ;;; Checking type of LAST to be CONS ;;; Function NUNION proclaimed (2,65536) ;;; Compiling (DEFUN INTERSECTION ...). ;;; Function INTERSECTION proclaimed (2,65536) ;;; Compiling (DEFUN NINTERSECTION ...). ;;; Note: ;;; in file LISTLIB.LSP, position 2091 ;;; at (DEFUN NINTERSECTION ...) ;;; Checking type of LAST to be CONS ;;; Note: ;;; in file LISTLIB.LSP, position 2091 ;;; at (DEFUN NINTERSECTION ...) ;;; Checking type of LAST to be CONS ;;; Function NINTERSECTION proclaimed (2,65536) ;;; Compiling (DEFUN SET-DIFFERENCE ...). ;;; Function SET-DIFFERENCE proclaimed (2,65536) ;;; Compiling (DEFUN NSET-DIFFERENCE ...). ;;; Note: ;;; in file LISTLIB.LSP, position 2888 ;;; at (DEFUN NSET-DIFFERENCE ...) ;;; Checking type of LAST to be CONS ;;; Note: ;;; in file LISTLIB.LSP, position 2888 ;;; at (DEFUN NSET-DIFFERENCE ...) ;;; Checking type of LAST to be CONS ;;; Function NSET-DIFFERENCE proclaimed (2,65536) ;;; Compiling (DEFUN SWAP-ARGS ...). ;;; Compiling (DEFUN SET-EXCLUSIVE-OR ...). ;;; Function SET-EXCLUSIVE-OR proclaimed (2,65536) ;;; Compiling (DEFUN NSET-EXCLUSIVE-OR ...). ;;; Function NSET-EXCLUSIVE-OR proclaimed (2,65536) ;;; Compiling (DEFUN SUBSETP ...). ;;; Function SUBSETP proclaimed (2,65536) ;;; Compiling (DEFUN RASSOC-IF ...). ;;; Function RASSOC-IF proclaimed (2,65536) ;;; Compiling (DEFUN RASSOC-IF-NOT ...). ;;; Function RASSOC-IF-NOT proclaimed (2,65536) ;;; Compiling (DEFUN ASSOC-IF ...). ;;; Function ASSOC-IF proclaimed (2,65536) ;;; Compiling (DEFUN ASSOC-IF-NOT ...). ;;; Function ASSOC-IF-NOT proclaimed (2,65536) ;;; Compiling (DEFUN MEMBER-IF ...). ;;; Function MEMBER-IF proclaimed (2,65536) ;;; Compiling (DEFUN MEMBER-IF-NOT ...). ;;; Function MEMBER-IF-NOT proclaimed (2,65536) ;;; Compiling (DEFUN SUBST-IF ...). ;;; Function SUBST-IF proclaimed (3,65536) ;;; Compiling (DEFUN SUBST-IF-NOT ...). ;;; Function SUBST-IF-NOT proclaimed (3,65536) ;;; Compiling (DEFUN NSUBST-IF ...). ;;; Function NSUBST-IF proclaimed (3,65536) ;;; Compiling (DEFUN NSUBST-IF-NOT ...). ;;; Function NSUBST-IF-NOT proclaimed (3,65536) ;;; End of Pass 1. ;;; Emitting code for UNION. ;;; Emitting code for NUNION. ;;; Emitting code for INTERSECTION. ;;; Emitting code for NINTERSECTION. ;;; Emitting code for SET-DIFFERENCE. ;;; Emitting code for NSET-DIFFERENCE. ;;; Emitting code for SWAP-ARGS. ;;; Emitting code for #:G30. ;;; Emitting code for SET-EXCLUSIVE-OR. ;;; Emitting code for NSET-EXCLUSIVE-OR. ;;; Emitting code for SUBSETP. ;;; Emitting code for RASSOC-IF. ;;; Emitting code for RASSOC-IF-NOT. ;;; Emitting code for ASSOC-IF. ;;; Emitting code for ASSOC-IF-NOT. ;;; Emitting code for MEMBER-IF. ;;; Emitting code for MEMBER-IF-NOT. ;;; Emitting code for SUBST-IF. ;;; Emitting code for SUBST-IF-NOT. ;;; Emitting code for NSUBST-IF. ;;; Emitting code for NSUBST-IF-NOT. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/listlib.c -o lsp/listlib.o ;;; Finished compiling SRC:LSP;LISTLIB.LSP. ;;; (compile-file "src:lsp;mislib.lsp" :output-file #P"BUILD:LSP;MISLIB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;MISLIB.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN LOGICAL-PATHNAME-TRANSLATIONS ...). ;;; Function LOGICAL-PATHNAME-TRANSLATIONS proclaimed (1,1) ;;; Compiling (DEFUN LOAD-LOGICAL-PATHNAME-TRANSLATIONS ...). ;;; Note: ;;; in file MISLIB.LSP, position 1021 ;;; at (DEFUN LOAD-LOGICAL-PATHNAME-TRANSLATIONS ...) ;;; In function LOAD-LOGICAL-PATHNAME-TRANSLATIONS, checking types of arguments HOST. ;;; Note: ;;; in file MISLIB.LSP, position 1021 ;;; at (DEFUN LOAD-LOGICAL-PATHNAME-TRANSLATIONS ...) ;;; Checking type of HOST to be STRING ;;; Function LOAD-LOGICAL-PATHNAME-TRANSLATIONS proclaimed (1,1) ;;; Compiling (DEFPARAMETER *DO-TIME-LEVEL* ...). ;;; Compiling (DEFUN DO-TIME ...). ;;; Compiling (DEFMACRO TIME ...). ;;; Compiling (DEFUN LEAP-YEAR-P ...). ;;; Compiling (DEFUN NUMBER-OF-DAYS-FROM-1900 ...). ;;; Compiling (DEFUN GET-LOCAL-TIME-ZONE ...). ;;; Compiling (DEFUN RECODE-UNIVERSAL-TIME ...). ;;; Compiling (DEFUN DECODE-UNIVERSAL-TIME ...). ;;; Function DECODE-UNIVERSAL-TIME proclaimed (1,2) ;;; Compiling (DEFUN ENCODE-UNIVERSAL-TIME ...). ;;; Note: ;;; in file MISLIB.LSP, position 7172 ;;; at (DEFUN ENCODE-UNIVERSAL-TIME ...) ;;; Checking type of (+ YEAR #:G26) to be UNSIGNED-BYTE ;;; Function ENCODE-UNIVERSAL-TIME proclaimed (6,7) ;;; Compiling (DEFUN DAYLIGHT-SAVING-TIME-P ...). ;;; Compiling (DEFUN GET-DECODED-TIME ...). ;;; Function GET-DECODED-TIME proclaimed (0,0) ;;; Compiling (DEFUN ENSURE-DIRECTORIES-EXIST ...). ;;; Function ENSURE-DIRECTORIES-EXIST proclaimed (1,65536) ;;; Compiling (DEFMACRO WITH-HASH-TABLE-ITERATOR ...). ;;; Compiling (DEFUN SHARP-!-READER ...). ;;; Compiling (DEFUN SIMPLE-PROGRAM-ERROR ...). ;;; Function SIMPLE-PROGRAM-ERROR proclaimed (0,65536) ;;; End of Pass 1. ;;; Emitting code for LOGICAL-PATHNAME-TRANSLATIONS. ;;; Emitting code for LOAD-LOGICAL-PATHNAME-TRANSLATIONS. ;;; Emitting code for DO-TIME. ;;; Emitting code for TIME. ;;; Emitting code for LEAP-YEAR-P. ;;; Emitting code for NUMBER-OF-DAYS-FROM-1900. ;;; Emitting code for GET-LOCAL-TIME-ZONE. ;;; Emitting code for RECODE-UNIVERSAL-TIME. ;;; Emitting code for DECODE-UNIVERSAL-TIME. ;;; Emitting code for ENCODE-UNIVERSAL-TIME. ;;; Emitting code for DAYLIGHT-SAVING-TIME-P. ;;; Emitting code for GET-DECODED-TIME. ;;; Emitting code for ENSURE-DIRECTORIES-EXIST. ;;; Emitting code for WITH-HASH-TABLE-ITERATOR. ;;; Emitting code for SHARP-!-READER. ;;; Emitting code for SIMPLE-PROGRAM-ERROR. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/mislib.c -o lsp/mislib.o lsp/mislib.c: In function ‘si_simple_program_error’: lsp/mislib.c:820:10: warning: function declared ‘noreturn’ has a ‘return’ statement return value0; ^~~~~~ lsp/mislib.c:820:10: warning: ‘noreturn’ function does return return value0; ^~~~~~ ;;; Finished compiling SRC:LSP;MISLIB.LSP. ;;; (compile-file "src:lsp;numlib.lsp" :output-file #P"BUILD:LSP;NUMLIB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;NUMLIB.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN ISQRT ...). ;;; Function ISQRT proclaimed (1,1) ;;; Compiling (DEFUN PHASE ...). ;;; Function PHASE proclaimed (1,1) ;;; Compiling (DEFUN SIGNUM ...). ;;; Function SIGNUM proclaimed (1,1) ;;; Compiling (DEFUN CIS ...). ;;; Function CIS proclaimed (1,1) ;;; Compiling (DEFUN ASIN ...). ;;; Note: ;;; in file NUMLIB.LSP, position 5620 ;;; at (DEFUN ASIN ...) ;;; Checking type of (FLOAT X 1.0l0) to be LONG-FLOAT ;;; Function ASIN proclaimed (1,1) ;;; Compiling (DEFUN COMPLEX-ASIN ...). ;;; Compiling (DEFUN ACOS ...). ;;; Note: ;;; in file NUMLIB.LSP, position 6312 ;;; at (DEFUN ACOS ...) ;;; Checking type of (FLOAT X 1.0l0) to be LONG-FLOAT ;;; Function ACOS proclaimed (1,1) ;;; Compiling (DEFUN COMPLEX-ACOS ...). ;;; Compiling (DEFUN ASINH ...). ;;; Function ASINH proclaimed (1,1) ;;; Compiling (DEFUN ACOSH ...). ;;; Note: ;;; in file NUMLIB.LSP, position 8048 ;;; at (DEFUN ACOSH ...) ;;; Checking type of (FLOAT X 1.0d0) to be DOUBLE-FLOAT ;;; Function ACOSH proclaimed (1,1) ;;; Compiling (DEFUN COMPLEX-ACOSH ...). ;;; Compiling (DEFUN ATANH ...). ;;; Note: ;;; in file NUMLIB.LSP, position 8770 ;;; at (DEFUN ATANH ...) ;;; Checking type of (FLOAT X 1.0d0) to be DOUBLE-FLOAT ;;; Function ATANH proclaimed (1,1) ;;; Compiling (DEFUN COMPLEX-ATANH ...). ;;; Compiling (DEFUN FFLOOR ...). ;;; Function FFLOOR proclaimed (1,2) ;;; Compiling (DEFUN FCEILING ...). ;;; Function FCEILING proclaimed (1,2) ;;; Compiling (DEFUN FTRUNCATE ...). ;;; Function FTRUNCATE proclaimed (1,2) ;;; Compiling (DEFUN FROUND ...). ;;; Function FROUND proclaimed (1,2) ;;; Compiling (DEFUN LOGTEST ...). ;;; Function LOGTEST proclaimed (2,2) ;;; Compiling (DEFUN BYTE ...). ;;; Function BYTE proclaimed (2,2) ;;; Compiling (DEFUN BYTE-SIZE ...). ;;; Warning: ;;; in file NUMLIB.LSP, position 10691 ;;; at (DEFUN BYTE-SIZE ...) ;;; ! Unsupported CONS type C::BYTE-SPECIFIER. Replacing it with T. ;;; Function BYTE-SIZE proclaimed (1,1) ;;; Compiling (DEFUN BYTE-POSITION ...). ;;; Function BYTE-POSITION proclaimed (1,1) ;;; Compiling (DEFUN LDB ...). ;;; Function LDB proclaimed (2,2) ;;; Compiling (DEFUN LDB-TEST ...). ;;; Function LDB-TEST proclaimed (2,2) ;;; Compiling (DEFUN MASK-FIELD ...). ;;; Function MASK-FIELD proclaimed (2,2) ;;; Compiling (DEFUN DPB ...). ;;; Function DPB proclaimed (3,3) ;;; Compiling (DEFUN DEPOSIT-FIELD ...). ;;; Function DEPOSIT-FIELD proclaimed (3,3) ;;; End of Pass 1. ;;; Emitting code for ISQRT. ;;; Emitting code for PHASE. ;;; Emitting code for SIGNUM. ;;; Emitting code for CIS. ;;; Emitting code for ASIN. ;;; Emitting code for COMPLEX-ASIN. ;;; Emitting code for ACOS. ;;; Emitting code for COMPLEX-ACOS. ;;; Emitting code for ASINH. ;;; Emitting code for ACOSH. ;;; Emitting code for COMPLEX-ACOSH. ;;; Emitting code for ATANH. ;;; Emitting code for COMPLEX-ATANH. ;;; Emitting code for FFLOOR. ;;; Emitting code for FCEILING. ;;; Emitting code for FTRUNCATE. ;;; Emitting code for FROUND. ;;; Emitting code for LOGTEST. ;;; Emitting code for BYTE. ;;; Emitting code for BYTE-SIZE. ;;; Emitting code for BYTE-POSITION. ;;; Emitting code for LDB. ;;; Emitting code for LDB-TEST. ;;; Emitting code for MASK-FIELD. ;;; Emitting code for DPB. ;;; Emitting code for DEPOSIT-FIELD. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/numlib.c -o lsp/numlib.o ;;; Finished compiling SRC:LSP;NUMLIB.LSP. ;;; (compile-file "src:lsp;packlib.lsp" :output-file #P"BUILD:LSP;PACKLIB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;PACKLIB.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN FIND-ALL-SYMBOLS ...). ;;; Note: ;;; in file PACKLIB.LSP, position 711 ;;; at (DEFUN FIND-ALL-SYMBOLS ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST2) to be LIST ;;; Note: ;;; in file PACKLIB.LSP, position 711 ;;; at (DEFUN FIND-ALL-SYMBOLS ...) ;;; Checking type of #:G8 to be CONS ;;; Function FIND-ALL-SYMBOLS proclaimed (1,1) ;;; Compiling (DEFUN PACKAGES-ITERATOR ...). ;;; Function PACKAGES-ITERATOR proclaimed (0,65536) ;;; Compiling (DEFMACRO WITH-PACKAGE-ITERATOR ...). ;;; Compiling (DEFUN EXPAND-DO-SYMBOLS ...). ;;; Compiling (DEFMACRO DO-SYMBOLS ...). ;;; Compiling (DEFMACRO DO-EXTERNAL-SYMBOLS ...). ;;; Compiling (DEFMACRO DO-ALL-SYMBOLS ...). ;;; Compiling (DEFUN PRINT-SYMBOL-APROPOS ...). ;;; Compiling (DEFUN APROPOS ...). ;;; Note: ;;; in file PACKLIB.LSP, position 6433 ;;; at (DEFUN APROPOS ...) ;;; Checking type of #:LET83 to be LIST ;;; Note: ;;; in file PACKLIB.LSP, position 6433 ;;; at (DEFUN APROPOS ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST81) to be LIST ;;; Function APROPOS proclaimed (1,2) ;;; Compiling (DEFUN APROPOS-LIST ...). ;;; Function APROPOS-LIST proclaimed (1,2) ;;; Compiling (DEFUN APROPOS-LIST-INNER ...). ;;; Compiling (DEFUN FIND-RELATIVE-PACKAGE ...). ;;; Note: ;;; in file PACKLIB.LSP, position 7974 ;;; at (DEFUN FIND-RELATIVE-PACKAGE ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; Note: ;;; in file PACKLIB.LSP, position 7974 ;;; at (DEFUN FIND-RELATIVE-PACKAGE ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; Function FIND-RELATIVE-PACKAGE proclaimed (0,65536) ;;; Compiling (DEFUN PACKAGE-PARENT ...). ;;; Note: ;;; in file PACKLIB.LSP, position 9171 ;;; at (DEFUN PACKAGE-PARENT ...) ;;; Checking type of (1- (LENGTH NAME)) to be FIXNUM ;;; Note: ;;; in file PACKLIB.LSP, position 9171 ;;; at (DEFUN PACKAGE-PARENT ...) ;;; Checking type of (1- I) to be FIXNUM ;;; Function PACKAGE-PARENT proclaimed (0,65536) ;;; Compiling (DEFUN PACKAGE-CHILDREN ...). ;;; Note: ;;; in file PACKLIB.LSP, position 10421 ;;; at (DEFUN PACKAGE-CHILDREN ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; Function PACKAGE-CHILDREN proclaimed (0,65536) ;;; End of Pass 1. ;;; Emitting code for FIND-ALL-SYMBOLS. ;;; Emitting code for #:G5. ;;; Emitting code for PACKAGES-ITERATOR. ;;; Emitting code for #:G19. ;;; Emitting code for ITERATE. ;;; Emitting code for WITH-PACKAGE-ITERATOR. ;;; Emitting code for EXPAND-DO-SYMBOLS. ;;; Emitting code for DO-SYMBOLS. ;;; Emitting code for DO-EXTERNAL-SYMBOLS. ;;; Emitting code for DO-ALL-SYMBOLS. ;;; Emitting code for PRINT-SYMBOL-APROPOS. ;;; Emitting code for APROPOS. ;;; Emitting code for APROPOS-LIST. ;;; Emitting code for #:G84. ;;; Emitting code for APROPOS-LIST-INNER. ;;; Emitting code for FIND-RELATIVE-PACKAGE. ;;; Emitting code for FIND-NON-DOT. ;;; Emitting code for RELATIVE-TO. ;;; Emitting code for PACKAGE-PARENT. ;;; Emitting code for FIND-LAST-DOT. ;;; Emitting code for PACKAGE-CHILDREN. ;;; Emitting code for STRING-PREFIX-P. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/packlib.c -o lsp/packlib.o ;;; Finished compiling SRC:LSP;PACKLIB.LSP. ;;; (compile-file "src:lsp;seqlib.lsp" :output-file #P"BUILD:LSP;SEQLIB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;SEQLIB.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN SEQTYPE ...). ;;; Compiling (DEFUN SEQUENCE-COUNT ...). ;;; Function SEQUENCE-COUNT proclaimed (1,1) ;;; Compiling (DEFUN TEST-ERROR ...). ;;; Compiling (DEFUN UNSAFE-FUNCALL1 ...). ;;; Compiling (DEFUN REDUCE ...). ;;; Function REDUCE proclaimed (2,65536) ;;; Compiling (DEFUN FILL ...). ;;; Function FILL proclaimed (2,65536) ;;; Compiling (DEFUN REPLACE ...). ;;; Function REPLACE proclaimed (2,65536) ;;; Compiling (DEFUN FILTER-VECTOR ...). ;;; Compiling (DEFUN REMOVE-LIST ...). ;;; Compiling (DEFUN REMOVE ...). ;;; Note: ;;; in file SEQLIB.LSP, position 9786 ;;; at (DEFUN REMOVE ...) ;;; In function REMOVE, checking types of arguments SEQUENCE. ;;; Note: ;;; in file SEQLIB.LSP, position 9786 ;;; at (DEFUN REMOVE ...) ;;; Checking type of SEQUENCE to be SEQUENCE ;;; Function REMOVE proclaimed (2,65536) ;;; Compiling (DEFUN REMOVE-IF ...). ;;; Function REMOVE-IF proclaimed (2,65536) ;;; Compiling (DEFUN REMOVE-IF-NOT ...). ;;; Function REMOVE-IF-NOT proclaimed (2,65536) ;;; Compiling (DEFUN DELETE-LIST ...). ;;; Compiling (DEFUN DELETE ...). ;;; Function DELETE proclaimed (2,65536) ;;; Compiling (DEFUN DELETE-IF ...). ;;; Function DELETE-IF proclaimed (2,65536) ;;; Compiling (DEFUN DELETE-IF-NOT ...). ;;; Function DELETE-IF-NOT proclaimed (2,65536) ;;; Compiling (DEFUN COUNT ...). ;;; Function COUNT proclaimed (2,65536) ;;; Compiling (DEFUN COUNT-IF ...). ;;; Function COUNT-IF proclaimed (2,65536) ;;; Compiling (DEFUN COUNT-IF-NOT ...). ;;; Function COUNT-IF-NOT proclaimed (2,65536) ;;; Compiling (DEFUN SUBSTITUTE ...). ;;; Function SUBSTITUTE proclaimed (3,65536) ;;; Compiling (DEFUN SUBSTITUTE-IF ...). ;;; Function SUBSTITUTE-IF proclaimed (3,65536) ;;; Compiling (DEFUN SUBSTITUTE-IF-NOT ...). ;;; Function SUBSTITUTE-IF-NOT proclaimed (3,65536) ;;; Compiling (DEFUN NSUBSTITUTE ...). ;;; Function NSUBSTITUTE proclaimed (3,65536) ;;; Compiling (DEFUN NSUBSTITUTE-IF ...). ;;; Function NSUBSTITUTE-IF proclaimed (3,65536) ;;; Compiling (DEFUN NSUBSTITUTE-IF-NOT ...). ;;; Function NSUBSTITUTE-IF-NOT proclaimed (3,65536) ;;; Compiling (DEFUN FIND ...). ;;; Function FIND proclaimed (2,65536) ;;; Compiling (DEFUN FIND-IF ...). ;;; Function FIND-IF proclaimed (2,65536) ;;; Compiling (DEFUN FIND-IF-NOT ...). ;;; Function FIND-IF-NOT proclaimed (2,65536) ;;; Compiling (DEFUN POSITION ...). ;;; Function POSITION proclaimed (2,65536) ;;; Compiling (DEFUN POSITION-IF ...). ;;; Function POSITION-IF proclaimed (2,65536) ;;; Compiling (DEFUN POSITION-IF-NOT ...). ;;; Function POSITION-IF-NOT proclaimed (2,65536) ;;; Compiling (DEFUN REMOVE-DUPLICATES-LIST ...). ;;; Compiling (DEFUN REMOVE-DUPLICATES ...). ;;; Function REMOVE-DUPLICATES proclaimed (1,65536) ;;; Compiling (DEFUN DELETE-DUPLICATES-LIST ...). ;;; Compiling (DEFUN FILTER-DUPLICATES-VECTOR ...). ;;; Compiling (DEFUN DELETE-DUPLICATES ...). ;;; Function DELETE-DUPLICATES proclaimed (1,65536) ;;; Compiling (DEFUN MISMATCH ...). ;;; Note: ;;; in file SEQLIB.LSP, position 27289 ;;; at (DEFUN MISMATCH ...) ;;; Checking type of (1+ I1) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 27289 ;;; at (DEFUN MISMATCH ...) ;;; Checking type of (1+ I2) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 27289 ;;; at (DEFUN MISMATCH ...) ;;; Checking type of #:LET360 to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 27289 ;;; at (DEFUN MISMATCH ...) ;;; Checking type of #:LET361 to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 27289 ;;; at (DEFUN MISMATCH ...) ;;; Checking type of (1- I1) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 27289 ;;; at (DEFUN MISMATCH ...) ;;; Checking type of (1- I2) to be FIXNUM ;;; Function MISMATCH proclaimed (2,65536) ;;; Compiling (DEFUN SEARCH ...). ;;; Function SEARCH proclaimed (2,65536) ;;; Compiling (DEFUN SEARCH-VECTOR ...). ;;; Compiling (DEFUN SEARCH-GENERIC ...). ;;; Note: ;;; in file SEQLIB.LSP, position 31294 ;;; at (DEFUN SEARCH-GENERIC ...) ;;; Checking type of (- END1 START1) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 31294 ;;; at (DEFUN SEARCH-GENERIC ...) ;;; Checking type of (- END2 L) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 31294 ;;; at (DEFUN SEARCH-GENERIC ...) ;;; Checking type of (LET* ((L (- END1 START1)) (E (- END2 L))) (DECLARE (FIXNUM L E)) (UNLESS (PLUSP L) (RETURN-FROM SEARCH-GENERIC (IF FROM-END END2 0))) (1+ E)) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 31294 ;;; at (DEFUN SEARCH-GENERIC ...) ;;; Checking type of (- END1 START1) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 31294 ;;; at (DEFUN SEARCH-GENERIC ...) ;;; Checking type of (- END2 L) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 31294 ;;; at (DEFUN SEARCH-GENERIC ...) ;;; Checking type of (1+ I1) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 31294 ;;; at (DEFUN SEARCH-GENERIC ...) ;;; Checking type of (1+ I2) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 31294 ;;; at (DEFUN SEARCH-GENERIC ...) ;;; Checking type of (1+ START2) to be FIXNUM ;;; Compiling (DEFUN SORT ...). ;;; Function SORT proclaimed (2,65536) ;;; Compiling (DEFUN LIST-MERGE-SORT ...). ;;; Compiling (DEFUN QUICK-SORT ...). ;;; Compiling (DEFUN STABLE-SORT ...). ;;; Function STABLE-SORT proclaimed (2,65536) ;;; Compiling (DEFUN MERGE ...). ;;; Note: ;;; in file SEQLIB.LSP, position 38018 ;;; at (DEFUN MERGE ...) ;;; Checking type of (1+ I2) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 38018 ;;; at (DEFUN MERGE ...) ;;; Checking type of (1+ I1) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 38018 ;;; at (DEFUN MERGE ...) ;;; Checking type of (1+ I1) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 38018 ;;; at (DEFUN MERGE ...) ;;; Checking type of (1+ I2) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 38018 ;;; at (DEFUN MERGE ...) ;;; Checking type of (1+ I1) to be FIXNUM ;;; Note: ;;; in file SEQLIB.LSP, position 38018 ;;; at (DEFUN MERGE ...) ;;; Checking type of (1+ J) to be FIXNUM ;;; Function MERGE proclaimed (4,65536) ;;; Compiling (DEFUN COMPLEMENT ...). ;;; Function COMPLEMENT proclaimed (1,1) ;;; End of Pass 1. ;;; Emitting code for SEQTYPE. ;;; Emitting code for SEQUENCE-COUNT. ;;; Emitting code for TEST-ERROR. ;;; Emitting code for UNSAFE-FUNCALL1. ;;; Emitting code for REDUCE. ;;; Emitting code for FILL. ;;; Emitting code for REPLACE. ;;; Emitting code for FILTER-VECTOR. ;;; Emitting code for REMOVE-LIST. ;;; Emitting code for REMOVE. ;;; Emitting code for REMOVE-IF. ;;; Emitting code for REMOVE-IF-NOT. ;;; Emitting code for DELETE-LIST. ;;; Emitting code for DELETE. ;;; Emitting code for DELETE-IF. ;;; Emitting code for DELETE-IF-NOT. ;;; Emitting code for COUNT. ;;; Emitting code for COUNT-IF. ;;; Emitting code for COUNT-IF-NOT. ;;; Emitting code for SUBSTITUTE. ;;; Emitting code for SUBSTITUTE-IF. ;;; Emitting code for SUBSTITUTE-IF-NOT. ;;; Emitting code for NSUBSTITUTE. ;;; Emitting code for NSUBSTITUTE-IF. ;;; Emitting code for NSUBSTITUTE-IF-NOT. ;;; Emitting code for FIND. ;;; Emitting code for FIND-IF. ;;; Emitting code for FIND-IF-NOT. ;;; Emitting code for POSITION. ;;; Emitting code for POSITION-IF. ;;; Emitting code for POSITION-IF-NOT. ;;; Emitting code for REMOVE-DUPLICATES-LIST. ;;; Emitting code for ALREADY-IN-LIST-P. ;;; Emitting code for REMOVE-DUPLICATES. ;;; Emitting code for DELETE-DUPLICATES-LIST. ;;; Emitting code for ALREADY-IN-LIST-P. ;;; Emitting code for FILTER-DUPLICATES-VECTOR. ;;; Emitting code for ALREADY-IN-VECTOR-P. ;;; Emitting code for DELETE-DUPLICATES. ;;; Emitting code for MISMATCH. ;;; Emitting code for SEARCH. ;;; Emitting code for SEARCH-VECTOR. ;;; Emitting code for SEARCH-GENERIC. ;;; Emitting code for SORT. ;;; Emitting code for LIST-MERGE-SORT. ;;; Emitting code for QUICK-SORT. ;;; Emitting code for STABLE-SORT. ;;; Emitting code for MERGE. ;;; Emitting code for COMPLEMENT. ;;; Emitting code for #:G464. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/seqlib.c -o lsp/seqlib.o ;;; Finished compiling SRC:LSP;SEQLIB.LSP. ;;; (compile-file "src:lsp;trace.lsp" :output-file #P"BUILD:LSP;TRACE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;TRACE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *TRACE-LEVEL* ...). ;;; Compiling (DEFPARAMETER *TRACE-MAX-INDENT* ...). ;;; Compiling (DEFMACRO TRACE ...). ;;; Compiling (DEFUN TRACE* ...). ;;; Note: ;;; in file TRACE.LSP, position 2269 ;;; at (DEFUN TRACE* ...) ;;; Checking type of #:LET12 to be LIST ;;; Note: ;;; in file TRACE.LSP, position 2269 ;;; at (DEFUN TRACE* ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST8) to be LIST ;;; Note: ;;; in file TRACE.LSP, position 2269 ;;; at (DEFUN TRACE* ...) ;;; Checking type of #:LOOP-LIST-TAIL10 to be CONS ;;; Note: ;;; in file TRACE.LSP, position 2269 ;;; at (DEFUN TRACE* ...) ;;; Checking type of #:LET18 to be LIST ;;; Note: ;;; in file TRACE.LSP, position 2269 ;;; at (DEFUN TRACE* ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST16) to be LIST ;;; Compiling (DEFMACRO UNTRACE ...). ;;; Compiling (DEFUN UNTRACE* ...). ;;; Note: ;;; in file TRACE.LSP, position 2547 ;;; at (DEFUN UNTRACE* ...) ;;; Checking type of #:LET30 to be LIST ;;; Note: ;;; in file TRACE.LSP, position 2547 ;;; at (DEFUN UNTRACE* ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST28) to be LIST ;;; Compiling (DEFPARAMETER *INSIDE-TRACE* ...). ;;; Compiling (DEFUN TRACE-ONE ...). ;;; Compiling (DEFUN TRACE-PRINT ...). ;;; Compiling (DEFUN TRACE-RECORD ...). ;;; Compiling (DEFUN TRACE-RECORD-NAME ...). ;;; Compiling (DEFUN TRACE-RECORD-DEFINITION ...). ;;; Compiling (DEFUN TRACE-RECORD-OLD-DEFINITION ...). ;;; Compiling (DEFUN TRACED-OLD-DEFINITION ...). ;;; Function TRACED-OLD-DEFINITION proclaimed (1,1) ;;; Compiling (DEFUN DELETE-FROM-TRACE-LIST ...). ;;; Compiling (DEFUN ADD-TO-TRACE-LIST ...). ;;; Compiling (DEFUN TRACED-AND-REDEFINED-P ...). ;;; Compiling (DEFUN UNTRACE-ONE ...). ;;; Compiling (DEFPARAMETER *STEP-LEVEL* ...). ;;; Compiling (DEFPARAMETER *STEP-ACTION* ...). ;;; Compiling (DEFPARAMETER *STEP-FORM* ...). ;;; Compiling (DEFPARAMETER *STEP-TAG* ...). ;;; Compiling (DEFPARAMETER *STEP-FUNCTIONS* ...). ;;; Compiling (DEFMACRO STEP ...). ;;; Compiling (DEFUN STEP* ...). ;;; Compiling (DEFUN STEPPABLE-FUNCTION ...). ;;; Compiling (DEFUN STEPPER ...). ;;; Compiling (DEFUN STEP-NEXT ...). ;;; Compiling (DEFUN STEP-SKIP ...). ;;; Style warning: ;;; in file TRACE.LSP, position 13105 ;;; at (DEFUN STEP-SKIP ...) ;;; ! The variable WHEN is not used. ;;; Compiling (DEFUN STEP-PRINT ...). ;;; Compiling (DEFUN STEP-QUIT ...). ;;; End of Pass 1. ;;; Emitting code for TRACE. ;;; Emitting code for TRACE*. ;;; Emitting code for UNTRACE. ;;; Emitting code for UNTRACE*. ;;; Emitting code for TRACE-ONE. ;;; Emitting code for TRACE-PRINT. ;;; Emitting code for TRACE-RECORD. ;;; Emitting code for TRACE-RECORD-NAME. ;;; Emitting code for TRACE-RECORD-DEFINITION. ;;; Emitting code for TRACE-RECORD-OLD-DEFINITION. ;;; Emitting code for TRACED-OLD-DEFINITION. ;;; Emitting code for DELETE-FROM-TRACE-LIST. ;;; Emitting code for ADD-TO-TRACE-LIST. ;;; Emitting code for TRACED-AND-REDEFINED-P. ;;; Emitting code for UNTRACE-ONE. ;;; Emitting code for STEP. ;;; Emitting code for STEP*. ;;; Emitting code for STEPPABLE-FUNCTION. ;;; Emitting code for STEPPER. ;;; Emitting code for #:G76. ;;; Emitting code for STEP-NEXT. ;;; Emitting code for STEP-SKIP. ;;; Emitting code for STEP-PRINT. ;;; Emitting code for STEP-QUIT. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/trace.c -o lsp/trace.o ;;; Finished compiling SRC:LSP;TRACE.LSP. ;;; (compile-file "src:lsp;loop2.lsp" :output-file #P"BUILD:LSP;LOOP2.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;LOOP2.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO LOOP-UNSAFE ...). ;;; Compiling (DEFMACRO WITH-LOOP-LIST-COLLECTION-HEAD ...). ;;; Compiling (DEFMACRO LOOP-COLLECT-RPLACD ...). ;;; Note: ;;; in file LOOP2.LSP, position 3820 ;;; at (FSET 'LOOP-COLLECT-RPLACD ...) ;;; Checking type of (- N 4) to be FIXNUM ;;; Compiling (DEFMACRO LOOP-COLLECT-ANSWER ...). ;;; Compiling (DEFSTRUCT (LOOP-MINIMAX # ...) ...). ;;; Compiling (DEFPARAMETER *LOOP-MINIMAX-TYPE-INFINITIES-ALIST* ...). ;;; Compiling (DEFUN MAKE-LOOP-MINIMAX ...). ;;; Compiling (DEFUN LOOP-NOTE-MINIMAX-OPERATION ...). ;;; Compiling (DEFMACRO WITH-MINIMAX-VALUE ...). ;;; Compiling (DEFMACRO LOOP-ACCUMULATE-MINIMAX-VALUE ...). ;;; Compiling (DEFUN LOOP-TEQUAL ...). ;;; Compiling (DEFUN LOOP-TASSOC ...). ;;; Compiling (DEFUN LOOP-TMEMBER ...). ;;; Compiling (DEFUN LOOP-LOOKUP-KEYWORD ...). ;;; Compiling (DEFMACRO LOOP-STORE-TABLE-DATA ...). ;;; Compiling (DEFSTRUCT (LOOP-UNIVERSE #) ...). ;;; Compiling (DEFVAR *LOOP-UNIVERSE*). ;;; Compiling (DEFUN MAKE-STANDARD-LOOP-UNIVERSE ...). ;;; Compiling (DEFPARAMETER *LOOP-DESTRUCTURING-HOOKS* ...). ;;; Compiling (DEFUN LOOP-MAKE-PSETQ ...). ;;; Compiling (DEFUN LOOP-MAKE-DESETQ ...). ;;; Compiling (DEFPARAMETER *LOOP-DESETQ-TEMPORARY* ...). ;;; Compiling (DEFMACRO LOOP-REALLY-DESETQ ...). ;;; Note: ;;; in file LOOP2.LSP, position 14996 ;;; at (FSET 'LOOP-REALLY-DESETQ ...) ;;; Checking type of #:LET172 to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 14996 ;;; at (FSET 'LOOP-REALLY-DESETQ ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST167) to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 14996 ;;; at (FSET 'LOOP-REALLY-DESETQ ...) ;;; Checking type of #:G173 to be CONS ;;; Compiling (DEFVAR *LOOP-SOURCE-CODE*). ;;; Compiling (DEFVAR *LOOP-ORIGINAL-SOURCE-CODE*). ;;; Compiling (DEFVAR *LOOP-SOURCE-CONTEXT*). ;;; Compiling (DEFVAR *LOOP-NAMES*). ;;; Compiling (DEFVAR *LOOP-MACRO-ENVIRONMENT*). ;;; Compiling (DEFVAR *LOOP-NAMED-VARIABLES*). ;;; Compiling (DEFVAR *LOOP-VARIABLES*). ;;; Compiling (DEFVAR *LOOP-DECLARATIONS*). ;;; Compiling (DEFVAR *LOOP-DESETQ-CROCKS*). ;;; Compiling (DEFVAR *LOOP-WRAPPERS*). ;;; Compiling (DEFVAR *LOOP-BIND-STACK*). ;;; Compiling (DEFVAR *LOOP-NODECLARE*). ;;; Compiling (DEFVAR *LOOP-ITERATION-VARIABLES*). ;;; Compiling (DEFVAR *LOOP-PROLOGUE*). ;;; Compiling (DEFVAR *LOOP-BEFORE-LOOP*). ;;; Compiling (DEFVAR *LOOP-BODY*). ;;; Compiling (DEFVAR *LOOP-AFTER-BODY*). ;;; Compiling (DEFVAR *LOOP-EMITTED-BODY*). ;;; Compiling (DEFVAR *LOOP-EPILOGUE*). ;;; Compiling (DEFVAR *LOOP-AFTER-EPILOGUE*). ;;; Compiling (DEFVAR *LOOP-FINAL-VALUE-CULPRIT*). ;;; Compiling (DEFVAR *LOOP-INSIDE-CONDITIONAL*). ;;; Compiling (DEFVAR *LOOP-WHEN-IT-VARIABLE*). ;;; Compiling (DEFVAR *LOOP-NEVER-STEPPED-VARIABLE*). ;;; Compiling (DEFVAR *LOOP-COLLECTION-CRUFT*). ;;; Compiling (DEFUN LOOP-CONSTANT-FOLD-IF-POSSIBLE ...). ;;; Compiling (DEFPARAMETER *LOOP-DUPLICATE-CODE* ...). ;;; Compiling (DEFPARAMETER *LOOP-ITERATION-FLAG-VARIABLE* ...). ;;; Compiling (DEFMACRO LOOP-BODY ...). ;;; Compiling (DEFUN LOOP-CONTEXT ...). ;;; Compiling (DEFUN LOOP-ERROR ...). ;;; Compiling (DEFUN LOOP-WARN ...). ;;; Compiling (DEFUN LOOP-CHECK-DATA-TYPE ...). ;;; Compiling (DEFMACRO LOOP-FINISH ...). ;;; Compiling (DEFUN SUBST-GENSYMS-FOR-NIL ...). ;;; Compiling (DEFUN LOOP-BUILD-DESTRUCTURING-BINDINGS ...). ;;; Compiling (DEFUN LOOP-TRANSLATE ...). ;;; Compiling (DEFUN LOOP-ITERATION-DRIVER ...). ;;; Compiling (DEFUN LOOP-POP-SOURCE ...). ;;; Compiling (DEFUN LOOP-GET-COMPOUND-FORM ...). ;;; Compiling (DEFUN LOOP-GET-PROGN ...). ;;; Compiling (DEFUN LOOP-GET-FORM ...). ;;; Compiling (DEFUN LOOP-CONSTRUCT-RETURN ...). ;;; Compiling (DEFUN LOOP-PSEUDO-BODY ...). ;;; Compiling (DEFUN LOOP-EMIT-BODY ...). ;;; Compiling (DEFUN LOOP-EMIT-FINAL-VALUE ...). ;;; Compiling (DEFUN LOOP-DISALLOW-CONDITIONAL ...). ;;; Compiling (DEFUN LOOP-DISALLOW-ANONYMOUS-COLLECTORS ...). ;;; Compiling (DEFUN LOOP-DISALLOW-AGGREGATE-BOOLEANS ...). ;;; Compiling (DEFUN LOOP-TYPED-INIT ...). ;;; Compiling (DEFUN LOOP-OPTIONAL-TYPE ...). ;;; Compiling (DEFUN LOOP-BIND-BLOCK ...). ;;; Compiling (DEFUN LOOP-VARIABLE-P ...). ;;; Compiling (DEFUN LOOP-MAKE-VARIABLE ...). ;;; Compiling (DEFUN LOOP-MAKE-ITERATION-VARIABLE ...). ;;; Compiling (DEFUN LOOP-DECLARE-VARIABLE ...). ;;; Note: ;;; in file LOOP2.LSP, position 38686 ;;; at (DEFUN LOOP-DECLARE-VARIABLE ...) ;;; Checking type of (CDR #:G310) to be CONS ;;; Compiling (DEFUN LOOP-MAYBE-BIND-FORM ...). ;;; Compiling (DEFUN LOOP-DO-IF ...). ;;; Compiling (DEFUN LOOP-DO-INITIALLY ...). ;;; Compiling (DEFUN LOOP-DO-FINALLY ...). ;;; Compiling (DEFUN LOOP-DO-DO ...). ;;; Compiling (DEFUN LOOP-DO-NAMED ...). ;;; Compiling (DEFUN LOOP-DO-RETURN ...). ;;; Compiling (DEFSTRUCT (LOOP-COLLECTOR #) ...). ;;; Compiling (DEFUN LOOP-GET-COLLECTION-INFO ...). ;;; Compiling (DEFUN LOOP-LIST-COLLECTION ...). ;;; Compiling (DEFUN LOOP-SUM-COLLECTION ...). ;;; Compiling (DEFUN LOOP-MAXMIN-COLLECTION ...). ;;; Compiling (DEFUN LOOP-DO-ALWAYS ...). ;;; Compiling (DEFUN LOOP-DO-THEREIS ...). ;;; Compiling (DEFUN LOOP-DO-WHILE ...). ;;; Compiling (DEFUN LOOP-DO-WITH ...). ;;; Compiling (DEFUN LOOP-HACK-ITERATION ...). ;;; Compiling (DEFUN LOOP-DO-FOR ...). ;;; Compiling (DEFUN LOOP-DO-REPEAT ...). ;;; Compiling (DEFUN LOOP-WHEN-IT-VARIABLE ...). ;;; Compiling (DEFUN LOOP-ANSI-FOR-EQUALS ...). ;;; Compiling (DEFUN LOOP-FOR-ACROSS ...). ;;; Compiling (DEFUN LOOP-LIST-STEP ...). ;;; Compiling (DEFUN LOOP-FOR-ON ...). ;;; Compiling (DEFUN LOOP-FOR-IN ...). ;;; Compiling (DEFSTRUCT (LOOP-PATH #) ...). ;;; Compiling (DEFUN ADD-LOOP-PATH ...). ;;; Note: ;;; in file LOOP2.LSP, position 60383 ;;; at (DEFUN ADD-LOOP-PATH ...) ;;; Checking type of #:LET388 to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 60383 ;;; at (DEFUN ADD-LOOP-PATH ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST384) to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 60383 ;;; at (DEFUN ADD-LOOP-PATH ...) ;;; Checking type of #:LOOP-LIST-TAIL386 to be CONS ;;; Note: ;;; in file LOOP2.LSP, position 60383 ;;; at (DEFUN ADD-LOOP-PATH ...) ;;; Checking type of #:LET396 to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 60383 ;;; at (DEFUN ADD-LOOP-PATH ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST391) to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 60383 ;;; at (DEFUN ADD-LOOP-PATH ...) ;;; Checking type of #:LOOP-LIST-TAIL393 to be CONS ;;; Compiling (DEFUN LOOP-FOR-BEING ...). ;;; Compiling (DEFUN LOOP-NAMED-VAR ...). ;;; Note: ;;; in file LOOP2.LSP, position 63799 ;;; at (DEFUN LOOP-NAMED-VAR ...) ;;; Checking type of (LOOP-TASSOC NAME *LOOP-NAMED-VARIABLES*) to be LIST ;;; Compiling (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...). ;;; Note: ;;; in file LOOP2.LSP, position 64097 ;;; at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...) ;;; Checking type of #:LET437 to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 64097 ;;; at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST424) to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 64097 ;;; at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...) ;;; Checking type of #:G438 to be CONS ;;; Note: ;;; in file LOOP2.LSP, position 64097 ;;; at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...) ;;; Checking type of #:LET446 to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 64097 ;;; at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST442) to be LIST ;;; Note: ;;; in file LOOP2.LSP, position 64097 ;;; at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...) ;;; Checking type of #:LOOP-LIST-TAIL444 to be CONS ;;; Note: ;;; in file LOOP2.LSP, position 64097 ;;; at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...) ;;; Checking type of (IN-GROUP-P TOKEN GROUP) to be SYMBOL ;;; Compiling (DEFUN LOOP-SEQUENCER ...). ;;; Compiling (DEFUN LOOP-FOR-ARITHMETIC ...). ;;; Compiling (DEFUN LOOP-HASH-TABLE-ITERATION-PATH ...). ;;; Compiling (DEFUN LOOP-PACKAGE-SYMBOLS-ITERATION-PATH ...). ;;; Compiling (DEFUN MAKE-ANSI-LOOP-UNIVERSE ...). ;;; Compiling (DEFPARAMETER *LOOP-ANSI-UNIVERSE* ...). ;;; Compiling (DEFUN LOOP-STANDARD-EXPANSION ...). ;;; Compiling (DEFMACRO LOOP ...). ;;; End of Pass 1. ;;; Emitting code for LOOP-UNSAFE. ;;; Emitting code for WITH-LOOP-LIST-COLLECTION-HEAD. ;;; Emitting code for LOOP-COLLECT-RPLACD. ;;; Emitting code for CDR-WRAP. ;;; Emitting code for LOOP-COLLECT-ANSWER. ;;; Emitting code for MAKE-LOOP-MINIMAX-INTERNAL. ;;; Emitting code for MAKE-LOOP-MINIMAX. ;;; Emitting code for LOOP-NOTE-MINIMAX-OPERATION. ;;; Emitting code for WITH-MINIMAX-VALUE. ;;; Emitting code for LOOP-ACCUMULATE-MINIMAX-VALUE. ;;; Emitting code for LOOP-TEQUAL. ;;; Emitting code for LOOP-TASSOC. ;;; Emitting code for LOOP-TMEMBER. ;;; Emitting code for LOOP-LOOKUP-KEYWORD. ;;; Emitting code for LOOP-STORE-TABLE-DATA. ;;; Emitting code for MAKE-LOOP-UNIVERSE. ;;; Emitting code for MAKE-STANDARD-LOOP-UNIVERSE. ;;; Emitting code for MAKETABLE. ;;; Emitting code for LOOP-MAKE-PSETQ. ;;; Emitting code for LOOP-MAKE-DESETQ. ;;; Emitting code for LOOP-REALLY-DESETQ. ;;; Emitting code for LOOP-DESETQ-INTERNAL. ;;; Emitting code for FIND-NON-NULL. ;;; Emitting code for #:G170. ;;; Emitting code for LOOP-CONSTANT-FOLD-IF-POSSIBLE. ;;; Emitting code for LOOP-BODY. ;;; Emitting code for LOOP-CONTEXT. ;;; Emitting code for LOOP-ERROR. ;;; Emitting code for LOOP-WARN. ;;; Emitting code for LOOP-CHECK-DATA-TYPE. ;;; Emitting code for LOOP-FINISH. ;;; Emitting code for SUBST-GENSYMS-FOR-NIL. ;;; Emitting code for LOOP-BUILD-DESTRUCTURING-BINDINGS. ;;; Emitting code for LOOP-TRANSLATE. ;;; Emitting code for LOOP-ITERATION-DRIVER. ;;; Emitting code for LOOP-POP-SOURCE. ;;; Emitting code for LOOP-GET-COMPOUND-FORM. ;;; Emitting code for LOOP-GET-PROGN. ;;; Emitting code for LOOP-GET-FORM. ;;; Emitting code for LOOP-CONSTRUCT-RETURN. ;;; Emitting code for LOOP-PSEUDO-BODY. ;;; Emitting code for LOOP-EMIT-BODY. ;;; Emitting code for LOOP-EMIT-FINAL-VALUE. ;;; Emitting code for LOOP-DISALLOW-CONDITIONAL. ;;; Emitting code for LOOP-DISALLOW-ANONYMOUS-COLLECTORS. ;;; Emitting code for LOOP-DISALLOW-AGGREGATE-BOOLEANS. ;;; Emitting code for LOOP-TYPED-INIT. ;;; Emitting code for LOOP-OPTIONAL-TYPE. ;;; Emitting code for REPLICATE. ;;; Emitting code for TRANSLATE. ;;; Emitting code for LOOP-BIND-BLOCK. ;;; Emitting code for LOOP-VARIABLE-P. ;;; Emitting code for LOOP-MAKE-VARIABLE. ;;; Emitting code for LOOP-MAKE-ITERATION-VARIABLE. ;;; Emitting code for LOOP-DECLARE-VARIABLE. ;;; Emitting code for LOOP-MAYBE-BIND-FORM. ;;; Emitting code for LOOP-DO-IF. ;;; Emitting code for GET-CLAUSE. ;;; Emitting code for LOOP-DO-INITIALLY. ;;; Emitting code for LOOP-DO-FINALLY. ;;; Emitting code for LOOP-DO-DO. ;;; Emitting code for LOOP-DO-NAMED. ;;; Emitting code for LOOP-DO-RETURN. ;;; Emitting code for MAKE-LOOP-COLLECTOR. ;;; Emitting code for LOOP-GET-COLLECTION-INFO. ;;; Emitting code for LOOP-LIST-COLLECTION. ;;; Emitting code for LOOP-SUM-COLLECTION. ;;; Emitting code for LOOP-MAXMIN-COLLECTION. ;;; Emitting code for LOOP-DO-ALWAYS. ;;; Emitting code for LOOP-DO-THEREIS. ;;; Emitting code for LOOP-DO-WHILE. ;;; Emitting code for LOOP-DO-WITH. ;;; Emitting code for LOOP-HACK-ITERATION. ;;; Emitting code for MAKE-ENDTEST. ;;; Emitting code for LOOP-DO-FOR. ;;; Emitting code for LOOP-DO-REPEAT. ;;; Emitting code for LOOP-WHEN-IT-VARIABLE. ;;; Emitting code for LOOP-ANSI-FOR-EQUALS. ;;; Emitting code for LOOP-FOR-ACROSS. ;;; Emitting code for LOOP-LIST-STEP. ;;; Emitting code for LOOP-FOR-ON. ;;; Emitting code for LOOP-FOR-IN. ;;; Emitting code for MAKE-LOOP-PATH. ;;; Emitting code for ADD-LOOP-PATH. ;;; Emitting code for #:G394. ;;; Emitting code for LOOP-FOR-BEING. ;;; Emitting code for LOOP-NAMED-VAR. ;;; Emitting code for LOOP-COLLECT-PREPOSITIONAL-PHRASES. ;;; Emitting code for IN-GROUP-P. ;;; Emitting code for #:G427. ;;; Emitting code for LOOP-SEQUENCER. ;;; Emitting code for LOOP-FOR-ARITHMETIC. ;;; Emitting code for LOOP-HASH-TABLE-ITERATION-PATH. ;;; Emitting code for LOOP-PACKAGE-SYMBOLS-ITERATION-PATH. ;;; Emitting code for MAKE-ANSI-LOOP-UNIVERSE. ;;; Emitting code for LOOP-STANDARD-EXPANSION. ;;; Emitting code for LOOP. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/loop2.c -o lsp/loop2.o ;;; Finished compiling SRC:LSP;LOOP2.LSP. ;;; (compile-file "src:lsp;format.lsp" :output-file #P"BUILD:LSP;FORMAT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;FORMAT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *DIGITS* ...). ;;; Compiling (DEFUN FLOAT-TO-DIGITS* ...). ;;; Compiling (DEFUN FLONUM-TO-STRING ...). ;;; Compiling (DEFUN SCALE-EXPONENT ...). ;;; Compiling (DEFSTRUCT (FORMAT-DIRECTIVE :NAMED ...) ...). ;;; Compiling (DEFPARAMETER *FORMAT-DIRECTIVE-EXPANDERS* ...). ;;; Compiling (DEFPARAMETER *FORMAT-DIRECTIVE-INTERPRETERS* ...). ;;; Compiling (DEFPARAMETER *DEFAULT-FORMAT-ERROR-CONTROL-STRING* ...). ;;; Compiling (DEFPARAMETER *DEFAULT-FORMAT-ERROR-OFFSET* ...). ;;; Compiling (DEFPARAMETER *OUTPUT-LAYOUT-MODE* ...). ;;; Compiling (DEFUN TOKENIZE-CONTROL-STRING ...). ;;; Compiling (DEFUN PARSE-DIRECTIVE ...). ;;; Compiling (DEFPARAMETER *UP-UP-AND-OUT-ALLOWED* ...). ;;; Compiling (DEFPARAMETER *LOGICAL-BLOCK-POPPER* ...). ;;; Compiling (DEFPARAMETER *EXPANDER-NEXT-ARG-MACRO* ...). ;;; Compiling (DEFVAR *ONLY-SIMPLE-ARGS*). ;;; Compiling (DEFPARAMETER *ORIG-ARGS-AVAILABLE* ...). ;;; Compiling (DEFVAR *SIMPLE-ARGS*). ;;; Compiling (DEFUN FORMATTER-AUX ...). ;;; Compiling (DEFUN INTERPRET-DIRECTIVE-LIST ...). ;;; Compiling (DEFMACRO FORMATTER ...). ;;; Compiling (DEFUN %FORMATTER ...). ;;; Compiling (DEFUN EXPAND-CONTROL-STRING ...). ;;; Compiling (DEFUN EXPAND-DIRECTIVE-LIST ...). ;;; Compiling (DEFUN EXPAND-DIRECTIVE ...). ;;; Compiling (DEFUN EXPAND-NEXT-ARG ...). ;;; Compiling (DEFUN NEED-HAIRY-ARGS ...). ;;; Compiling (DEFMACRO EXPANDER-NEXT-ARG ...). ;;; Compiling (DEFMACRO EXPANDER-PPRINT-NEXT-ARG ...). ;;; Compiling (DEFUN %SET-FORMAT-DIRECTIVE-EXPANDER ...). ;;; Compiling (DEFUN %SET-FORMAT-DIRECTIVE-INTERPRETER ...). ;;; Compiling (DEFUN FIND-DIRECTIVE ...). ;;; Compiling (DEFUN FORMAT-WRITE-FIELD ...). ;;; Compiling (DEFUN FORMAT-PRINC ...). ;;; Function FORMAT-PRINC proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-PRIN1 ...). ;;; Function FORMAT-PRIN1 proclaimed (0,65536) ;;; Compiling (DEFUN CHAR-PRINTING-P ...). ;;; Compiling (DEFUN FORMAT-PRINT-NAMED-CHARACTER ...). ;;; Function FORMAT-PRINT-NAMED-CHARACTER proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-PRINT-INTEGER ...). ;;; Function FORMAT-PRINT-INTEGER proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-ADD-COMMAS ...). ;;; Compiling (DEFUN EXPAND-FORMAT-INTEGER ...). ;;; Compiling (DEFUN FORMAT-PRINT-SMALL-CARDINAL ...). ;;; Compiling (DEFUN FORMAT-PRINT-CARDINAL ...). ;;; Function FORMAT-PRINT-CARDINAL proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-PRINT-CARDINAL-AUX ...). ;;; Compiling (DEFUN FORMAT-PRINT-ORDINAL ...). ;;; Function FORMAT-PRINT-ORDINAL proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-PRINT-OLD-ROMAN ...). ;;; Function FORMAT-PRINT-OLD-ROMAN proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-PRINT-ROMAN ...). ;;; Function FORMAT-PRINT-ROMAN proclaimed (0,65536) ;;; Compiling (DEFUN DECIMAL-STRING ...). ;;; Compiling (DEFUN FORMAT-FIXED ...). ;;; Function FORMAT-FIXED proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-FIXED-AUX ...). ;;; Compiling (DEFUN FORMAT-EXPONENTIAL ...). ;;; Function FORMAT-EXPONENTIAL proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-EXPONENT-MARKER ...). ;;; Compiling (DEFUN FORMAT-EXP-AUX ...). ;;; Compiling (DEFUN FORMAT-GENERAL ...). ;;; Function FORMAT-GENERAL proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-GENERAL-AUX ...). ;;; Compiling (DEFUN FORMAT-DOLLARS ...). ;;; Function FORMAT-DOLLARS proclaimed (0,65536) ;;; Compiling (DEFUN OUTPUT-SPACES ...). ;;; Compiling (DEFUN FORMAT-RELATIVE-TAB ...). ;;; Function FORMAT-RELATIVE-TAB proclaimed (0,65536) ;;; Compiling (DEFUN FORMAT-ABSOLUTE-TAB ...). ;;; Function FORMAT-ABSOLUTE-TAB proclaimed (0,65536) ;;; Compiling (DEFUN NSTRING-CAPITALIZE-FIRST ...). ;;; Compiling (DEFUN PARSE-CONDITIONAL-DIRECTIVE ...). ;;; Compiling (DEFUN EXPAND-MAYBE-CONDITIONAL ...). ;;; Compiling (DEFUN EXPAND-TRUE-FALSE-CONDITIONAL ...). ;;; Compiling (DEFVAR *OUTSIDE-ARGS*). ;;; Compiling (DEFPARAMETER *ILLEGAL-INSIDE-JUSTIFICATION* ...). ;;; Note: ;;; in file FORMAT.LSP, position 107413 ;;; at (DEFPARAMETER *ILLEGAL-INSIDE-JUSTIFICATION* ...) ;;; Checking type of #:LET1830 to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 107413 ;;; at (DEFPARAMETER *ILLEGAL-INSIDE-JUSTIFICATION* ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST1825) to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 107413 ;;; at (DEFPARAMETER *ILLEGAL-INSIDE-JUSTIFICATION* ...) ;;; Checking type of #:LOOP-LIST-TAIL1827 to be CONS ;;; Compiling (DEFUN CHECK-OUTPUT-LAYOUT-MODE ...). ;;; Compiling (DEFUN ILLEGAL-INSIDE-JUSTIFICATION-P ...). ;;; Note: ;;; in file FORMAT.LSP, position 108461 ;;; at (DEF-COMPLEX-FORMAT-DIRECTIVE < ...) ;;; Checking type of #:LET1853 to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 108461 ;;; at (DEF-COMPLEX-FORMAT-DIRECTIVE < ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST1848) to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 108461 ;;; at (DEF-COMPLEX-FORMAT-DIRECTIVE < ...) ;;; Checking type of #:LOOP-LIST-TAIL1850 to be CONS ;;; Note: ;;; in file FORMAT.LSP, position 109684 ;;; at (DEF-COMPLEX-FORMAT-INTERPRETER < ...) ;;; Checking type of #:LET1869 to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 109684 ;;; at (DEF-COMPLEX-FORMAT-INTERPRETER < ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST1864) to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 109684 ;;; at (DEF-COMPLEX-FORMAT-INTERPRETER < ...) ;;; Checking type of #:LOOP-LIST-TAIL1866 to be CONS ;;; Compiling (DEFUN PARSE-FORMAT-JUSTIFICATION ...). ;;; Note: ;;; in file FORMAT.LSP, position 111157 ;;; at (DEFUN PARSE-FORMAT-JUSTIFICATION ...) ;;; Checking type of #:G1880 to be CONS ;;; Compiling (DEFUN EXPAND-FORMAT-JUSTIFICATION ...). ;;; Note: ;;; in file FORMAT.LSP, position 112113 ;;; at (DEFUN EXPAND-FORMAT-JUSTIFICATION ...) ;;; Checking type of #:LET1939 to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 112113 ;;; at (DEFUN EXPAND-FORMAT-JUSTIFICATION ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST1934) to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 112113 ;;; at (DEFUN EXPAND-FORMAT-JUSTIFICATION ...) ;;; Checking type of #:LOOP-LIST-TAIL1936 to be CONS ;;; Compiling (DEFUN INTERPRET-FORMAT-JUSTIFICATION ...). ;;; Compiling (DEFUN FORMAT-JUSTIFICATION ...). ;;; Note: ;;; in file FORMAT.LSP, position 115401 ;;; at (DEFUN FORMAT-JUSTIFICATION ...) ;;; Checking type of #:LET1999 to be LIST ;;; Note: ;;; in file FORMAT.LSP, position 115401 ;;; at (DEFUN FORMAT-JUSTIFICATION ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST1996) to be LIST ;;; Function FORMAT-JUSTIFICATION proclaimed (0,65536) ;;; Compiling (DEFUN PARSE-FORMAT-LOGICAL-BLOCK ...). ;;; Compiling (DEFUN ADD-FILL-STYLE-NEWLINES ...). ;;; Compiling (DEFUN ADD-FILL-STYLE-NEWLINES-AUX ...). ;;; Note: ;;; in file FORMAT.LSP, position 119708 ;;; at (DEFUN ADD-FILL-STYLE-NEWLINES-AUX ...) ;;; Checking type of #:G2032 to be CONS ;;; Note: ;;; in file FORMAT.LSP, position 119708 ;;; at (DEFUN ADD-FILL-STYLE-NEWLINES-AUX ...) ;;; Checking type of #:G2035 to be CONS ;;; Note: ;;; in file FORMAT.LSP, position 119708 ;;; at (DEFUN ADD-FILL-STYLE-NEWLINES-AUX ...) ;;; Checking type of #:G2038 to be CONS ;;; Compiling (DEFUN EXPAND-FORMAT-LOGICAL-BLOCK ...). ;;; Compiling (DEFUN INTERPRET-FORMAT-LOGICAL-BLOCK ...). ;;; Note: ;;; in file FORMAT.LSP, position 122602 ;;; at (DEF-FORMAT-DIRECTIVE / ...) ;;; Checking type of #:G2102 to be CONS ;;; Note: ;;; in file FORMAT.LSP, position 122602 ;;; at (DEF-FORMAT-DIRECTIVE / ...) ;;; Checking type of #:G2106 to be CONS ;;; Note: ;;; in file FORMAT.LSP, position 123378 ;;; at (DEF-FORMAT-INTERPRETER / ...) ;;; Checking type of #:G2131 to be CONS ;;; Note: ;;; in file FORMAT.LSP, position 123378 ;;; at (DEF-FORMAT-INTERPRETER / ...) ;;; Checking type of #:G2134 to be CONS ;;; Note: ;;; in file FORMAT.LSP, position 123378 ;;; at (DEF-FORMAT-INTERPRETER / ...) ;;; Checking type of #:G2137 to be CONS ;;; Compiling (DEFUN EXTRACT-USER-FUNCTION-NAME ...). ;;; End of Pass 1. ;;; Emitting code for FLOAT-TO-DIGITS*. ;;; Emitting code for FLONUM-TO-STRING. ;;; Emitting code for SCALE-EXPONENT. ;;; Emitting code for MAKE-FORMAT-DIRECTIVE. ;;; Emitting code for TOKENIZE-CONTROL-STRING. ;;; Emitting code for PARSE-DIRECTIVE. ;;; Emitting code for GET-CHAR. ;;; Emitting code for FORMATTER-AUX. ;;; Emitting code for INTERPRET-DIRECTIVE-LIST. ;;; Emitting code for FORMATTER. ;;; Emitting code for %FORMATTER. ;;; Emitting code for EXPAND-CONTROL-STRING. ;;; Emitting code for EXPAND-DIRECTIVE-LIST. ;;; Emitting code for EXPAND-DIRECTIVE. ;;; Emitting code for EXPAND-NEXT-ARG. ;;; Emitting code for NEED-HAIRY-ARGS. ;;; Emitting code for EXPANDER-NEXT-ARG. ;;; Emitting code for EXPANDER-PPRINT-NEXT-ARG. ;;; Emitting code for %SET-FORMAT-DIRECTIVE-EXPANDER. ;;; Emitting code for %SET-FORMAT-DIRECTIVE-INTERPRETER. ;;; Emitting code for FIND-DIRECTIVE. ;;; Emitting code for AFTER. ;;; Emitting code for FORMAT-WRITE-FIELD. ;;; Emitting code for FORMAT-PRINC. ;;; Emitting code for #:G285. ;;; Emitting code for #:G320. ;;; Emitting code for FORMAT-PRIN1. ;;; Emitting code for #:G357. ;;; Emitting code for #:G392. ;;; Emitting code for #:G429. ;;; Emitting code for #:G436. ;;; Emitting code for CHAR-PRINTING-P. ;;; Emitting code for FORMAT-PRINT-NAMED-CHARACTER. ;;; Emitting code for #:G449. ;;; Emitting code for #:G456. ;;; Emitting code for FORMAT-PRINT-INTEGER. ;;; Emitting code for FORMAT-ADD-COMMAS. ;;; Emitting code for EXPAND-FORMAT-INTEGER. ;;; Emitting code for #:G511. ;;; Emitting code for #:G517. ;;; Emitting code for #:G552. ;;; Emitting code for #:G558. ;;; Emitting code for #:G593. ;;; Emitting code for #:G599. ;;; Emitting code for #:G634. ;;; Emitting code for #:G640. ;;; Emitting code for #:G675. ;;; Emitting code for #:G717. ;;; Emitting code for FORMAT-PRINT-SMALL-CARDINAL. ;;; Emitting code for FORMAT-PRINT-CARDINAL. ;;; Emitting code for FORMAT-PRINT-CARDINAL-AUX. ;;; Emitting code for FORMAT-PRINT-ORDINAL. ;;; Emitting code for FORMAT-PRINT-OLD-ROMAN. ;;; Emitting code for FORMAT-PRINT-ROMAN. ;;; Emitting code for #:G786. ;;; Emitting code for #:G794. ;;; Emitting code for DECIMAL-STRING. ;;; Emitting code for #:G805. ;;; Emitting code for #:G847. ;;; Emitting code for FORMAT-FIXED. ;;; Emitting code for FORMAT-FIXED-AUX. ;;; Emitting code for #:G904. ;;; Emitting code for #:G960. ;;; Emitting code for FORMAT-EXPONENTIAL. ;;; Emitting code for FORMAT-EXPONENT-MARKER. ;;; Emitting code for FORMAT-EXP-AUX. ;;; Emitting code for #:G1038. ;;; Emitting code for #:G1094. ;;; Emitting code for FORMAT-GENERAL. ;;; Emitting code for FORMAT-GENERAL-AUX. ;;; Emitting code for #:G1150. ;;; Emitting code for #:G1185. ;;; Emitting code for FORMAT-DOLLARS. ;;; Emitting code for #:G1228. ;;; Emitting code for #:G1241. ;;; Emitting code for #:G1259. ;;; Emitting code for #:G1272. ;;; Emitting code for #:G1290. ;;; Emitting code for #:G1303. ;;; Emitting code for #:G1321. ;;; Emitting code for #:G1334. ;;; Emitting code for #:G1351. ;;; Emitting code for #:G1357. ;;; Emitting code for #:G1363. ;;; Emitting code for #:G1369. ;;; Emitting code for #:G1376. ;;; Emitting code for #:G1427. ;;; Emitting code for OUTPUT-SPACES. ;;; Emitting code for FORMAT-RELATIVE-TAB. ;;; Emitting code for FORMAT-ABSOLUTE-TAB. ;;; Emitting code for #:G1475. ;;; Emitting code for #:G1482. ;;; Emitting code for #:G1489. ;;; Emitting code for #:G1502. ;;; Emitting code for #:G1515. ;;; Emitting code for #:G1544. ;;; Emitting code for #:G1586. ;;; Emitting code for #:G1595. ;;; Emitting code for #:G1602. ;;; Emitting code for NSTRING-CAPITALIZE-FIRST. ;;; Emitting code for #:G1611. ;;; Emitting code for #:G1617. ;;; Emitting code for #:G1626. ;;; Emitting code for #:G1629. ;;; Emitting code for PARSE-CONDITIONAL-DIRECTIVE. ;;; Emitting code for #:G1638. ;;; Emitting code for EXPAND-MAYBE-CONDITIONAL. ;;; Emitting code for HAIRY. ;;; Emitting code for EXPAND-TRUE-FALSE-CONDITIONAL. ;;; Emitting code for HAIRY. ;;; Emitting code for #:G1676. ;;; Emitting code for #:G1704. ;;; Emitting code for #:G1707. ;;; Emitting code for #:G1710. ;;; Emitting code for #:G1713. ;;; Emitting code for #:G1716. ;;; Emitting code for #:G1745. ;;; Emitting code for #:G1769. ;;; Emitting code for COMPUTE-BINDINGS. ;;; Emitting code for COMPUTE-BLOCK. ;;; Emitting code for COMPUTE-LOOP. ;;; Emitting code for COMPUTE-INSIDES. ;;; Emitting code for #:G1790. ;;; Emitting code for DO-LOOP. ;;; Emitting code for BIND-ARGS. ;;; Emitting code for DO-GUTS. ;;; Emitting code for #:G1805. ;;; Emitting code for #:G1819. ;;; Emitting code for #:G1822. ;;; Emitting code for #:G1828. ;;; Emitting code for CHECK-OUTPUT-LAYOUT-MODE. ;;; Emitting code for ILLEGAL-INSIDE-JUSTIFICATION-P. ;;; Emitting code for #:G1840. ;;; Emitting code for #:G1851. ;;; Emitting code for #:G1855. ;;; Emitting code for #:G1867. ;;; Emitting code for PARSE-FORMAT-JUSTIFICATION. ;;; Emitting code for EXPAND-FORMAT-JUSTIFICATION. ;;; Emitting code for #:G1937. ;;; Emitting code for INTERPRET-FORMAT-JUSTIFICATION. ;;; Emitting code for FORMAT-JUSTIFICATION. ;;; Emitting code for DO-PADDING. ;;; Emitting code for PARSE-FORMAT-LOGICAL-BLOCK. ;;; Emitting code for EXTRACT-STRING. ;;; Emitting code for ADD-FILL-STYLE-NEWLINES. ;;; Emitting code for ADD-FILL-STYLE-NEWLINES-AUX. ;;; Emitting code for EXPAND-FORMAT-LOGICAL-BLOCK. ;;; Emitting code for INTERPRET-FORMAT-LOGICAL-BLOCK. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-2049. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-2063. ;;; Emitting code for #:G2057. ;;; Emitting code for #:G2071. ;;; Emitting code for #:G2078. ;;; Emitting code for #:G2081. ;;; Emitting code for #:G2112. ;;; Emitting code for EXTRACT-USER-FUNCTION-NAME. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/format.c -o lsp/format.o ;;; Finished compiling SRC:LSP;FORMAT.LSP. ;;; (compile-file "src:lsp;defpackage.lsp" :output-file #P"BUILD:LSP;DEFPACKAGE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;DEFPACKAGE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO DEFPACKAGE ...). ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of (PROGN (IF (NULL #:G85) (DM-TOO-FEW-ARGUMENTS #:G84)) (PROG1 (CAR (TRULY-THE CONS #:G85)) (SETQ #:G85 (CDR (TRULY-THE CONS #:G85))))) to be (OR SYMBOL STRING CHARACTER) ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LET181 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST177) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL179 to be CONS ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:G182 to be CONS ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LET193 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST189) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL191 to be CONS ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LET202 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST198) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:G203 to be CONS ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LET209 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST205) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:G210 to be CONS ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LET218 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST214) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL216 to be CONS ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LET227 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST223) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 2803 ;;; at (FSET 'DEFPACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL225 to be CONS ;;; Compiling (DEFUN DODEFPACKAGE ...). ;;; Note: ;;; in file DEFPACKAGE.LSP, position 8482 ;;; at (DEFUN DODEFPACKAGE ...) ;;; Checking type of #:LET249 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 8482 ;;; at (DEFUN DODEFPACKAGE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST247) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 8482 ;;; at (DEFUN DODEFPACKAGE ...) ;;; Checking type of #:LET256 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 8482 ;;; at (DEFUN DODEFPACKAGE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST252) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 8482 ;;; at (DEFUN DODEFPACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL254 to be CONS ;;; Compiling (DEFUN FIND-OR-MAKE-SYMBOL ...). ;;; Compiling (DEFUN FIND-DUPLICATES ...). ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of #:LET268 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST266) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of #:LET271 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST269) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of #:LET282 to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of (1+ I) to be REAL ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST280) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST280) to be LIST ;;; Note: ;;; in file DEFPACKAGE.LSP, position 10704 ;;; at (DEFUN FIND-DUPLICATES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST266) to be LIST ;;; End of Pass 1. ;;; Emitting code for DEFPACKAGE. ;;; Emitting code for OPTION-VALUES. ;;; Emitting code for OPTION-VALUES-LIST. ;;; Emitting code for TO-STRING. ;;; Emitting code for DODEFPACKAGE. ;;; Emitting code for FIND-OR-MAKE-SYMBOL. ;;; Emitting code for FIND-DUPLICATES. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/defpackage.c -o lsp/defpackage.o ;;; Finished compiling SRC:LSP;DEFPACKAGE.LSP. ;;; (compile-file "src:lsp;ffi.lsp" :output-file #P"BUILD:LSP;FFI.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;FFI.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO DEF-CONSTANT ...). ;;; Compiling (DEFPARAMETER *FFI-TYPES* ...). ;;; Compiling (DEFPARAMETER *USE-DFFI* ...). ;;; Compiling (DEFMACRO DEF-FOREIGN-TYPE ...). ;;; Compiling (DEFMACRO DEF-TYPE ...). ;;; Compiling (DEFUN %CONVERT-TO-FFI-TYPE ...). ;;; Compiling (DEFMACRO %ALIGN-DATA ...). ;;; Compiling (DEFUN SIZE-OF-FOREIGN-TYPE ...). ;;; Note: ;;; in file FFI.LSP, position 1914 ;;; at (DEFUN SIZE-OF-FOREIGN-TYPE ...) ;;; Checking type of #:LET46 to be LIST ;;; Note: ;;; in file FFI.LSP, position 1914 ;;; at (DEFUN SIZE-OF-FOREIGN-TYPE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST41) to be LIST ;;; Note: ;;; in file FFI.LSP, position 1914 ;;; at (DEFUN SIZE-OF-FOREIGN-TYPE ...) ;;; Checking type of #:LOOP-LIST-TAIL43 to be CONS ;;; Compiling (DEFUN ALLOCATE-FOREIGN-OBJECT ...). ;;; Compiling (DEFUN FREE-FOREIGN-OBJECT ...). ;;; Compiling (DEFMACRO DEF-ENUM ...). ;;; Compiling (DEFMACRO DEF-STRUCT ...). ;;; Compiling (DEFUN SLOT-POSITION ...). ;;; Compiling (DEFUN GET-SLOT-VALUE ...). ;;; Compiling (DEFUN (SETF GET-SLOT-VALUE) ...). ;;; Compiling (DEFUN GET-SLOT-POINTER ...). ;;; Compiling (DEFMACRO DEF-ARRAY-POINTER ...). ;;; Compiling (DEFUN DEREF-ARRAY ...). ;;; Compiling (DEFUN (SETF DEREF-ARRAY) ...). ;;; Compiling (DEFUN %FOREIGN-DATA-SET ...). ;;; Compiling (DEFUN %FOREIGN-DATA-REF ...). ;;; Compiling (DEFMACRO DEF-UNION ...). ;;; Compiling (DEFPARAMETER +NULL-CSTRING-POINTER+ ...). ;;; Compiling (DEFUN POINTER-ADDRESS ...). ;;; Compiling (DEFUN DEREF-POINTER ...). ;;; Compiling (DEFUN (SETF DEREF-POINTER) ...). ;;; Compiling (DEFUN MAKE-NULL-POINTER ...). ;;; Compiling (DEFUN MAKE-POINTER ...). ;;; Compiling (DEFUN NULL-CHAR-P ...). ;;; Compiling (DEFUN ENSURE-CHAR-CHARACTER ...). ;;; Compiling (DEFUN ENSURE-CHAR-INTEGER ...). ;;; Compiling (DEFUN ENSURE-CHAR-STORABLE ...). ;;; Compiling (DEFUN CHAR-ARRAY-TO-POINTER ...). ;;; Compiling (DEFMACRO CONVERT-FROM-CSTRING ...). ;;; Compiling (DEFMACRO CONVERT-TO-CSTRING ...). ;;; Compiling (DEFMACRO FREE-CSTRING ...). ;;; Compiling (DEFMACRO WITH-CSTRING ...). ;;; Compiling (DEFMACRO WITH-CSTRINGS ...). ;;; Compiling (DEFUN FOREIGN-STRING-LENGTH ...). ;;; Compiling (DEFUN CONVERT-FROM-FOREIGN-STRING ...). ;;; Compiling (DEFUN CONVERT-TO-FOREIGN-STRING ...). ;;; Compiling (DEFUN ALLOCATE-FOREIGN-STRING ...). ;;; Compiling (DEFMACRO WITH-FOREIGN-STRING ...). ;;; Compiling (DEFMACRO WITH-FOREIGN-STRINGS ...). ;;; Compiling (DEFMACRO WITH-FOREIGN-OBJECT ...). ;;; Compiling (DEFMACRO WITH-FOREIGN-OBJECTS ...). ;;; Compiling (DEFMACRO WITH-CAST-POINTER ...). ;;; Compiling (DEFUN LISP-TO-C-NAME ...). ;;; Compiling (DEFUN %CONVERT-TO-ARG-TYPE ...). ;;; Compiling (DEFUN %CONVERT-TO-RETURN-TYPE ...). ;;; Compiling (DEFUN PRODUCE-FUNCTION-CALL ...). ;;; Compiling (DEFMACRO DEF-LIB-FUNCTION ...). ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of #:LET382 to be LIST ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST377) to be LIST ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL379 to be CONS ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of #:LET389 to be LIST ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST385) to be LIST ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL387 to be CONS ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of #:LET396 to be LIST ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST392) to be LIST ;;; Note: ;;; in file FFI.LSP, position 18145 ;;; at (FSET 'DEF-LIB-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL394 to be CONS ;;; Compiling (DEFMACRO DEF-FUNCTION ...). ;;; Note: ;;; in file FFI.LSP, position 18734 ;;; at (FSET 'DEF-FUNCTION ...) ;;; Checking type of #:LET419 to be LIST ;;; Note: ;;; in file FFI.LSP, position 18734 ;;; at (FSET 'DEF-FUNCTION ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST415) to be LIST ;;; Note: ;;; in file FFI.LSP, position 18734 ;;; at (FSET 'DEF-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL417 to be CONS ;;; Note: ;;; in file FFI.LSP, position 18734 ;;; at (FSET 'DEF-FUNCTION ...) ;;; Checking type of #:LET427 to be LIST ;;; Note: ;;; in file FFI.LSP, position 18734 ;;; at (FSET 'DEF-FUNCTION ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST422) to be LIST ;;; Note: ;;; in file FFI.LSP, position 18734 ;;; at (FSET 'DEF-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL424 to be CONS ;;; Compiling (DEFMACRO DEF-FOREIGN-VAR ...). ;;; Compiling (DEFUN FIND-FOREIGN-LIBRARY ...). ;;; Compiling (DEFPARAMETER +LOADED-LIBRARIES+ ...). ;;; Compiling (DEFUN DO-LOAD-FOREIGN-LIBRARY ...). ;;; Compiling (DEFMACRO LOAD-FOREIGN-LIBRARY ...). ;;; Compiling (DEFMACRO DEFCALLBACK ...). ;;; Note: ;;; in file FFI.LSP, position 24750 ;;; at (FSET 'DEFCALLBACK ...) ;;; Checking type of #:LET501 to be LIST ;;; Note: ;;; in file FFI.LSP, position 24750 ;;; at (FSET 'DEFCALLBACK ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST497) to be LIST ;;; Note: ;;; in file FFI.LSP, position 24750 ;;; at (FSET 'DEFCALLBACK ...) ;;; Checking type of #:LOOP-LIST-TAIL499 to be CONS ;;; Note: ;;; in file FFI.LSP, position 24750 ;;; at (FSET 'DEFCALLBACK ...) ;;; Checking type of #:LET508 to be LIST ;;; Note: ;;; in file FFI.LSP, position 24750 ;;; at (FSET 'DEFCALLBACK ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST504) to be LIST ;;; Note: ;;; in file FFI.LSP, position 24750 ;;; at (FSET 'DEFCALLBACK ...) ;;; Checking type of #:LOOP-LIST-TAIL506 to be CONS ;;; Compiling (DEFUN CALLBACK ...). ;;; Compiling (DEFUN CLINES ...). ;;; Compiling (DEFMACRO C-INLINE ...). ;;; Compiling (DEFMACRO C-PROGN ...). ;;; Compiling (DEFMACRO DEFINLINE ...). ;;; Compiling (DEFMACRO DEFLA ...). ;;; Compiling (DEFMACRO DEFCBODY ...). ;;; Style warning: ;;; in file FFI.LSP, position 27097 ;;; at (FSET 'DEFCBODY ...) ;;; ! The variable X is not used. ;;; Note: ;;; in file FFI.LSP, position 27097 ;;; at (FSET 'DEFCBODY ...) ;;; Checking type of #:LET558 to be LIST ;;; Note: ;;; in file FFI.LSP, position 27097 ;;; at (FSET 'DEFCBODY ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST553) to be LIST ;;; Note: ;;; in file FFI.LSP, position 27097 ;;; at (FSET 'DEFCBODY ...) ;;; Checking type of #:LOOP-LIST-TAIL555 to be CONS ;;; Compiling (DEFMACRO DEFENTRY ...). ;;; Style warning: ;;; in file FFI.LSP, position 27716 ;;; at (FSET 'DEFENTRY ...) ;;; ! The variable X is not used. ;;; Note: ;;; in file FFI.LSP, position 27716 ;;; at (FSET 'DEFENTRY ...) ;;; Checking type of #:LET587 to be LIST ;;; Note: ;;; in file FFI.LSP, position 27716 ;;; at (FSET 'DEFENTRY ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST582) to be LIST ;;; Note: ;;; in file FFI.LSP, position 27716 ;;; at (FSET 'DEFENTRY ...) ;;; Checking type of #:LOOP-LIST-TAIL584 to be CONS ;;; End of Pass 1. ;;; Emitting code for DEF-CONSTANT. ;;; Emitting code for DEF-FOREIGN-TYPE. ;;; Emitting code for DEF-TYPE. ;;; Emitting code for %CONVERT-TO-FFI-TYPE. ;;; Emitting code for %ALIGN-DATA. ;;; Emitting code for SIZE-OF-FOREIGN-TYPE. ;;; Emitting code for #:G44. ;;; Emitting code for ALLOCATE-FOREIGN-OBJECT. ;;; Emitting code for FREE-FOREIGN-OBJECT. ;;; Emitting code for DEF-ENUM. ;;; Emitting code for DEF-STRUCT. ;;; Emitting code for SLOT-POSITION. ;;; Emitting code for GET-SLOT-VALUE. ;;; Emitting code for (SETF GET-SLOT-VALUE). ;;; Emitting code for GET-SLOT-POINTER. ;;; Emitting code for DEF-ARRAY-POINTER. ;;; Emitting code for DEREF-ARRAY. ;;; Emitting code for (SETF DEREF-ARRAY). ;;; Emitting code for %FOREIGN-DATA-SET. ;;; Emitting code for %FOREIGN-DATA-REF. ;;; Emitting code for DEF-UNION. ;;; Emitting code for POINTER-ADDRESS. ;;; Emitting code for DEREF-POINTER. ;;; Emitting code for (SETF DEREF-POINTER). ;;; Emitting code for MAKE-NULL-POINTER. ;;; Emitting code for MAKE-POINTER. ;;; Emitting code for NULL-CHAR-P. ;;; Emitting code for ENSURE-CHAR-CHARACTER. ;;; Emitting code for ENSURE-CHAR-INTEGER. ;;; Emitting code for ENSURE-CHAR-STORABLE. ;;; Emitting code for CHAR-ARRAY-TO-POINTER. ;;; Emitting code for CONVERT-FROM-CSTRING. ;;; Emitting code for CONVERT-TO-CSTRING. ;;; Emitting code for FREE-CSTRING. ;;; Emitting code for WITH-CSTRING. ;;; Emitting code for WITH-CSTRINGS. ;;; Emitting code for FOREIGN-STRING-LENGTH. ;;; Emitting code for CONVERT-FROM-FOREIGN-STRING. ;;; Emitting code for CONVERT-TO-FOREIGN-STRING. ;;; Emitting code for ALLOCATE-FOREIGN-STRING. ;;; Emitting code for WITH-FOREIGN-STRING. ;;; Emitting code for WITH-FOREIGN-STRINGS. ;;; Emitting code for WITH-FOREIGN-OBJECT. ;;; Emitting code for WITH-FOREIGN-OBJECTS. ;;; Emitting code for WITH-CAST-POINTER. ;;; Emitting code for LISP-TO-C-NAME. ;;; Emitting code for %CONVERT-TO-ARG-TYPE. ;;; Emitting code for %CONVERT-TO-RETURN-TYPE. ;;; Emitting code for PRODUCE-FUNCTION-CALL. ;;; Emitting code for DEF-LIB-FUNCTION. ;;; Emitting code for #:G380. ;;; Emitting code for DEF-FUNCTION. ;;; Emitting code for #:G425. ;;; Emitting code for DEF-FOREIGN-VAR. ;;; Emitting code for FIND-FOREIGN-LIBRARY. ;;; Emitting code for DO-LOAD-FOREIGN-LIBRARY. ;;; Emitting code for LOAD-FOREIGN-LIBRARY. ;;; Emitting code for DEFCALLBACK. ;;; Emitting code for CALLBACK. ;;; Emitting code for CLINES. ;;; Emitting code for C-INLINE. ;;; Emitting code for C-PROGN. ;;; Emitting code for DEFINLINE. ;;; Emitting code for DEFLA. ;;; Emitting code for DEFCBODY. ;;; Emitting code for #:G556. ;;; Emitting code for DEFENTRY. ;;; Emitting code for #:G585. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/ffi.c -o lsp/ffi.o ;;; Finished compiling SRC:LSP;FFI.LSP. ;;; (compile-file "src:lsp;mp.lsp" :output-file #P"BUILD:LSP;MP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;MP.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO WITHOUT-INTERRUPTS ...). ;;; Compiling (DEFMACRO WITH-INTERRUPTS ...). ;;; Compiling (DEFMACRO WITH-LOCK ...). ;;; Compiling (DEFMACRO WITH-RWLOCK ...). ;;; End of Pass 1. ;;; Emitting code for WITHOUT-INTERRUPTS. ;;; Emitting code for WITH-INTERRUPTS. ;;; Emitting code for WITH-LOCK. ;;; Emitting code for WITH-RWLOCK. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/mp.c -o lsp/mp.o ;;; Finished compiling SRC:LSP;MP.LSP. ;;; (compile-file "build:lsp;config.lsp" :output-file #P"BUILD:LSP;CONFIG.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling BUILD:LSP;CONFIG.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN UNAME ...). ;;; Compiling (DEFUN SHORT-SITE-NAME ...). ;;; Function SHORT-SITE-NAME proclaimed (0,0) ;;; Compiling (DEFUN LONG-SITE-NAME ...). ;;; Function LONG-SITE-NAME proclaimed (0,0) ;;; Compiling (DEFUN LISP-IMPLEMENTATION-VERSION ...). ;;; Function LISP-IMPLEMENTATION-VERSION proclaimed (0,0) ;;; Compiling (DEFUN EXT:LISP-IMPLEMENTATION-VCS-ID ...). ;;; Function LISP-IMPLEMENTATION-VCS-ID proclaimed (0,0) ;;; Compiling (DEFUN MACHINE-TYPE ...). ;;; Function MACHINE-TYPE proclaimed (0,0) ;;; Compiling (DEFUN MACHINE-INSTANCE ...). ;;; Function MACHINE-INSTANCE proclaimed (0,0) ;;; Compiling (DEFUN MACHINE-VERSION ...). ;;; Function MACHINE-VERSION proclaimed (0,0) ;;; Compiling (DEFUN SOFTWARE-TYPE ...). ;;; Function SOFTWARE-TYPE proclaimed (0,0) ;;; Compiling (DEFUN SOFTWARE-VERSION ...). ;;; Function SOFTWARE-VERSION proclaimed (0,0) ;;; End of Pass 1. ;;; Emitting code for UNAME. ;;; Emitting code for SHORT-SITE-NAME. ;;; Emitting code for LONG-SITE-NAME. ;;; Emitting code for LISP-IMPLEMENTATION-VERSION. ;;; Emitting code for EXT:LISP-IMPLEMENTATION-VCS-ID. ;;; Emitting code for MACHINE-TYPE. ;;; Emitting code for MACHINE-INSTANCE. ;;; Emitting code for MACHINE-VERSION. ;;; Emitting code for SOFTWARE-TYPE. ;;; Emitting code for SOFTWARE-VERSION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/config.c -o lsp/config.o ;;; Finished compiling BUILD:LSP;CONFIG.LSP. ;;; (compile-file "src:lsp;module.lsp" :output-file #P"BUILD:LSP;MODULE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;MODULE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *MODULES* ...). ;;; Compiling (DEFPARAMETER *MODULE-PROVIDER-FUNCTIONS* ...). ;;; Compiling (DEFUN PROVIDE ...). ;;; Function PROVIDE proclaimed (1,1) ;;; Compiling (DEFPARAMETER *REQUIRING* ...). ;;; Compiling (DEFUN REQUIRE-ERROR ...). ;;; Compiling (DEFUN REQUIRE ...). ;;; Function REQUIRE proclaimed (1,2) ;;; End of Pass 1. ;;; Emitting code for PROVIDE. ;;; Emitting code for REQUIRE-ERROR. ;;; Emitting code for REQUIRE. ;;; Emitting code for #:G17. ;;; Emitting code for #:G19. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/module.c -o lsp/module.o ;;; Finished compiling SRC:LSP;MODULE.LSP. ;;; (compile-file "src:lsp;cmdline.lsp" :output-file #P"BUILD:LSP;CMDLINE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;CMDLINE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *COMMAND-BREAK-ENABLE* ...). ;;; Compiling (DEFPARAMETER *LISP-INIT-FILE-LIST* ...). ;;; Compiling (DEFPARAMETER *HELP-MESSAGE* ...). ;;; Compiling (DEFUN COMMAND-ARGS ...). ;;; Note: ;;; in file CMDLINE.LSP, position 1381 ;;; at (DEFUN COMMAND-ARGS ...) ;;; Checking type of #:LOOP-LIST-TAIL2 to be CONS ;;; Compiling (DEFPARAMETER *COMMAND-ARGS* ...). ;;; Compiling (DEFPARAMETER *UNPROCESSED-ECL-COMMAND-ARGS* ...). ;;; Compiling (DEFUN COMMAND-ARG-ERROR ...). ;;; Compiling (DEFUN PRODUCE-INIT-CODE ...). ;;; Compiling (DEFUN PROCESS-COMMAND-ARGS ...). ;;; End of Pass 1. ;;; Emitting code for COMMAND-ARGS. ;;; Emitting code for COMMAND-ARG-ERROR. ;;; Emitting code for PRODUCE-INIT-CODE. ;;; Emitting code for PROCESS-COMMAND-ARGS. ;;; Emitting code for #:G46. ;;; Emitting code for #:G47. ;;; Emitting code for #:G48. ;;; Emitting code for #:G49. ;;; Emitting code for #:G50. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/cmdline.c -o lsp/cmdline.o ;;; Finished compiling SRC:LSP;CMDLINE.LSP. ;;; (compile-file "src:lsp;autoload.lsp" :output-file #P"BUILD:LSP;AUTOLOAD.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;AUTOLOAD.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN LISP-IMPLEMENTATION-TYPE ...). ;;; Function LISP-IMPLEMENTATION-TYPE proclaimed (0,0) ;;; Compiling (DEFUN AUTOLOAD ...). ;;; Note: ;;; in file AUTOLOAD.LSP, position 1055 ;;; at (UNLESS (FBOUNDP 'COMPILE) ...) ;;; Checking type of #:LET9 to be LIST ;;; Note: ;;; in file AUTOLOAD.LSP, position 1055 ;;; at (UNLESS (FBOUNDP 'COMPILE) ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST7) to be LIST ;;; Compiling (DEFMACRO WITH-COMPILATION-UNIT ...). ;;; Compiling (DEFUN ED ...). ;;; Compiling (DEFUN ROOM ...). ;;; Compiling (DEFUN HELP ...). ;;; End of Pass 1. ;;; Emitting code for LISP-IMPLEMENTATION-TYPE. ;;; Emitting code for AUTOLOAD. ;;; Emitting code for #:G3. ;;; Emitting code for PROCLAIM. ;;; Emitting code for WITH-COMPILATION-UNIT. ;;; Emitting code for ED. ;;; Emitting code for ROOM. ;;; Emitting code for HELP. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/autoload.c -o lsp/autoload.o ;;; Finished compiling SRC:LSP;AUTOLOAD.LSP. ;;; (compile-file "src:lsp;cdr-5.lsp" :output-file #P"BUILD:LSP;CDR-5.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;CDR-5.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN NEGATIVE-FIXNUM-P ...). ;;; Function NEGATIVE-FIXNUM-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-FIXNUM-P ...). ;;; Function POSITIVE-FIXNUM-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-FIXNUM-P ...). ;;; Function NON-NEGATIVE-FIXNUM-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-FIXNUM-P ...). ;;; Function NON-POSITIVE-FIXNUM-P proclaimed (1,1) ;;; Compiling (DEFUN ARRAY-INDEX-P ...). ;;; Function ARRAY-INDEX-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-INTEGER-P ...). ;;; Function NEGATIVE-INTEGER-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-INTEGER-P ...). ;;; Function POSITIVE-INTEGER-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-INTEGER-P ...). ;;; Function NON-NEGATIVE-INTEGER-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-INTEGER-P ...). ;;; Function NON-POSITIVE-INTEGER-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-RATIONAL-P ...). ;;; Function NEGATIVE-RATIONAL-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-RATIONAL-P ...). ;;; Function POSITIVE-RATIONAL-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-RATIONAL-P ...). ;;; Function NON-NEGATIVE-RATIONAL-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-RATIONAL-P ...). ;;; Function NON-POSITIVE-RATIONAL-P proclaimed (1,1) ;;; Compiling (DEFUN RATIOP ...). ;;; Compiling (DEFUN POSITIVE-RATIO-P ...). ;;; Function POSITIVE-RATIO-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-RATIO-P ...). ;;; Function NEGATIVE-RATIO-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-RATIO-P ...). ;;; Function NON-NEGATIVE-RATIO-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-RATIO-P ...). ;;; Function NON-POSITIVE-RATIO-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-REAL-P ...). ;;; Function NEGATIVE-REAL-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-REAL-P ...). ;;; Function POSITIVE-REAL-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-REAL-P ...). ;;; Function NON-NEGATIVE-REAL-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-REAL-P ...). ;;; Function NON-POSITIVE-REAL-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-FLOAT-P ...). ;;; Function NEGATIVE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-FLOAT-P ...). ;;; Function POSITIVE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-FLOAT-P ...). ;;; Function NON-NEGATIVE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-FLOAT-P ...). ;;; Function NON-POSITIVE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-SHORT-FLOAT-P ...). ;;; Function NEGATIVE-SHORT-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-SHORT-FLOAT-P ...). ;;; Function POSITIVE-SHORT-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-SHORT-FLOAT-P ...). ;;; Function NON-NEGATIVE-SHORT-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-SHORT-FLOAT-P ...). ;;; Function NON-POSITIVE-SHORT-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-SINGLE-FLOAT-P ...). ;;; Function NEGATIVE-SINGLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-SINGLE-FLOAT-P ...). ;;; Function POSITIVE-SINGLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-SINGLE-FLOAT-P ...). ;;; Function NON-NEGATIVE-SINGLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-SINGLE-FLOAT-P ...). ;;; Function NON-POSITIVE-SINGLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-DOUBLE-FLOAT-P ...). ;;; Function NEGATIVE-DOUBLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-DOUBLE-FLOAT-P ...). ;;; Function POSITIVE-DOUBLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-DOUBLE-FLOAT-P ...). ;;; Function NON-NEGATIVE-DOUBLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-DOUBLE-FLOAT-P ...). ;;; Function NON-POSITIVE-DOUBLE-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NEGATIVE-LONG-FLOAT-P ...). ;;; Function NEGATIVE-LONG-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN POSITIVE-LONG-FLOAT-P ...). ;;; Function POSITIVE-LONG-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-NEGATIVE-LONG-FLOAT-P ...). ;;; Function NON-NEGATIVE-LONG-FLOAT-P proclaimed (1,1) ;;; Compiling (DEFUN NON-POSITIVE-LONG-FLOAT-P ...). ;;; Function NON-POSITIVE-LONG-FLOAT-P proclaimed (1,1) ;;; End of Pass 1. ;;; Emitting code for NEGATIVE-FIXNUM. ;;; Emitting code for NON-POSITIVE-FIXNUM. ;;; Emitting code for NON-NEGATIVE-FIXNUM. ;;; Emitting code for POSITIVE-FIXNUM. ;;; Emitting code for NEGATIVE-FIXNUM-P. ;;; Emitting code for POSITIVE-FIXNUM-P. ;;; Emitting code for NON-NEGATIVE-FIXNUM-P. ;;; Emitting code for NON-POSITIVE-FIXNUM-P. ;;; Emitting code for ARRAY-INDEX-P. ;;; Emitting code for NEGATIVE-INTEGER-P. ;;; Emitting code for POSITIVE-INTEGER-P. ;;; Emitting code for NON-NEGATIVE-INTEGER-P. ;;; Emitting code for NON-POSITIVE-INTEGER-P. ;;; Emitting code for NEGATIVE-RATIONAL-P. ;;; Emitting code for POSITIVE-RATIONAL-P. ;;; Emitting code for NON-NEGATIVE-RATIONAL-P. ;;; Emitting code for NON-POSITIVE-RATIONAL-P. ;;; Emitting code for RATIOP. ;;; Emitting code for POSITIVE-RATIO-P. ;;; Emitting code for NEGATIVE-RATIO-P. ;;; Emitting code for NON-NEGATIVE-RATIO-P. ;;; Emitting code for NON-POSITIVE-RATIO-P. ;;; Emitting code for NEGATIVE-REAL-P. ;;; Emitting code for POSITIVE-REAL-P. ;;; Emitting code for NON-NEGATIVE-REAL-P. ;;; Emitting code for NON-POSITIVE-REAL-P. ;;; Emitting code for NEGATIVE-FLOAT-P. ;;; Emitting code for POSITIVE-FLOAT-P. ;;; Emitting code for NON-NEGATIVE-FLOAT-P. ;;; Emitting code for NON-POSITIVE-FLOAT-P. ;;; Emitting code for NEGATIVE-SHORT-FLOAT-P. ;;; Emitting code for POSITIVE-SHORT-FLOAT-P. ;;; Emitting code for NON-NEGATIVE-SHORT-FLOAT-P. ;;; Emitting code for NON-POSITIVE-SHORT-FLOAT-P. ;;; Emitting code for NEGATIVE-SINGLE-FLOAT-P. ;;; Emitting code for POSITIVE-SINGLE-FLOAT-P. ;;; Emitting code for NON-NEGATIVE-SINGLE-FLOAT-P. ;;; Emitting code for NON-POSITIVE-SINGLE-FLOAT-P. ;;; Emitting code for NEGATIVE-DOUBLE-FLOAT-P. ;;; Emitting code for POSITIVE-DOUBLE-FLOAT-P. ;;; Emitting code for NON-NEGATIVE-DOUBLE-FLOAT-P. ;;; Emitting code for NON-POSITIVE-DOUBLE-FLOAT-P. ;;; Emitting code for NEGATIVE-LONG-FLOAT-P. ;;; Emitting code for POSITIVE-LONG-FLOAT-P. ;;; Emitting code for NON-NEGATIVE-LONG-FLOAT-P. ;;; Emitting code for NON-POSITIVE-LONG-FLOAT-P. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c lsp/cdr-5.c -o lsp/cdr-5.o ;;; Finished compiling SRC:LSP;CDR-5.LSP. ;;; (compile-file "src:clos;package.lsp" :output-file #P"BUILD:CLOS;PACKAGE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;PACKAGE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/package.c -o clos/package.o ;;; Finished compiling SRC:CLOS;PACKAGE.LSP. ;;; (compile-file "src:clos;cpl.lsp" :output-file #P"BUILD:CLOS;CPL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;CPL.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN COMPUTE-CLOS-CLASS-PRECEDENCE-LIST ...). ;;; Note: ;;; in file CPL.LSP, position 3405 ;;; at (DEFUN COMPUTE-CLOS-CLASS-PRECEDENCE-LIST ...) ;;; Checking type of #:G23 to be CONS ;;; End of Pass 1. ;;; Emitting code for COMPUTE-CLOS-CLASS-PRECEDENCE-LIST. ;;; Emitting code for DELETE-CLASS. ;;; Emitting code for NEXT-ELEMENT. ;;; Emitting code for FREE-ELEMENTS. ;;; Emitting code for HAS-NO-PRECEDENT. ;;; Emitting code for CYCLE-ERROR. ;;; Emitting code for WALK-SUPERS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/cpl.c -o clos/cpl.o ;;; Finished compiling SRC:CLOS;CPL.LSP. ;;; (compile-file "src:clos;std-slot-value.lsp" :output-file #P"BUILD:CLOS;STD-SLOT-VALUE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;STD-SLOT-VALUE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO WITH-SLOTS ...). ;;; Compiling (DEFUN STD-CREATE-SLOTS-TABLE ...). ;;; Compiling (DEFUN FIND-SLOT-DEFINITION ...). ;;; Function FIND-SLOT-DEFINITION proclaimed (0,65536) ;;; Compiling (DEFUN UPDATE-INSTANCE ...). ;;; Compiling (DEFUN STANDARD-INSTANCE-ACCESS ...). ;;; Function STANDARD-INSTANCE-ACCESS proclaimed (2,2) ;;; Compiling (DEFUN STANDARD-INSTANCE-SET ...). ;;; Warning: ;;; in file STD-SLOT-VALUE.LSP, position 7515 ;;; at (DEFUN STANDARD-INSTANCE-SET ...) ;;; ! Type mismatch was found in (THE FIXNUM LOCATION). ;;; Style warning: ;;; in file STD-SLOT-VALUE.LSP, position 7515 ;;; at (DEFUN STANDARD-INSTANCE-SET ...) ;;; ! The argument 2 of function INSTANCE-SET has type ;;; INSTANCE ;;; instead of expected ;;; FIXNUM ;;; Note: ;;; in file STD-SLOT-VALUE.LSP, position 7515 ;;; at (DEFUN STANDARD-INSTANCE-SET ...) ;;; Checking type of #:G381 to be CONS ;;; Function STANDARD-INSTANCE-SET proclaimed (3,3) ;;; Compiling (DEFUN SLOT-VALUE ...). ;;; Function SLOT-VALUE proclaimed (2,2) ;;; Compiling (DEFUN SLOT-EXISTS-P ...). ;;; Function SLOT-EXISTS-P proclaimed (2,2) ;;; Compiling (DEFUN SLOT-BOUNDP ...). ;;; Function SLOT-BOUNDP proclaimed (2,2) ;;; Compiling (DEFUN SLOT-VALUE-SET ...). ;;; Function SLOT-VALUE-SET proclaimed (3,3) ;;; Compiling (DEFUN INVALID-SLOT-LOCATION ...). ;;; End of Pass 1. ;;; Style warning: ;;; in file std-slot-value.lsp, position 7515 ;;; at (DEFUN STANDARD-INSTANCE-SET ...) ;;; ! The argument 2 of function INSTANCE-SET has type ;;; INSTANCE ;;; instead of expected ;;; FIXNUM ;;; Emitting code for WITH-SLOTS. ;;; Emitting code for STD-CREATE-SLOTS-TABLE. ;;; Emitting code for FIND-SLOT-DEFINITION. ;;; Emitting code for UPDATE-INSTANCE. ;;; Emitting code for STANDARD-INSTANCE-ACCESS. ;;; Emitting code for STANDARD-INSTANCE-SET. ;;; Emitting code for SLOT-VALUE. ;;; Emitting code for SLOT-EXISTS-P. ;;; Emitting code for SLOT-BOUNDP. ;;; Emitting code for SLOT-VALUE-SET. ;;; Emitting code for INVALID-SLOT-LOCATION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/std-slot-value.c -o clos/std-slot-value.o ;;; Finished compiling SRC:CLOS;STD-SLOT-VALUE.LSP. ;;; (compile-file "src:clos;slot.lsp" :output-file #P"BUILD:CLOS;SLOT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;SLOT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-SIMPLE-SLOTD ...). ;;; Compiling (DEFUN FREEZE-CLASS-SLOT-INITFUNCTION ...). ;;; Compiling (DEFUN CANONICAL-SLOT-TO-DIRECT-SLOT ...). ;;; Compiling (DEFUN DIRECT-SLOT-TO-CANONICAL-SLOT ...). ;;; Compiling (DEFUN MAKE-FUNCTION-INITFORM ...). ;;; Compiling (DEFUN PARSE-SLOT ...). ;;; Compiling (DEFUN PARSE-SLOTS ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-SIMPLE-SLOTD. ;;; Emitting code for FREEZE-CLASS-SLOT-INITFUNCTION. ;;; Emitting code for CANONICAL-SLOT-TO-DIRECT-SLOT. ;;; Emitting code for DIRECT-SLOT-TO-CANONICAL-SLOT. ;;; Emitting code for MAKE-FUNCTION-INITFORM. ;;; Emitting code for PARSE-SLOT. ;;; Emitting code for PARSE-SLOTS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/slot.c -o clos/slot.o ;;; Finished compiling SRC:CLOS;SLOT.LSP. ;;; (compile-file "src:clos;boot.lsp" :output-file #P"BUILD:CLOS;BOOT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;BOOT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-EMPTY-STANDARD-CLASS ...). ;;; Compiling (DEFUN REMOVE-ACCESSORS ...). ;;; Compiling (DEFUN ADD-SLOTS ...). ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of #:LET219 to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST215) to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of #:LOOP-LIST-TAIL217 to be CONS ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of #:LET225 to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST223) to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of #:LET285 to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST283) to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of #:LET288 to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST286) to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of #:LET291 to be LIST ;;; Note: ;;; in file BOOT.LSP, position 4819 ;;; at (LET* (#) ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST289) to be LIST ;;; End of Pass 1. ;;; Emitting code for MAKE-EMPTY-STANDARD-CLASS. ;;; Emitting code for REMOVE-ACCESSORS. ;;; Emitting code for ADD-SLOTS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/boot.c -o clos/boot.o ;;; Finished compiling SRC:CLOS;BOOT.LSP. ;;; (compile-file "src:clos;kernel.lsp" :output-file #P"BUILD:CLOS;KERNEL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;KERNEL.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *CLOS-BOOTED* ...). ;;; Compiling (DEFUN SETF-FIND-CLASS ...). ;;; Compiling (DEFUN CLASSP ...). ;;; Compiling (DEFUN INSTALL-METHOD ...). ;;; Note: ;;; in file KERNEL.LSP, position 2523 ;;; at (DEFUN INSTALL-METHOD ...) ;;; Checking type of #:LET12 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 2523 ;;; at (DEFUN INSTALL-METHOD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST6) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 2523 ;;; at (DEFUN INSTALL-METHOD ...) ;;; Checking type of #:LOOP-LIST-TAIL8 to be CONS ;;; Function INSTALL-METHOD proclaimed (0,65536) ;;; Compiling (DEFUN WRAPPED-METHOD-FUNCTION ...). ;;; Compiling (DEFUN ENSURE-GENERIC-FUNCTION ...). ;;; Compiling (DEFUN (SETF GENERIC-FUNCTION-NAME) ...). ;;; Compiling (DEFUN DEFAULT-DISPATCH ...). ;;; Compiling (DEFUN COMPUTE-DISCRIMINATING-FUNCTION ...). ;;; Note: ;;; in file KERNEL.LSP, position 5371 ;;; at (DEFUN COMPUTE-DISCRIMINATING-FUNCTION ...) ;;; Checking type of #:LET50 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 5371 ;;; at (DEFUN COMPUTE-DISCRIMINATING-FUNCTION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST46) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 5371 ;;; at (DEFUN COMPUTE-DISCRIMINATING-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL48 to be CONS ;;; Compiling (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...). ;;; Note: ;;; in file KERNEL.LSP, position 6207 ;;; at (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...) ;;; Checking type of #:LET54 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 6207 ;;; at (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST52) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 6207 ;;; at (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...) ;;; Checking type of #:LET57 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 6207 ;;; at (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST55) to be LIST ;;; Compiling (DEFUN STD-COMPUTE-APPLICABLE-METHODS ...). ;;; Note: ;;; in file KERNEL.LSP, position 9789 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST60) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 9789 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS ...) ;;; Checking type of #:LOOP-LIST-TAIL62 to be CONS ;;; Function STD-COMPUTE-APPLICABLE-METHODS proclaimed (2,2) ;;; Compiling (DEFUN APPLICABLE-METHOD-LIST ...). ;;; Note: ;;; in file KERNEL.LSP, position 10063 ;;; at (DEFUN APPLICABLE-METHOD-LIST ...) ;;; Checking type of #:LET181 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10063 ;;; at (DEFUN APPLICABLE-METHOD-LIST ...) ;;; Checking type of #:LET183 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10063 ;;; at (DEFUN APPLICABLE-METHOD-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST178) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10063 ;;; at (DEFUN APPLICABLE-METHOD-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST179) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10063 ;;; at (DEFUN APPLICABLE-METHOD-LIST ...) ;;; Checking type of #:LET188 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10063 ;;; at (DEFUN APPLICABLE-METHOD-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST184) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10063 ;;; at (DEFUN APPLICABLE-METHOD-LIST ...) ;;; Checking type of #:LOOP-LIST-TAIL186 to be CONS ;;; Compiling (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...). ;;; Note: ;;; in file KERNEL.LSP, position 10817 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...) ;;; Checking type of #:LET249 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10817 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...) ;;; Checking type of #:LET251 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10817 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST246) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10817 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST247) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10817 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...) ;;; Checking type of #:LET257 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10817 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST253) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 10817 ;;; at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...) ;;; Checking type of #:LOOP-LIST-TAIL255 to be CONS ;;; Compiling (DEFUN SORT-APPLICABLE-METHODS ...). ;;; Compiling (DEFUN COMPARE-METHODS ...). ;;; Compiling (DEFUN COMPARE-SPECIALIZERS-LISTS ...). ;;; Compiling (DEFUN FAST-SUBTYPEP ...). ;;; Compiling (DEFUN COMPARE-SPECIALIZERS ...). ;;; Compiling (DEFUN COMPUTE-G-F-SPEC-LIST ...). ;;; Note: ;;; in file KERNEL.LSP, position 15769 ;;; at (DEFUN COMPUTE-G-F-SPEC-LIST ...) ;;; Checking type of #:G569 to be CONS ;;; Style warning: ;;; in file KERNEL.LSP, position 15769 ;;; at (DEFUN COMPUTE-G-F-SPEC-LIST ...) ;;; ! The variable GF is not used. ;;; Note: ;;; in file KERNEL.LSP, position 15769 ;;; at (DEFUN COMPUTE-G-F-SPEC-LIST ...) ;;; Checking type of #:LET581 to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 15769 ;;; at (DEFUN COMPUTE-G-F-SPEC-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST577) to be LIST ;;; Note: ;;; in file KERNEL.LSP, position 15769 ;;; at (DEFUN COMPUTE-G-F-SPEC-LIST ...) ;;; Checking type of #:LOOP-LIST-TAIL579 to be CONS ;;; Note: ;;; in file KERNEL.LSP, position 15769 ;;; at (DEFUN COMPUTE-G-F-SPEC-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST577) to be LIST ;;; Compiling (DEFUN PRINT-OBJECT ...). ;;; End of Pass 1. ;;; Emitting code for SETF-FIND-CLASS. ;;; Emitting code for FIND-CLASS. ;;; Emitting code for CLASSP. ;;; Emitting code for INSTALL-METHOD. ;;; Emitting code for #:G9. ;;; Emitting code for WRAPPED-METHOD-FUNCTION. ;;; Emitting code for #:G13. ;;; Emitting code for ENSURE-GENERIC-FUNCTION. ;;; Emitting code for (SETF GENERIC-FUNCTION-NAME). ;;; Emitting code for DEFAULT-DISPATCH. ;;; Emitting code for COMPUTE-DISCRIMINATING-FUNCTION. ;;; Emitting code for #:G43. ;;; Emitting code for SET-GENERIC-FUNCTION-DISPATCH. ;;; Emitting code for STD-COMPUTE-APPLICABLE-METHODS. ;;; Emitting code for APPLICABLE-METHOD-LIST. ;;; Emitting code for APPLICABLE-METHOD-P. ;;; Emitting code for STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES. ;;; Emitting code for APPLICABLE-METHOD-P. ;;; Emitting code for SORT-APPLICABLE-METHODS. ;;; Emitting code for COMPARE-METHODS. ;;; Emitting code for COMPARE-SPECIALIZERS-LISTS. ;;; Emitting code for FAST-SUBTYPEP. ;;; Emitting code for COMPARE-SPECIALIZERS. ;;; Emitting code for COMPUTE-G-F-SPEC-LIST. ;;; Emitting code for NUPDATE-SPEC-HOW-LIST. ;;; Emitting code for PRINT-OBJECT. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/kernel.c -o clos/kernel.o ;;; Finished compiling SRC:CLOS;KERNEL.LSP. ;;; (compile-file "src:clos;method.lsp" :output-file #P"BUILD:CLOS;METHOD.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;METHOD.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *METHOD-SIZE* ...). ;;; Compiling (DEFPARAMETER *EARLY-METHODS* ...). ;;; Compiling (DEFPARAMETER *NEXT-METHODS* ...). ;;; Compiling (DEFPARAMETER *ADD-METHOD-ARGUMENT-DECLARATIONS* ...). ;;; Compiling (DEFUN GENERIC-FUNCTION-METHOD-CLASS ...). ;;; Compiling (DEFMACRO DEFMETHOD ...). ;;; Note: ;;; in file METHOD.LSP, position 1499 ;;; at (FSET 'DEFMETHOD ...) ;;; Checking type of #:LOOP-LIST-TAIL34 to be CONS ;;; Note: ;;; in file METHOD.LSP, position 1499 ;;; at (FSET 'DEFMETHOD ...) ;;; Checking type of #:LET48 to be LIST ;;; Note: ;;; in file METHOD.LSP, position 1499 ;;; at (FSET 'DEFMETHOD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST ;;; Note: ;;; in file METHOD.LSP, position 1499 ;;; at (FSET 'DEFMETHOD ...) ;;; Checking type of #:LOOP-LIST-TAIL46 to be CONS ;;; Note: ;;; in file METHOD.LSP, position 1499 ;;; at (FSET 'DEFMETHOD ...) ;;; Checking type of #:LET55 to be LIST ;;; Note: ;;; in file METHOD.LSP, position 1499 ;;; at (FSET 'DEFMETHOD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST51) to be LIST ;;; Note: ;;; in file METHOD.LSP, position 1499 ;;; at (FSET 'DEFMETHOD ...) ;;; Checking type of #:LOOP-LIST-TAIL53 to be CONS ;;; Style warning: ;;; in file METHOD.LSP, position 1499 ;;; at (FSET 'DEFMETHOD ...) ;;; ! The variable DECLARATIONS is not used. ;;; Compiling (DEFUN SPECIALIZERS-EXPRESSION ...). ;;; Note: ;;; in file METHOD.LSP, position 3622 ;;; at (DEFUN SPECIALIZERS-EXPRESSION ...) ;;; Checking type of #:LET60 to be LIST ;;; Note: ;;; in file METHOD.LSP, position 3622 ;;; at (DEFUN SPECIALIZERS-EXPRESSION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST56) to be LIST ;;; Note: ;;; in file METHOD.LSP, position 3622 ;;; at (DEFUN SPECIALIZERS-EXPRESSION ...) ;;; Checking type of #:LOOP-LIST-TAIL58 to be CONS ;;; Compiling (DEFUN MAYBE-REMOVE-BLOCK ...). ;;; Style warning: ;;; in file METHOD.LSP, position 4691 ;;; at (DEFUN MAYBE-REMOVE-BLOCK ...) ;;; ! The variable DOCUMENTATION is not used. ;;; Compiling (DEFUN SIMPLIFY-LAMBDA ...). ;;; Style warning: ;;; in file METHOD.LSP, position 5262 ;;; at (DEFUN SIMPLIFY-LAMBDA ...) ;;; ! The variable METHOD-NAME is not used. ;;; Compiling (DEFUN MAKE-RAW-LAMBDA ...). ;;; Note: ;;; in file METHOD.LSP, position 5843 ;;; at (DEFUN MAKE-RAW-LAMBDA ...) ;;; Checking type of #:LET77 to be LIST ;;; Note: ;;; in file METHOD.LSP, position 5843 ;;; at (DEFUN MAKE-RAW-LAMBDA ...) ;;; Checking type of #:LET79 to be LIST ;;; Note: ;;; in file METHOD.LSP, position 5843 ;;; at (DEFUN MAKE-RAW-LAMBDA ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST72) to be LIST ;;; Note: ;;; in file METHOD.LSP, position 5843 ;;; at (DEFUN MAKE-RAW-LAMBDA ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST73) to be LIST ;;; Note: ;;; in file METHOD.LSP, position 5843 ;;; at (DEFUN MAKE-RAW-LAMBDA ...) ;;; Checking type of #:G81 to be CONS ;;; Compiling (DEFUN MAKE-METHOD-LAMBDA ...). ;;; Style warning: ;;; in file METHOD.LSP, position 8385 ;;; at (DEFUN MAKE-METHOD-LAMBDA ...) ;;; ! The variable CALL-NEXT-METHOD-P is not used. ;;; Style warning: ;;; in file METHOD.LSP, position 8385 ;;; at (DEFUN MAKE-METHOD-LAMBDA ...) ;;; ! The variable NEXT-METHOD-P-P is not used. ;;; Style warning: ;;; in file METHOD.LSP, position 8385 ;;; at (DEFUN MAKE-METHOD-LAMBDA ...) ;;; ! The variable METHOD is not used. ;;; Style warning: ;;; in file METHOD.LSP, position 8385 ;;; at (DEFUN MAKE-METHOD-LAMBDA ...) ;;; ! The variable GF is not used. ;;; Compiling (DEFUN ADD-CALL-NEXT-METHOD-CLOSURE ...). ;;; Style warning: ;;; in file METHOD.LSP, position 8914 ;;; at (DEFUN ADD-CALL-NEXT-METHOD-CLOSURE ...) ;;; ! The variable DECLARATIONS is not used. ;;; Style warning: ;;; in file METHOD.LSP, position 8914 ;;; at (DEFUN ADD-CALL-NEXT-METHOD-CLOSURE ...) ;;; ! The variable DOCUMENTATION is not used. ;;; Compiling (DEFUN ENVIRONMENT-CONTAINS-CLOSURE ...). ;;; Note: ;;; in file METHOD.LSP, position 9757 ;;; at (DEFUN ENVIRONMENT-CONTAINS-CLOSURE ...) ;;; Checking type of ITEM to be CONS ;;; Note: ;;; in file METHOD.LSP, position 9757 ;;; at (DEFUN ENVIRONMENT-CONTAINS-CLOSURE ...) ;;; Checking type of (+ COUNTER #:G87) to be FIXNUM ;;; Compiling (DEFUN WALK-METHOD-LAMBDA ...). ;;; Compiling (DEFUN LEGAL-GENERIC-FUNCTION-NAME-P ...). ;;; Compiling (DEFUN PARSE-DEFMETHOD ...). ;;; Compiling (DEFUN IMPLICIT-GENERIC-LAMBDA ...). ;;; Compiling (DEFUN EXTRACT-LAMBDA-LIST ...). ;;; Function EXTRACT-LAMBDA-LIST proclaimed (1,1) ;;; Compiling (DEFUN EXTRACT-SPECIALIZER-NAMES ...). ;;; Function EXTRACT-SPECIALIZER-NAMES proclaimed (1,1) ;;; Compiling (DEFUN PARSE-SPECIALIZED-LAMBDA-LIST ...). ;;; Note: ;;; in file METHOD.LSP, position 13624 ;;; at (DEFUN PARSE-SPECIALIZED-LAMBDA-LIST ...) ;;; Checking type of #:G121 to be CONS ;;; Compiling (DEFUN DECLARATION-SPECIALIZERS ...). ;;; Compiling (DEFUN COMPUTE-METHOD-KEYWORDS ...). ;;; Note: ;;; in file METHOD.LSP, position 16137 ;;; at (DEFUN COMPUTE-METHOD-KEYWORDS ...) ;;; Checking type of #:LET134 to be LIST ;;; Note: ;;; in file METHOD.LSP, position 16137 ;;; at (DEFUN COMPUTE-METHOD-KEYWORDS ...) ;;; Checking type of (CDDDDR #:LOOP-LIST130) to be LIST ;;; Note: ;;; in file METHOD.LSP, position 16137 ;;; at (DEFUN COMPUTE-METHOD-KEYWORDS ...) ;;; Checking type of #:LOOP-LIST-TAIL132 to be CONS ;;; Compiling (DEFUN MAKE-METHOD ...). ;;; Compiling (DEFUN METHOD-P ...). ;;; Compiling (DEFUN ADD-METHOD ...). ;;; Note: ;;; in file METHOD.LSP, position 17172 ;;; at (DEFUN ADD-METHOD ...) ;;; Checking type of #:G259 to be CONS ;;; Compiling (DEFUN FIND-METHOD ...). ;;; Note: ;;; in file METHOD.LSP, position 18101 ;;; at (DEFUN FIND-METHOD ...) ;;; Checking type of #:LET278 to be LIST ;;; Note: ;;; in file METHOD.LSP, position 18101 ;;; at (DEFUN FIND-METHOD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST274) to be LIST ;;; Note: ;;; in file METHOD.LSP, position 18101 ;;; at (DEFUN FIND-METHOD ...) ;;; Checking type of #:LOOP-LIST-TAIL276 to be CONS ;;; Note: ;;; in file METHOD.LSP, position 18101 ;;; at (DEFUN FIND-METHOD ...) ;;; Checking type of #:LET280 to be LIST ;;; Note: ;;; in file METHOD.LSP, position 18101 ;;; at (DEFUN FIND-METHOD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST271) to be LIST ;;; Compiling (DEFMACRO WITH-ACCESSORS ...). ;;; End of Pass 1. ;;; Emitting code for GENERIC-FUNCTION-METHOD-CLASS. ;;; Emitting code for DEFMETHOD. ;;; Emitting code for SPECIALIZERS-EXPRESSION. ;;; Emitting code for MAYBE-REMOVE-BLOCK. ;;; Emitting code for SIMPLIFY-LAMBDA. ;;; Emitting code for MAKE-RAW-LAMBDA. ;;; Emitting code for MAKE-METHOD-LAMBDA. ;;; Emitting code for ADD-CALL-NEXT-METHOD-CLOSURE. ;;; Emitting code for ENVIRONMENT-CONTAINS-CLOSURE. ;;; Emitting code for WALK-METHOD-LAMBDA. ;;; Emitting code for CODE-WALKER. ;;; Emitting code for LEGAL-GENERIC-FUNCTION-NAME-P. ;;; Emitting code for PARSE-DEFMETHOD. ;;; Emitting code for IMPLICIT-GENERIC-LAMBDA. ;;; Emitting code for EXTRACT-LAMBDA-LIST. ;;; Emitting code for EXTRACT-SPECIALIZER-NAMES. ;;; Emitting code for PARSE-SPECIALIZED-LAMBDA-LIST. ;;; Emitting code for DECLARATION-SPECIALIZERS. ;;; Emitting code for COMPUTE-METHOD-KEYWORDS. ;;; Emitting code for MAKE-METHOD. ;;; Emitting code for METHOD-P. ;;; Emitting code for ADD-METHOD. ;;; Emitting code for FIND-METHOD. ;;; Emitting code for SPECIALIZER=. ;;; Emitting code for FILTER-SPECIALIZER. ;;; Emitting code for WITH-ACCESSORS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/method.c -o clos/method.o ;;; Finished compiling SRC:CLOS;METHOD.LSP. ;;; (compile-file "src:clos;combin.lsp" :output-file #P"BUILD:CLOS;COMBIN.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;COMBIN.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN EFFECTIVE-METHOD-FUNCTION ...). ;;; Note: ;;; in file COMBIN.LSP, position 2487 ;;; at (DEFUN EFFECTIVE-METHOD-FUNCTION ...) ;;; Checking type of #:LET7 to be LIST ;;; Note: ;;; in file COMBIN.LSP, position 2487 ;;; at (DEFUN EFFECTIVE-METHOD-FUNCTION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3) to be LIST ;;; Note: ;;; in file COMBIN.LSP, position 2487 ;;; at (DEFUN EFFECTIVE-METHOD-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL5 to be CONS ;;; Compiling (DEFUN COMBINE-METHOD-FUNCTIONS ...). ;;; Compiling (DEFMACRO CALL-METHOD ...). ;;; Note: ;;; in file COMBIN.LSP, position 3979 ;;; at (FSET 'CALL-METHOD ...) ;;; Checking type of #:LET23 to be LIST ;;; Note: ;;; in file COMBIN.LSP, position 3979 ;;; at (FSET 'CALL-METHOD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST19) to be LIST ;;; Note: ;;; in file COMBIN.LSP, position 3979 ;;; at (FSET 'CALL-METHOD ...) ;;; Checking type of #:LOOP-LIST-TAIL21 to be CONS ;;; Compiling (DEFUN CALL-NEXT-METHOD ...). ;;; Compiling (DEFUN NEXT-METHOD-P ...). ;;; Compiling (DEFUN ERROR-QUALIFIER ...). ;;; Compiling (DEFUN STANDARD-MAIN-EFFECTIVE-METHOD ...). ;;; Compiling (DEFUN STANDARD-COMPUTE-EFFECTIVE-METHOD ...). ;;; Compiling (DEFPARAMETER *METHOD-COMBINATIONS-LOCK* ...). ;;; Compiling (DEFPARAMETER *METHOD-COMBINATIONS* ...). ;;; Compiling (DEFUN SEARCH-METHOD-COMBINATION ...). ;;; Note: ;;; in file COMBIN.LSP, position 8442 ;;; at (DEFUN SEARCH-METHOD-COMBINATION ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK70) to be FIXNUM ;;; Compiling (DEFUN INSTALL-METHOD-COMBINATION ...). ;;; Note: ;;; in file COMBIN.LSP, position 8637 ;;; at (DEFUN INSTALL-METHOD-COMBINATION ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK86) to be FIXNUM ;;; Compiling (DEFUN MAKE-METHOD-COMBINATION ...). ;;; Compiling (DEFUN FIND-METHOD-COMBINATION ...). ;;; Style warning: ;;; in file COMBIN.LSP, position 9027 ;;; at (DEFUN FIND-METHOD-COMBINATION ...) ;;; ! The variable GF is not used. ;;; Compiling (DEFUN DEFINE-SIMPLE-METHOD-COMBINATION ...). ;;; Compiling (DEFUN DEFINE-COMPLEX-METHOD-COMBINATION ...). ;;; Compiling (DEFMACRO DEFINE-METHOD-COMBINATION ...). ;;; Compiling (DEFUN METHOD-COMBINATION-ERROR ...). ;;; Function METHOD-COMBINATION-ERROR proclaimed (1,65536) ;;; Compiling (DEFUN INVALID-METHOD-ERROR ...). ;;; Function INVALID-METHOD-ERROR proclaimed (2,65536) ;;; Compiling (DEFUN STD-COMPUTE-EFFECTIVE-METHOD ...). ;;; Function STD-COMPUTE-EFFECTIVE-METHOD proclaimed (3,3) ;;; Compiling (DEFUN COMPUTE-EFFECTIVE-METHOD-FUNCTION ...). ;;; Function COMPUTE-EFFECTIVE-METHOD-FUNCTION proclaimed (3,3) ;;; Compiling (DEFUN COMPUTE-EFFECTIVE-METHOD ...). ;;; End of Pass 1. ;;; Emitting code for EFFECTIVE-METHOD-FUNCTION. ;;; Emitting code for COMBINE-METHOD-FUNCTIONS. ;;; Emitting code for #:G8. ;;; Emitting code for CALL-METHOD. ;;; Emitting code for CALL-NEXT-METHOD. ;;; Emitting code for NEXT-METHOD-P. ;;; Emitting code for CALL-NEXT-METHOD. ;;; Emitting code for NEXT-METHOD-P. ;;; Emitting code for ERROR-QUALIFIER. ;;; Emitting code for STANDARD-MAIN-EFFECTIVE-METHOD. ;;; Emitting code for #:G30. ;;; Emitting code for STANDARD-COMPUTE-EFFECTIVE-METHOD. ;;; Emitting code for #:G66. ;;; Emitting code for SEARCH-METHOD-COMBINATION. ;;; Emitting code for INSTALL-METHOD-COMBINATION. ;;; Emitting code for MAKE-METHOD-COMBINATION. ;;; Emitting code for FIND-METHOD-COMBINATION. ;;; Emitting code for DEFINE-SIMPLE-METHOD-COMBINATION. ;;; Emitting code for DEFINE-COMPLEX-METHOD-COMBINATION. ;;; Emitting code for SYNTAX-ERROR. ;;; Emitting code for DEFINE-METHOD-COMBINATION. ;;; Emitting code for METHOD-COMBINATION-ERROR. ;;; Emitting code for INVALID-METHOD-ERROR. ;;; Emitting code for STD-COMPUTE-EFFECTIVE-METHOD. ;;; Emitting code for COMPUTE-EFFECTIVE-METHOD-FUNCTION. ;;; Emitting code for COMPUTE-EFFECTIVE-METHOD. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/combin.c -o clos/combin.o ;;; Finished compiling SRC:CLOS;COMBIN.LSP. ;;; (compile-file "src:clos;std-accessors.lsp" :output-file #P"BUILD:CLOS;STD-ACCESSORS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;STD-ACCESSORS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN SAFE-SLOT-DEFINITION-LOCATION ...). ;;; Style warning: ;;; in file STD-ACCESSORS.LSP, position 926 ;;; at (DEFUN SAFE-SLOT-DEFINITION-LOCATION ...) ;;; ! The variable DEFAULT is not used. ;;; Compiling (DEFUN STD-CLASS-SEALED-ACCESSORS ...). ;;; Compiling (DEFUN STD-CLASS-ACCESSORS ...). ;;; Compiling (DEFUN SAFE-ADD-METHOD ...). ;;; Compiling (DEFUN STD-CLASS-GENERATE-ACCESSORS ...). ;;; Compiling (DEFUN READER-CLOSURE ...). ;;; Compiling (DEFUN WRITER-CLOSURE ...). ;;; End of Pass 1. ;;; Emitting code for SAFE-SLOT-DEFINITION-LOCATION. ;;; Emitting code for STD-CLASS-SEALED-ACCESSORS. ;;; Emitting code for #:G0. ;;; Emitting code for #:G55. ;;; Emitting code for STD-CLASS-ACCESSORS. ;;; Emitting code for #:G110. ;;; Emitting code for #:G111. ;;; Emitting code for SAFE-ADD-METHOD. ;;; Emitting code for STD-CLASS-GENERATE-ACCESSORS. ;;; Emitting code for READER-CLOSURE. ;;; Emitting code for #:G137. ;;; Emitting code for WRITER-CLOSURE. ;;; Emitting code for #:G138. ;;; Emitting code for GENERATE-ACCESSORS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/std-accessors.c -o clos/std-accessors.o ;;; Finished compiling SRC:CLOS;STD-ACCESSORS.LSP. ;;; (compile-file "src:clos;defclass.lsp" :output-file #P"BUILD:CLOS;DEFCLASS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;DEFCLASS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN PARSE-DEFAULT-INITARGS ...). ;;; Compiling (DEFMACRO DEFCLASS ...). ;;; Compiling (DEFUN COMPRESS-SLOT-FORMS ...). ;;; Compiling (DEFUN UNCOMPRESS-SLOT-FORMS ...). ;;; Note: ;;; in file DEFCLASS.LSP, position 3341 ;;; at (DEFUN UNCOMPRESS-SLOT-FORMS ...) ;;; Checking type of #:LET48 to be LIST ;;; Note: ;;; in file DEFCLASS.LSP, position 3341 ;;; at (DEFUN UNCOMPRESS-SLOT-FORMS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST ;;; Note: ;;; in file DEFCLASS.LSP, position 3341 ;;; at (DEFUN UNCOMPRESS-SLOT-FORMS ...) ;;; Checking type of #:LOOP-LIST-TAIL46 to be CONS ;;; Compiling (DEFUN PROCESS-CLASS-OPTIONS ...). ;;; Compiling (DEFUN LOAD-DEFCLASS ...). ;;; Function LOAD-DEFCLASS proclaimed (4,4) ;;; Compiling (DEFUN ENSURE-CLASS ...). ;;; Function ENSURE-CLASS proclaimed (0,65536) ;;; End of Pass 1. ;;; Emitting code for PARSE-DEFAULT-INITARGS. ;;; Emitting code for DEFCLASS. ;;; Emitting code for COMPRESS-SLOT-FORMS. ;;; Emitting code for UNCOMPRESS-SLOT-FORMS. ;;; Emitting code for PROCESS-CLASS-OPTIONS. ;;; Emitting code for LOAD-DEFCLASS. ;;; Emitting code for ENSURE-CLASS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/defclass.c -o clos/defclass.o ;;; Finished compiling SRC:CLOS;DEFCLASS.LSP. ;;; (compile-file "src:clos;slotvalue.lsp" :output-file #P"BUILD:CLOS;SLOTVALUE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;SLOTVALUE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMETHOD CLASS-PROTOTYPE ...). ;;; Compiling (DEFUN SLOT-MAKUNBOUND ...). ;;; Function SLOT-MAKUNBOUND proclaimed (2,2) ;;; Compiling (DEFMETHOD SLOT-VALUE-USING-CLASS ...). ;;; Compiling (DEFMETHOD SLOT-BOUNDP-USING-CLASS ...). ;;; Compiling (DEFMETHOD (SETF SLOT-VALUE-USING-CLASS) ...). ;;; Compiling (DEFMETHOD SLOT-MAKUNBOUND-USING-CLASS ...). ;;; Compiling (DEFMETHOD SLOT-MISSING ...). ;;; Compiling (DEFMETHOD SLOT-UNBOUND ...). ;;; Compiling (DEFMETHOD SLOT-UNBOUND ...). ;;; Compiling (DEFMETHOD CLASS-NAME ...). ;;; Compiling (DEFMETHOD (SETF CLASS-NAME) ...). ;;; End of Pass 1. ;;; Emitting code for #:G6. ;;; Emitting code for SLOT-MAKUNBOUND. ;;; Emitting code for #:G10. ;;; Emitting code for #:G11. ;;; Emitting code for #:G18. ;;; Emitting code for #:G28. ;;; Emitting code for #:G32. ;;; Emitting code for #:G33. ;;; Emitting code for #:G34. ;;; Emitting code for #:G43. ;;; Emitting code for #:G44. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/slotvalue.c -o clos/slotvalue.o ;;; Finished compiling SRC:CLOS;SLOTVALUE.LSP. ;;; (compile-file "src:clos;standard.lsp" :output-file #P"BUILD:CLOS;STANDARD.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;STANDARD.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMETHOD INITIALIZE-INSTANCE ...). ;;; Compiling (DEFMETHOD REINITIALIZE-INSTANCE ...). ;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...). ;;; Compiling (DEFUN COMPUTE-INSTANCE-SIZE ...). ;;; Note: ;;; in file STANDARD.LSP, position 3547 ;;; at (DEFUN COMPUTE-INSTANCE-SIZE ...) ;;; Checking type of #:LET65 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 3547 ;;; at (DEFUN COMPUTE-INSTANCE-SIZE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST63) to be LIST ;;; Compiling (DEFMETHOD ALLOCATE-INSTANCE ...). ;;; Compiling (DEFMETHOD MAKE-INSTANCE ...). ;;; Compiling (DEFUN DELETE-KEYWORD ...). ;;; Compiling (DEFUN ADD-DEFAULT-INITARGS ...). ;;; Compiling (DEFMETHOD DIRECT-SLOT-DEFINITION-CLASS ...). ;;; Compiling (DEFMETHOD EFFECTIVE-SLOT-DEFINITION-CLASS ...). ;;; Compiling (DEFUN HAS-FORWARD-REFERENCED-PARENTS ...). ;;; Compiling (DEFUN FINALIZE-UNLESS-FORWARD ...). ;;; Compiling (DEFMETHOD INITIALIZE-INSTANCE ...). ;;; Note: ;;; in file STANDARD.LSP, position 6883 ;;; at (DEFMETHOD INITIALIZE-INSTANCE ...) ;;; Checking type of #:LET94 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 6883 ;;; at (DEFMETHOD INITIALIZE-INSTANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST90) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 6883 ;;; at (DEFMETHOD INITIALIZE-INSTANCE ...) ;;; Checking type of #:LOOP-LIST-TAIL92 to be CONS ;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...). ;;; Note: ;;; in file STANDARD.LSP, position 7260 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of #:LET106 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 7260 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST104) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 7260 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of #:LET111 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 7260 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST109) to be LIST ;;; Compiling (DEFUN PRECOMPUTE-VALID-INITARG-KEYWORDS ...). ;;; Note: ;;; in file STANDARD.LSP, position 8107 ;;; at (DEFUN PRECOMPUTE-VALID-INITARG-KEYWORDS ...) ;;; Checking type of #:LET118 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 8107 ;;; at (DEFUN PRECOMPUTE-VALID-INITARG-KEYWORDS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST114) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 8107 ;;; at (DEFUN PRECOMPUTE-VALID-INITARG-KEYWORDS ...) ;;; Checking type of #:G119 to be CONS ;;; Compiling (DEFUN UPDATE-DEPENDENTS ...). ;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...). ;;; Style warning: ;;; in file STANDARD.LSP, position 8945 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; ! Variable INITARGS, declared as IGNORE, found in a lisp form. ;;; Compiling (DEFMETHOD ADD-DIRECT-SUBCLASS ...). ;;; Compiling (DEFMETHOD REMOVE-DIRECT-SUBCLASS ...). ;;; Compiling (DEFUN CHECK-DIRECT-SUPERCLASSES ...). ;;; Note: ;;; in file STANDARD.LSP, position 9663 ;;; at (DEFUN CHECK-DIRECT-SUPERCLASSES ...) ;;; Checking type of #:LET163 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 9663 ;;; at (DEFUN CHECK-DIRECT-SUPERCLASSES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST161) to be LIST ;;; Compiling (DEFMETHOD VALIDATE-SUPERCLASS ...). ;;; Compiling (DEFUN FORWARD-REFERENCED-CLASS-P ...). ;;; Compiling (DEFMETHOD FINALIZE-INHERITANCE ...). ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of #:LET217 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST213) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of #:LOOP-LIST-TAIL215 to be CONS ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of #:LET220 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST218) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of #:LET223 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST221) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of #:LET227 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST225) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of #:LET241 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 11553 ;;; at (DEFMETHOD FINALIZE-INHERITANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST239) to be LIST ;;; Compiling (DEFMETHOD FINALIZE-INHERITANCE ...). ;;; Compiling (DEFMETHOD COMPUTE-CLASS-PRECEDENCE-LIST ...). ;;; Compiling (DEFMETHOD COMPUTE-SLOTS ...). ;;; Note: ;;; in file STANDARD.LSP, position 16058 ;;; at (DEFMETHOD COMPUTE-SLOTS ...) ;;; Checking type of #:LET272 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 16058 ;;; at (DEFMETHOD COMPUTE-SLOTS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST268) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 16058 ;;; at (DEFMETHOD COMPUTE-SLOTS ...) ;;; Checking type of #:LOOP-LIST-TAIL270 to be CONS ;;; Note: ;;; in file STANDARD.LSP, position 16058 ;;; at (DEFMETHOD COMPUTE-SLOTS ...) ;;; Checking type of #:LET279 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 16058 ;;; at (DEFMETHOD COMPUTE-SLOTS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST275) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 16058 ;;; at (DEFMETHOD COMPUTE-SLOTS ...) ;;; Checking type of #:LOOP-LIST-TAIL277 to be CONS ;;; Compiling (DEFUN SLOT-DEFINITION-TO-PLIST ...). ;;; Compiling (DEFUN SAFE-SLOT-DEFINITION-LOCATION ...). ;;; Compiling (DEFMETHOD COMPUTE-EFFECTIVE-SLOT-DEFINITION ...). ;;; Compiling (DEFMETHOD COMPUTE-DEFAULT-INITARGS ...). ;;; Note: ;;; in file STANDARD.LSP, position 20332 ;;; at (DEFMETHOD COMPUTE-DEFAULT-INITARGS ...) ;;; Checking type of #:LET369 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 20332 ;;; at (DEFMETHOD COMPUTE-DEFAULT-INITARGS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST365) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 20332 ;;; at (DEFMETHOD COMPUTE-DEFAULT-INITARGS ...) ;;; Checking type of #:LOOP-LIST-TAIL367 to be CONS ;;; Compiling (DEFMETHOD ENSURE-CLASS-USING-CLASS ...). ;;; Compiling (DEFUN COERCE-TO-CLASS ...). ;;; Compiling (DEFUN HELP-ENSURE-CLASS ...). ;;; Note: ;;; in file STANDARD.LSP, position 22439 ;;; at (DEFUN HELP-ENSURE-CLASS ...) ;;; Checking type of #:LET393 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 22439 ;;; at (DEFUN HELP-ENSURE-CLASS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST389) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 22439 ;;; at (DEFUN HELP-ENSURE-CLASS ...) ;;; Checking type of #:LOOP-LIST-TAIL391 to be CONS ;;; Compiling (DEFUN CLASS-COMPUTE-SLOTS ...). ;;; Note: ;;; in file STANDARD.LSP, position 23058 ;;; at (DEFUN CLASS-COMPUTE-SLOTS ...) ;;; Checking type of #:LET396 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 23058 ;;; at (DEFUN CLASS-COMPUTE-SLOTS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST394) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 23058 ;;; at (DEFUN CLASS-COMPUTE-SLOTS ...) ;;; Checking type of #:LET403 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 23058 ;;; at (DEFUN CLASS-COMPUTE-SLOTS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST401) to be LIST ;;; Compiling (DEFMETHOD COMPUTE-SLOTS ...). ;;; Compiling (DEFUN STD-CLASS-COMPUTE-SLOTS ...). ;;; Compiling (DEFMETHOD COMPUTE-SLOTS ...). ;;; Compiling (DEFMETHOD DESCRIBE-OBJECT ...). ;;; Compiling (DEFUN VALID-KEYWORDS-FROM-METHODS ...). ;;; Note: ;;; in file STANDARD.LSP, position 27833 ;;; at (DEFUN VALID-KEYWORDS-FROM-METHODS ...) ;;; Checking type of #:LET453 to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 27833 ;;; at (DEFUN VALID-KEYWORDS-FROM-METHODS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST449) to be LIST ;;; Note: ;;; in file STANDARD.LSP, position 27833 ;;; at (DEFUN VALID-KEYWORDS-FROM-METHODS ...) ;;; Checking type of #:G459 to be CONS ;;; Compiling (DEFUN CHECK-INITARGS ...). ;;; Compiling (DEFMETHOD DESCRIBE-OBJECT ...). ;;; Note: ;;; in file STANDARD.LSP, position 29720 ;;; at (DEFMETHOD DESCRIBE-OBJECT ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; End of Pass 1. ;;; Emitting code for #:G0. ;;; Emitting code for #:G1. ;;; Emitting code for #:G42. ;;; Emitting code for COMPUTE-INSTANCE-SIZE. ;;; Emitting code for #:G69. ;;; Emitting code for #:G72. ;;; Emitting code for DELETE-KEYWORD. ;;; Emitting code for ADD-DEFAULT-INITARGS. ;;; Emitting code for #:G81. ;;; Emitting code for #:G82. ;;; Emitting code for HAS-FORWARD-REFERENCED-PARENTS. ;;; Emitting code for FINALIZE-UNLESS-FORWARD. ;;; Emitting code for #:G89. ;;; Emitting code for CALL-NEXT-METHOD. ;;; Emitting code for #:G103. ;;; Emitting code for CALL-NEXT-METHOD. ;;; Emitting code for PRECOMPUTE-VALID-INITARG-KEYWORDS. ;;; Emitting code for UPDATE-DEPENDENTS. ;;; Emitting code for #:G121. ;;; Emitting code for #:G136. ;;; Emitting code for #:G150. ;;; Emitting code for #:G158. ;;; Emitting code for CHECK-DIRECT-SUPERCLASSES. ;;; Emitting code for #:G166. ;;; Emitting code for FORWARD-REFERENCED-CLASS-P. ;;; Emitting code for #:G200. ;;; Emitting code for #:G256. ;;; Emitting code for #:G257. ;;; Emitting code for #:G265. ;;; Emitting code for SLOT-DEFINITION-TO-PLIST. ;;; Emitting code for SAFE-SLOT-DEFINITION-LOCATION. ;;; Emitting code for #:G347. ;;; Emitting code for COMBINE-SLOTDS. ;;; Emitting code for DIRECT-TO-EFFECTIVE. ;;; Emitting code for #:G362. ;;; Emitting code for #:G376. ;;; Emitting code for COERCE-TO-CLASS. ;;; Emitting code for HELP-ENSURE-CLASS. ;;; Emitting code for CLASS-COMPUTE-SLOTS. ;;; Emitting code for #:G412. ;;; Emitting code for STD-CLASS-COMPUTE-SLOTS. ;;; Emitting code for #:G440. ;;; Emitting code for #:G441. ;;; Emitting code for VALID-KEYWORDS-FROM-METHODS. ;;; Emitting code for CHECK-INITARGS. ;;; Emitting code for #:G479. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/standard.c -o clos/standard.o ;;; Finished compiling SRC:CLOS;STANDARD.LSP. ;;; (compile-file "src:clos;builtin.lsp" :output-file #P"BUILD:CLOS;BUILTIN.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;BUILTIN.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMETHOD MAKE-INSTANCE ...). ;;; Compiling (DEFMETHOD ENSURE-CLASS-USING-CLASS ...). ;;; Compiling (DEFMETHOD CHANGE-CLASS ...). ;;; Compiling (DEFMETHOD MAKE-INSTANCES-OBSOLETE ...). ;;; Compiling (DEFMETHOD MAKE-INSTANCE ...). ;;; Compiling (DEFMETHOD SLOT-MAKUNBOUND-USING-CLASS ...). ;;; Compiling (DEFMETHOD SLOT-BOUNDP-USING-CLASS ...). ;;; Compiling (DEFMETHOD SLOT-VALUE-USING-CLASS ...). ;;; Compiling (DEFMETHOD (SETF SLOT-VALUE-USING-CLASS) ...). ;;; Compiling (DEFMETHOD SLOT-EXISTS-P-USING-CLASS ...). ;;; Compiling (DEFMETHOD ALLOCATE-INSTANCE ...). ;;; Compiling (DEFMETHOD FINALIZE-INHERITANCE ...). ;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Note: ;;; in file BUILTIN.LSP, position 3566 ;;; at (DEFMETHOD PRINT-OBJECT ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; End of Pass 1. ;;; Emitting code for #:G0. ;;; Emitting code for #:G7. ;;; Emitting code for #:G11. ;;; Emitting code for #:G12. ;;; Emitting code for #:G13. ;;; Emitting code for #:G14. ;;; Emitting code for #:G15. ;;; Emitting code for #:G16. ;;; Emitting code for #:G17. ;;; Emitting code for #:G18. ;;; Emitting code for #:G19. ;;; Emitting code for #:G20. ;;; Emitting code for #:G24. ;;; Emitting code for #:G25. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/builtin.c -o clos/builtin.o ;;; Finished compiling SRC:CLOS;BUILTIN.LSP. ;;; (compile-file "src:clos;change.lsp" :output-file #P"BUILD:CLOS;CHANGE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;CHANGE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...). ;;; Note: ;;; in file CHANGE.LSP, position 1382 ;;; at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...) ;;; Checking type of #:LET12 to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 1382 ;;; at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST8) to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 1382 ;;; at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...) ;;; Checking type of #:LOOP-LIST-TAIL10 to be CONS ;;; Note: ;;; in file CHANGE.LSP, position 1382 ;;; at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...) ;;; Checking type of #:LET19 to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 1382 ;;; at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST15) to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 1382 ;;; at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...) ;;; Checking type of #:LOOP-LIST-TAIL17 to be CONS ;;; Compiling (DEFMETHOD CHANGE-CLASS ...). ;;; Compiling (DEFMETHOD CHANGE-CLASS ...). ;;; Compiling (DEFMETHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS ...). ;;; Compiling (DEFMETHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS ...). ;;; Style warning: ;;; in file CHANGE.LSP, position 5864 ;;; at (DEFMETHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS ...) ;;; ! The variable INITARGS is not used. ;;; Compiling (DEFUN UPDATE-INSTANCE ...). ;;; Note: ;;; in file CHANGE.LSP, position 6520 ;;; at (DEFUN UPDATE-INSTANCE ...) ;;; Checking type of #:LET323 to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 6520 ;;; at (DEFUN UPDATE-INSTANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST319) to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 6520 ;;; at (DEFUN UPDATE-INSTANCE ...) ;;; Checking type of #:LOOP-LIST-TAIL321 to be CONS ;;; Note: ;;; in file CHANGE.LSP, position 6520 ;;; at (DEFUN UPDATE-INSTANCE ...) ;;; Checking type of #:LET330 to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 6520 ;;; at (DEFUN UPDATE-INSTANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST326) to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 6520 ;;; at (DEFUN UPDATE-INSTANCE ...) ;;; Checking type of #:LOOP-LIST-TAIL328 to be CONS ;;; Note: ;;; in file CHANGE.LSP, position 6520 ;;; at (DEFUN UPDATE-INSTANCE ...) ;;; Checking type of (+ NEW-I #:G340) to be FIXNUM ;;; Compiling (DEFMETHOD REINITIALIZE-INSTANCE ...). ;;; Note: ;;; in file CHANGE.LSP, position 8459 ;;; at (DEFMETHOD REINITIALIZE-INSTANCE ...) ;;; Checking type of #:LET373 to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 8459 ;;; at (DEFMETHOD REINITIALIZE-INSTANCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST369) to be LIST ;;; Note: ;;; in file CHANGE.LSP, position 8459 ;;; at (DEFMETHOD REINITIALIZE-INSTANCE ...) ;;; Checking type of #:LOOP-LIST-TAIL371 to be CONS ;;; Style warning: ;;; in file CHANGE.LSP, position 8459 ;;; at (DEFMETHOD REINITIALIZE-INSTANCE ...) ;;; ! The variable INITARGS is not used. ;;; Compiling (DEFMETHOD MAKE-INSTANCES-OBSOLETE ...). ;;; Compiling (DEFUN REMOVE-OPTIONAL-SLOT-ACCESSORS ...). ;;; End of Pass 1. ;;; Emitting code for #:G2. ;;; Emitting code for #:G32. ;;; Emitting code for #:G39. ;;; Emitting code for #:G40. ;;; Emitting code for #:G257. ;;; Emitting code for UPDATE-INSTANCE. ;;; Emitting code for #:G365. ;;; Emitting code for #:G389. ;;; Emitting code for REMOVE-OPTIONAL-SLOT-ACCESSORS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/change.c -o clos/change.o ;;; Finished compiling SRC:CLOS;CHANGE.LSP. ;;; (compile-file "src:clos;stdmethod.lsp" :output-file #P"BUILD:CLOS;STDMETHOD.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;STDMETHOD.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN FUNCTION-KEYWORDS ...). ;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...). ;;; Note: ;;; in file STDMETHOD.LSP, position 1145 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of #:LET14 to be LIST ;;; Note: ;;; in file STDMETHOD.LSP, position 1145 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST12) to be LIST ;;; Style warning: ;;; in file STDMETHOD.LSP, position 1145 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; ! The variable GENERIC-FUNCTION is not used. ;;; Compiling (DEFPARAMETER *EQL-SPECIALIZER-LOCK* ...). ;;; Compiling (DEFPARAMETER *EQL-SPECIALIZER-HASH* ...). ;;; Compiling (DEFUN INTERN-EQL-SPECIALIZER ...). ;;; Note: ;;; in file STDMETHOD.LSP, position 2373 ;;; at (DEFUN INTERN-EQL-SPECIALIZER ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK18) to be FIXNUM ;;; Compiling (DEFMETHOD ADD-DIRECT-METHOD ...). ;;; Compiling (DEFMETHOD REMOVE-DIRECT-METHOD ...). ;;; Compiling (DEFMETHOD REMOVE-DIRECT-METHOD ...). ;;; Note: ;;; in file STDMETHOD.LSP, position 3324 ;;; at (DEFMETHOD REMOVE-DIRECT-METHOD ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK108) to be FIXNUM ;;; End of Pass 1. ;;; Emitting code for FUNCTION-KEYWORDS. ;;; Emitting code for #:G11. ;;; Emitting code for INTERN-EQL-SPECIALIZER. ;;; Emitting code for #:G49. ;;; Emitting code for #:G64. ;;; Emitting code for #:G107. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/stdmethod.c -o clos/stdmethod.o ;;; Finished compiling SRC:CLOS;STDMETHOD.LSP. ;;; (compile-file "src:clos;generic.lsp" :output-file #P"BUILD:CLOS;GENERIC.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;GENERIC.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO DEFGENERIC ...). ;;; Note: ;;; in file GENERIC.LSP, position 651 ;;; at (FSET 'DEFGENERIC ...) ;;; Checking type of #:LET34 to be LIST ;;; Note: ;;; in file GENERIC.LSP, position 651 ;;; at (FSET 'DEFGENERIC ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST30) to be LIST ;;; Note: ;;; in file GENERIC.LSP, position 651 ;;; at (FSET 'DEFGENERIC ...) ;;; Checking type of #:LOOP-LIST-TAIL32 to be CONS ;;; Note: ;;; in file GENERIC.LSP, position 651 ;;; at (FSET 'DEFGENERIC ...) ;;; Checking type of #:LET39 to be LIST ;;; Note: ;;; in file GENERIC.LSP, position 651 ;;; at (FSET 'DEFGENERIC ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST35) to be LIST ;;; Note: ;;; in file GENERIC.LSP, position 651 ;;; at (FSET 'DEFGENERIC ...) ;;; Checking type of #:LOOP-LIST-TAIL37 to be CONS ;;; Compiling (DEFUN PARSE-DEFGENERIC ...). ;;; Compiling (DEFUN PARSE-GENERIC-OPTIONS ...). ;;; Compiling (DEFUN PARSE-LAMBDA-LIST ...). ;;; Compiling (DEFUN VALID-DECLARATION-P ...). ;;; Note: ;;; in file GENERIC.LSP, position 4442 ;;; at (DEFUN VALID-DECLARATION-P ...) ;;; Checking type of #:LET55 to be LIST ;;; Note: ;;; in file GENERIC.LSP, position 4442 ;;; at (DEFUN VALID-DECLARATION-P ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST53) to be LIST ;;; Compiling (DEFUN LAMBDA-LIST-REQUIRED-ARGUMENTS ...). ;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...). ;;; Note: ;;; in file GENERIC.LSP, position 5005 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of #:LET75 to be LIST ;;; Note: ;;; in file GENERIC.LSP, position 5005 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST71) to be LIST ;;; Note: ;;; in file GENERIC.LSP, position 5005 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; Checking type of #:LOOP-LIST-TAIL73 to be CONS ;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...). ;;; Style warning: ;;; in file GENERIC.LSP, position 8156 ;;; at (DEFMETHOD SHARED-INITIALIZE ...) ;;; ! Variable INITARGS, declared as IGNORE, found in a lisp form. ;;; Compiling (DEFUN ASSOCIATE-METHODS-TO-GFUN ...). ;;; Function ASSOCIATE-METHODS-TO-GFUN proclaimed (0,65536) ;;; Compiling (DEFMETHOD ENSURE-GENERIC-FUNCTION-USING-CLASS ...). ;;; Compiling (DEFMETHOD ENSURE-GENERIC-FUNCTION-USING-CLASS ...). ;;; Compiling (DEFUN ENSURE-GENERIC-FUNCTION ...). ;;; End of Pass 1. ;;; Emitting code for DEFGENERIC. ;;; Emitting code for PARSE-DEFGENERIC. ;;; Emitting code for PARSE-GENERIC-OPTIONS. ;;; Emitting code for PARSE-LAMBDA-LIST. ;;; Emitting code for VALID-DECLARATION-P. ;;; Emitting code for LAMBDA-LIST-REQUIRED-ARGUMENTS. ;;; Emitting code for #:G64. ;;; Emitting code for #:G68. ;;; Emitting code for #:G80. ;;; Emitting code for ASSOCIATE-METHODS-TO-GFUN. ;;; Emitting code for #:G111. ;;; Emitting code for #:G146. ;;; Emitting code for ENSURE-GENERIC-FUNCTION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/generic.c -o clos/generic.o ;;; Finished compiling SRC:CLOS;GENERIC.LSP. ;;; (compile-file "src:clos;fixup.lsp" :output-file #P"BUILD:CLOS;FIXUP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;FIXUP.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMETHOD READER-METHOD-CLASS ...). ;;; Compiling (DEFMETHOD WRITER-METHOD-CLASS ...). ;;; Compiling (DEFUN REGISTER-METHOD-WITH-SPECIALIZERS ...). ;;; Note: ;;; in file FIXUP.LSP, position 2281 ;;; at (DEFUN REGISTER-METHOD-WITH-SPECIALIZERS ...) ;;; Checking type of #:LET6 to be LIST ;;; Note: ;;; in file FIXUP.LSP, position 2281 ;;; at (DEFUN REGISTER-METHOD-WITH-SPECIALIZERS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4) to be LIST ;;; Compiling (DEFUN METHOD-P ...). ;;; Compiling (DEFUN MAKE-METHOD ...). ;;; Compiling (DEFUN ALL-KEYWORDS ...). ;;; Compiling (DEFUN CONGRUENT-LAMBDA-P ...). ;;; Compiling (DEFUN ADD-METHOD ...). ;;; Compiling (DEFUN FUNCTION-TO-METHOD ...). ;;; Compiling (DEFUN REMOVE-METHOD ...). ;;; Note: ;;; in file FIXUP.LSP, position 8303 ;;; at (DEFUN REMOVE-METHOD ...) ;;; Checking type of #:LET39 to be LIST ;;; Note: ;;; in file FIXUP.LSP, position 8303 ;;; at (DEFUN REMOVE-METHOD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST37) to be LIST ;;; Compiling (DEFMETHOD AUX-COMPUTE-APPLICABLE-METHODS ...). ;;; Compiling (DEFMETHOD COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...). ;;; Compiling (DEFMETHOD NO-APPLICABLE-METHOD ...). ;;; Note: ;;; in file FIXUP.LSP, position 10282 ;;; at (DEFMETHOD NO-APPLICABLE-METHOD ...) ;;; Checking type of #:LET53 to be LIST ;;; Note: ;;; in file FIXUP.LSP, position 10282 ;;; at (DEFMETHOD NO-APPLICABLE-METHOD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST49) to be LIST ;;; Note: ;;; in file FIXUP.LSP, position 10282 ;;; at (DEFMETHOD NO-APPLICABLE-METHOD ...) ;;; Checking type of #:LOOP-LIST-TAIL51 to be CONS ;;; Compiling (DEFMETHOD NO-NEXT-METHOD ...). ;;; Compiling (DEFUN NO-PRIMARY-METHOD ...). ;;; Compiling (DEFUN SETF-FIND-CLASS ...). ;;; Compiling (DEFMETHOD ADD-DEPENDENT ...). ;;; Compiling (DEFMETHOD ADD-DEPENDENT ...). ;;; Compiling (DEFMETHOD REMOVE-DEPENDENT ...). ;;; Compiling (DEFMETHOD REMOVE-DEPENDENT ...). ;;; Compiling (DEFMETHOD MAP-DEPENDENTS ...). ;;; Compiling (DEFMETHOD MAP-DEPENDENTS ...). ;;; Compiling (DEFGENERIC UPDATE-DEPENDENT ...). ;;; Compiling (DEFCLASS INITARGS-UPDATER ...). ;;; Compiling (DEFUN RECURSIVELY-UPDATE-CLASSES ...). ;;; Note: ;;; in file FIXUP.LSP, position 12541 ;;; at (DEFUN RECURSIVELY-UPDATE-CLASSES ...) ;;; Checking type of #:LET113 to be LIST ;;; Note: ;;; in file FIXUP.LSP, position 12541 ;;; at (DEFUN RECURSIVELY-UPDATE-CLASSES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST111) to be LIST ;;; Compiling (DEFMETHOD UPDATE-DEPENDENT ...). ;;; End of Pass 1. ;;; Style warning: ;;; in file fixup.lsp, position 2448 ;;; at (DOLIST (METHOD-INFO *EARLY-METHODS* ...) ...) ;;; ! The argument 1 of function FIND-CLASS has type ;;; NIL ;;; instead of expected ;;; SYMBOL ;;; Emitting code for #:G0. ;;; Emitting code for #:G2. ;;; Emitting code for REGISTER-METHOD-WITH-SPECIALIZERS. ;;; Emitting code for METHOD-P. ;;; Emitting code for MAKE-METHOD. ;;; Emitting code for ALL-KEYWORDS. ;;; Emitting code for CONGRUENT-LAMBDA-P. ;;; Emitting code for ADD-METHOD. ;;; Emitting code for FUNCTION-TO-METHOD. ;;; Emitting code for REMOVE-METHOD. ;;; Emitting code for #:G40. ;;; Emitting code for #:G45. ;;; Emitting code for #:G46. ;;; Emitting code for #:G54. ;;; Emitting code for NO-PRIMARY-METHOD. ;;; Emitting code for SETF-FIND-CLASS. ;;; Emitting code for #:G71. ;;; Emitting code for #:G81. ;;; Emitting code for #:G89. ;;; Emitting code for #:G96. ;;; Emitting code for #:G99. ;;; Emitting code for #:G103. ;;; Emitting code for RECURSIVELY-UPDATE-CLASSES. ;;; Emitting code for #:G114. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/fixup.c -o clos/fixup.o ;;; Finished compiling SRC:CLOS;FIXUP.LSP. ;;; (compile-file "src:clos;conditions.lsp" :output-file #P"BUILD:CLOS;CONDITIONS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;CONDITIONS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO UNIQUE-ID ...). ;;; Compiling (DEFPARAMETER *RESTART-CLUSTERS* ...). ;;; Compiling (DEFPARAMETER *CONDITION-RESTARTS* ...). ;;; Compiling (DEFUN COMPUTE-RESTARTS ...). ;;; Function COMPUTE-RESTARTS proclaimed (0,1) ;;; Compiling (DEFUN RESTART-PRINT ...). ;;; Compiling (DEFSTRUCT (RESTART #) ...). ;;; Compiling (DEFUN RESTART-REPORT ...). ;;; Compiling (DEFUN BIND-SIMPLE-RESTARTS ...). ;;; Note: ;;; in file CONDITIONS.LSP, position 2695 ;;; at (DEFUN BIND-SIMPLE-RESTARTS ...) ;;; Checking type of #:LET22 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 2695 ;;; at (DEFUN BIND-SIMPLE-RESTARTS ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST18) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 2695 ;;; at (DEFUN BIND-SIMPLE-RESTARTS ...) ;;; Checking type of #:LOOP-LIST-TAIL20 to be CONS ;;; Function BIND-SIMPLE-RESTARTS proclaimed (2,2) ;;; Compiling (DEFUN BIND-SIMPLE-HANDLERS ...). ;;; Note: ;;; in file CONDITIONS.LSP, position 3153 ;;; at (DEFUN BIND-SIMPLE-HANDLERS ...) ;;; Checking type of #:LET28 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 3153 ;;; at (DEFUN BIND-SIMPLE-HANDLERS ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST24) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 3153 ;;; at (DEFUN BIND-SIMPLE-HANDLERS ...) ;;; Checking type of #:LOOP-LIST-TAIL26 to be CONS ;;; Function BIND-SIMPLE-HANDLERS proclaimed (2,2) ;;; Compiling (DEFMACRO RESTART-BIND ...). ;;; Note: ;;; in file CONDITIONS.LSP, position 3501 ;;; at (FSET 'RESTART-BIND ...) ;;; Checking type of #:LET43 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 3501 ;;; at (FSET 'RESTART-BIND ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST38) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 3501 ;;; at (FSET 'RESTART-BIND ...) ;;; Checking type of #:LOOP-LIST-TAIL40 to be CONS ;;; Compiling (DEFUN FIND-RESTART ...). ;;; Function FIND-RESTART proclaimed (1,2) ;;; Compiling (DEFUN FIND-RESTART-NEVER-FAIL ...). ;;; Compiling (DEFUN INVOKE-RESTART ...). ;;; Function INVOKE-RESTART proclaimed (1,65536) ;;; Compiling (DEFUN INVOKE-RESTART-INTERACTIVELY ...). ;;; Function INVOKE-RESTART-INTERACTIVELY proclaimed (1,1) ;;; Compiling (DEFMACRO RESTART-CASE ...). ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of #:LET62 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST54) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of #:LOOP-LIST-TAIL56 to be CONS ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of #:LET71 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST66) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of #:LOOP-LIST-TAIL68 to be CONS ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of #:LET79 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST74) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 4934 ;;; at (FSET 'RESTART-CASE ...) ;;; Checking type of #:G80 to be CONS ;;; Compiling (DEFMACRO WITH-SIMPLE-RESTART ...). ;;; Compiling (DEFMACRO WITH-CONDITION-RESTARTS ...). ;;; Compiling (DEFCLASS CONDITION ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFMACRO DEFINE-CONDITION ...). ;;; Compiling (DEFUN FIND-SUBCLASSES-OF-TYPE ...). ;;; Note: ;;; in file CONDITIONS.LSP, position 11480 ;;; at (DEFUN FIND-SUBCLASSES-OF-TYPE ...) ;;; Checking type of #:LET140 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 11480 ;;; at (DEFUN FIND-SUBCLASSES-OF-TYPE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST136) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 11480 ;;; at (DEFUN FIND-SUBCLASSES-OF-TYPE ...) ;;; Checking type of #:G141 to be CONS ;;; Compiling (DEFUN MAKE-CONDITION ...). ;;; Function MAKE-CONDITION proclaimed (1,65536) ;;; Compiling (DEFPARAMETER *HANDLER-CLUSTERS* ...). ;;; Compiling (DEFMACRO HANDLER-BIND ...). ;;; Note: ;;; in file CONDITIONS.LSP, position 15384 ;;; at (FSET 'HANDLER-BIND ...) ;;; Checking type of #:LET158 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 15384 ;;; at (FSET 'HANDLER-BIND ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST153) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 15384 ;;; at (FSET 'HANDLER-BIND ...) ;;; Checking type of #:LOOP-LIST-TAIL155 to be CONS ;;; Compiling (DEFUN SIGNAL ...). ;;; Compiling (DEFUN COERCE-TO-CONDITION ...). ;;; Compiling (DEFUN BREAK ...). ;;; Compiling (DEFUN WARN ...). ;;; Compiling (DEFINE-CONDITION WARNING ...). ;;; Compiling (DEFINE-CONDITION SERIOUS-CONDITION ...). ;;; Compiling (DEFINE-CONDITION ERROR ...). ;;; Compiling (DEFINE-CONDITION SIMPLE-CONDITION ...). ;;; Compiling (DEFINE-CONDITION SIMPLE-WARNING ...). ;;; Compiling (DEFINE-CONDITION STYLE-WARNING ...). ;;; Compiling (DEFINE-CONDITION SIMPLE-STYLE-WARNING ...). ;;; Compiling (DEFINE-CONDITION SIMPLE-ERROR ...). ;;; Compiling (DEFINE-CONDITION STORAGE-CONDITION ...). ;;; Compiling (DEFINE-CONDITION SEGMENTATION-VIOLATION ...). ;;; Compiling (DEFINE-CONDITION STACK-OVERFLOW ...). ;;; Compiling (DEFINE-CONDITION STORAGE-EXHAUSTED ...). ;;; Compiling (DEFINE-CONDITION ILLEGAL-INSTRUCTION ...). ;;; Compiling (DEFINE-CONDITION UNIX-SIGNAL-RECEIVED ...). ;;; Compiling (DEFINE-CONDITION TYPE-ERROR ...). ;;; Compiling (DEFINE-CONDITION SIMPLE-TYPE-ERROR ...). ;;; Compiling (DEFINE-CONDITION CASE-FAILURE ...). ;;; Compiling (DEFINE-CONDITION PROGRAM-ERROR ...). ;;; Compiling (DEFINE-CONDITION CONTROL-ERROR ...). ;;; Compiling (DEFINE-CONDITION STREAM-ERROR ...). ;;; Compiling (DEFINE-CONDITION END-OF-FILE ...). ;;; Compiling (DEFINE-CONDITION FILE-ERROR ...). ;;; Compiling (DEFINE-CONDITION PACKAGE-ERROR ...). ;;; Compiling (DEFINE-CONDITION CELL-ERROR ...). ;;; Compiling (DEFINE-CONDITION UNBOUND-VARIABLE ...). ;;; Compiling (DEFINE-CONDITION UNBOUND-SLOT ...). ;;; Compiling (DEFINE-CONDITION UNDEFINED-FUNCTION ...). ;;; Compiling (DEFINE-CONDITION ARITHMETIC-ERROR ...). ;;; Compiling (DEFINE-CONDITION DIVISION-BY-ZERO ...). ;;; Compiling (DEFINE-CONDITION FLOATING-POINT-OVERFLOW ...). ;;; Compiling (DEFINE-CONDITION FLOATING-POINT-UNDERFLOW ...). ;;; Compiling (DEFINE-CONDITION FLOATING-POINT-INEXACT ...). ;;; Compiling (DEFINE-CONDITION FLOATING-POINT-INVALID-OPERATION ...). ;;; Compiling (DEFINE-CONDITION ABORT-FAILURE ...). ;;; Compiling (DEFINE-CONDITION PRINT-NOT-READABLE ...). ;;; Compiling (DEFINE-CONDITION PARSE-ERROR ...). ;;; Compiling (DEFINE-CONDITION READER-ERROR ...). ;;; Compiling (DEFINE-CONDITION FORMAT-ERROR ...). ;;; Compiling (DEFINE-CONDITION INTERACTIVE-INTERRUPT ...). ;;; Compiling (DEFUN SIGNAL-SIMPLE-ERROR ...). ;;; Function SIGNAL-SIMPLE-ERROR proclaimed (0,65536) ;;; Compiling (DEFMACRO HANDLER-CASE ...). ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of #:LET221 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST216) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of #:LOOP-LIST-TAIL218 to be CONS ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of #:LET229 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST224) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of #:LOOP-LIST-TAIL226 to be CONS ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of #:LET237 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST232) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 27091 ;;; at (FSET 'HANDLER-CASE ...) ;;; Checking type of #:G238 to be CONS ;;; Compiling (DEFMACRO IGNORE-ERRORS ...). ;;; Compiling (DEFUN ABORT ...). ;;; Function ABORT proclaimed (0,1) ;;; Compiling (DEFUN CONTINUE ...). ;;; Function CONTINUE proclaimed (0,1) ;;; Compiling (DEFUN MUFFLE-WARNING ...). ;;; Function MUFFLE-WARNING proclaimed (0,1) ;;; Compiling (DEFUN STORE-VALUE ...). ;;; Function STORE-VALUE proclaimed (1,2) ;;; Compiling (DEFUN USE-VALUE ...). ;;; Function USE-VALUE proclaimed (1,2) ;;; Compiling (DEFUN ASSERT-REPORT ...). ;;; Compiling (DEFUN ASSERT-PROMPT ...). ;;; Compiling (DEFUN ASSERT-FAILURE ...). ;;; Note: ;;; in file CONDITIONS.LSP, position 30746 ;;; at (DEFUN ASSERT-FAILURE ...) ;;; Checking type of #:LET259 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 30746 ;;; at (DEFUN ASSERT-FAILURE ...) ;;; Checking type of #:LET261 to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 30746 ;;; at (DEFUN ASSERT-FAILURE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST254) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 30746 ;;; at (DEFUN ASSERT-FAILURE ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST255) to be LIST ;;; Note: ;;; in file CONDITIONS.LSP, position 30746 ;;; at (DEFUN ASSERT-FAILURE ...) ;;; Checking type of #:LOOP-LIST-TAIL257 to be CONS ;;; Function ASSERT-FAILURE proclaimed (0,65536) ;;; Compiling (DEFUN UNIVERSAL-ERROR-HANDLER ...). ;;; Compiling (DEFUN STACK-ERROR-HANDLER ...). ;;; Compiling (DEFUN TPL-CONTINUE-COMMAND ...). ;;; End of Pass 1. ;;; Emitting code for UNIQUE-ID. ;;; Emitting code for COMPUTE-RESTARTS. ;;; Emitting code for RESTART-PRINT. ;;; Emitting code for MAKE-RESTART. ;;; Emitting code for RESTART-REPORT. ;;; Emitting code for BIND-SIMPLE-RESTARTS. ;;; Emitting code for SIMPLE-RESTART-FUNCTION. ;;; Emitting code for #:G17. ;;; Emitting code for BIND-SIMPLE-HANDLERS. ;;; Emitting code for SIMPLE-HANDLER-FUNCTION. ;;; Emitting code for #:G23. ;;; Emitting code for RESTART-BIND. ;;; Emitting code for #:G41. ;;; Emitting code for FIND-RESTART. ;;; Emitting code for FIND-RESTART-NEVER-FAIL. ;;; Emitting code for INVOKE-RESTART. ;;; Emitting code for INVOKE-RESTART-INTERACTIVELY. ;;; Emitting code for RESTART-CASE. ;;; Emitting code for TRANSFORM-KEYWORDS. ;;; Emitting code for #:G57. ;;; Emitting code for #:G69. ;;; Emitting code for #:G77. ;;; Emitting code for WITH-SIMPLE-RESTART. ;;; Emitting code for WITH-CONDITION-RESTARTS. ;;; Emitting code for #:G103. ;;; Emitting code for DEFINE-CONDITION. ;;; Emitting code for FIND-SUBCLASSES-OF-TYPE. ;;; Emitting code for MAKE-CONDITION. ;;; Emitting code for HANDLER-BIND. ;;; Emitting code for #:G150. ;;; Emitting code for #:G156. ;;; Emitting code for SIGNAL. ;;; Emitting code for COERCE-TO-CONDITION. ;;; Emitting code for BREAK. ;;; Emitting code for #:G169. ;;; Emitting code for #:G170. ;;; Emitting code for WARN. ;;; Emitting code for #:G178. ;;; Emitting code for #:G179. ;;; Emitting code for #:G181. ;;; Emitting code for #:G182. ;;; Emitting code for #:G183. ;;; Emitting code for #:G184. ;;; Emitting code for #:G185. ;;; Emitting code for #:G186. ;;; Emitting code for #:G187. ;;; Emitting code for #:G188. ;;; Emitting code for #:G189. ;;; Emitting code for #:G190. ;;; Emitting code for #:G191. ;;; Emitting code for #:G192. ;;; Emitting code for #:G193. ;;; Emitting code for #:G194. ;;; Emitting code for #:G195. ;;; Emitting code for #:G196. ;;; Emitting code for #:G197. ;;; Emitting code for #:G198. ;;; Emitting code for #:G199. ;;; Emitting code for #:G200. ;;; Emitting code for #:G201. ;;; Emitting code for #:G202. ;;; Emitting code for #:G203. ;;; Emitting code for #:G205. ;;; Emitting code for #:G206. ;;; Emitting code for #:G204. ;;; Emitting code for SIGNAL-SIMPLE-ERROR. ;;; Emitting code for HANDLER-CASE. ;;; Emitting code for #:G219. ;;; Emitting code for #:G227. ;;; Emitting code for #:G235. ;;; Emitting code for IGNORE-ERRORS. ;;; Emitting code for ABORT. ;;; Emitting code for CONTINUE. ;;; Emitting code for MUFFLE-WARNING. ;;; Emitting code for STORE-VALUE. ;;; Emitting code for USE-VALUE. ;;; Emitting code for ASSERT-REPORT. ;;; Emitting code for ASSERT-PROMPT. ;;; Emitting code for READ-IT. ;;; Emitting code for ASSERT-FAILURE. ;;; Emitting code for #:G251. ;;; Emitting code for #:G252. ;;; Emitting code for UNIVERSAL-ERROR-HANDLER. ;;; Emitting code for #:G266. ;;; Emitting code for #:G267. ;;; Emitting code for #:G273. ;;; Emitting code for #:G274. ;;; Emitting code for #:G280. ;;; Emitting code for #:G281. ;;; Emitting code for #:G286. ;;; Emitting code for #:G287. ;;; Emitting code for #:G292. ;;; Emitting code for #:G293. ;;; Emitting code for STACK-ERROR-HANDLER. ;;; Emitting code for TPL-CONTINUE-COMMAND. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/conditions.c -o clos/conditions.o ;;; Finished compiling SRC:CLOS;CONDITIONS.LSP. ;;; (compile-file "src:clos;print.lsp" :output-file #P"BUILD:CLOS;PRINT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;PRINT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-LOAD-FORM-SAVING-SLOTS ...). ;;; Compiling (DEFUN NEED-TO-MAKE-LOAD-FORM-P ...). ;;; Function NEED-TO-MAKE-LOAD-FORM-P proclaimed (2,2) ;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...). ;;; Note: ;;; in file PRINT.LSP, position 3943 ;;; at (DEFMETHOD MAKE-LOAD-FORM ...) ;;; Checking type of #:LOOP-LIST-TAIL34 to be CONS ;;; Note: ;;; in file PRINT.LSP, position 3943 ;;; at (DEFMETHOD MAKE-LOAD-FORM ...) ;;; Checking type of #:LOOP-LIST-TAIL45 to be CONS ;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...). ;;; Style warning: ;;; in file PRINT.LSP, position 6595 ;;; at (DEFMETHOD MAKE-LOAD-FORM ...) ;;; ! The variable ENVIRONMENT is not used. ;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...). ;;; Style warning: ;;; in file PRINT.LSP, position 6701 ;;; at (DEFMETHOD MAKE-LOAD-FORM ...) ;;; ! The variable ENVIRONMENT is not used. ;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...). ;;; Style warning: ;;; in file PRINT.LSP, position 6808 ;;; at (DEFMETHOD MAKE-LOAD-FORM ...) ;;; ! The variable ENVIRONMENT is not used. ;;; Compiling (DEFUN NO-MAKE-LOAD-FORM ...). ;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...). ;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFUN FLOAT-NAN-STRING ...). ;;; Compiling (DEFUN FLOAT-INFINITY-STRING ...). ;;; Compiling (DEFMETHOD DESCRIBE-OBJECT ...). ;;; Note: ;;; in file PRINT.LSP, position 10795 ;;; at (DEFMETHOD DESCRIBE-OBJECT ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; Compiling (DEFMETHOD DESCRIBE-OBJECT ...). ;;; Note: ;;; in file PRINT.LSP, position 11354 ;;; at (DEFMETHOD DESCRIBE-OBJECT ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; End of Pass 1. ;;; Emitting code for MAKE-LOAD-FORM-SAVING-SLOTS. ;;; Emitting code for NEED-TO-MAKE-LOAD-FORM-P. ;;; Emitting code for RECURSIVE-TEST. ;;; Emitting code for #:G30. ;;; Emitting code for MAYBE-QUOTE. ;;; Emitting code for #:G53. ;;; Emitting code for #:G54. ;;; Emitting code for #:G55. ;;; Emitting code for NO-MAKE-LOAD-FORM. ;;; Emitting code for #:G56. ;;; Emitting code for #:G57. ;;; Emitting code for #:G58. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for #:G59. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for #:G60. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for #:G61. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for #:G62. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for FLOAT-NAN-STRING. ;;; Emitting code for FLOAT-INFINITY-STRING. ;;; Emitting code for #:G63. ;;; Emitting code for #:G69. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/print.c -o clos/print.o ;;; Finished compiling SRC:CLOS;PRINT.LSP. ;;; (compile-file "src:clos;streams.lsp" :output-file #P"BUILD:CLOS;STREAMS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;STREAMS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFGENERIC STREAM-ADVANCE-TO-COLUMN ...). ;;; Compiling (DEFGENERIC STREAM-CLEAR-INPUT ...). ;;; Compiling (DEFGENERIC STREAM-CLEAR-OUTPUT ...). ;;; Compiling (DEFGENERIC CLOSE ...). ;;; Compiling (DEFGENERIC STREAM-ELEMENT-TYPE ...). ;;; Compiling (DEFGENERIC STREAM-FINISH-OUTPUT ...). ;;; Compiling (DEFGENERIC STREAM-FORCE-OUTPUT ...). ;;; Compiling (DEFGENERIC STREAM-FRESH-LINE ...). ;;; Compiling (DEFGENERIC INPUT-STREAM-P ...). ;;; Compiling (DEFGENERIC STREAM-P ...). ;;; Compiling (DEFGENERIC STREAM-INTERACTIVE-P ...). ;;; Compiling (DEFGENERIC STREAM-LINE-COLUMN ...). ;;; Compiling (DEFGENERIC STREAM-LISTEN ...). ;;; Compiling (DEFGENERIC OPEN-STREAM-P ...). ;;; Compiling (DEFGENERIC OUTPUT-STREAM-P ...). ;;; Compiling (DEFGENERIC STREAM-PEEK-CHAR ...). ;;; Compiling (DEFGENERIC STREAM-READ-BYTE ...). ;;; Compiling (DEFGENERIC STREAM-READ-CHAR ...). ;;; Compiling (DEFGENERIC STREAM-READ-CHAR-NO-HANG ...). ;;; Compiling (DEFGENERIC STREAM-READ-LINE ...). ;;; Compiling (DEFGENERIC STREAM-READ-SEQUENCE ...). ;;; Compiling (DEFGENERIC STREAM-START-LINE-P ...). ;;; Compiling (DEFGENERIC STREAM-TERPRI ...). ;;; Compiling (DEFGENERIC STREAM-UNREAD-CHAR ...). ;;; Compiling (DEFGENERIC STREAM-WRITE-BYTE ...). ;;; Compiling (DEFGENERIC STREAM-WRITE-CHAR ...). ;;; Compiling (DEFGENERIC STREAM-WRITE-STRING ...). ;;; Compiling (DEFGENERIC STREAM-WRITE-SEQUENCE ...). ;;; Compiling (DEFGENERIC STREAM-FILE-POSITION ...). ;;; Compiling (DEFGENERIC STREAM-FILE-DESCRIPTOR ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-STREAM ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-INPUT-STREAM ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-OUTPUT-STREAM ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-CHARACTER-STREAM ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-BINARY-STREAM ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-CHARACTER-INPUT-STREAM ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-CHARACTER-OUTPUT-STREAM ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-BINARY-INPUT-STREAM ...). ;;; Compiling (DEFCLASS FUNDAMENTAL-BINARY-OUTPUT-STREAM ...). ;;; Compiling (DEFUN BUG-OR-ERROR ...). ;;; Compiling (DEFMETHOD STREAM-ADVANCE-TO-COLUMN ...). ;;; Compiling (DEFMETHOD STREAM-CLEAR-INPUT ...). ;;; Compiling (DEFMETHOD STREAM-CLEAR-INPUT ...). ;;; Compiling (DEFMETHOD STREAM-CLEAR-INPUT ...). ;;; Compiling (DEFMETHOD STREAM-CLEAR-OUTPUT ...). ;;; Compiling (DEFMETHOD STREAM-CLEAR-OUTPUT ...). ;;; Compiling (DEFMETHOD STREAM-CLEAR-OUTPUT ...). ;;; Compiling (DEFMETHOD CLOSE ...). ;;; Compiling (DEFMETHOD CLOSE ...). ;;; Compiling (DEFMETHOD CLOSE ...). ;;; Compiling (DEFMETHOD STREAM-ELEMENT-TYPE ...). ;;; Compiling (DEFMETHOD STREAM-ELEMENT-TYPE ...). ;;; Compiling (DEFMETHOD STREAM-ELEMENT-TYPE ...). ;;; Compiling (DEFMETHOD STREAM-FINISH-OUTPUT ...). ;;; Compiling (DEFMETHOD STREAM-FINISH-OUTPUT ...). ;;; Compiling (DEFMETHOD STREAM-FINISH-OUTPUT ...). ;;; Compiling (DEFMETHOD STREAM-FORCE-OUTPUT ...). ;;; Compiling (DEFMETHOD STREAM-FORCE-OUTPUT ...). ;;; Compiling (DEFMETHOD STREAM-FORCE-OUTPUT ...). ;;; Compiling (DEFMETHOD STREAM-FRESH-LINE ...). ;;; Compiling (DEFMETHOD STREAM-FRESH-LINE ...). ;;; Compiling (DEFMETHOD INPUT-STREAM-P ...). ;;; Compiling (DEFMETHOD INPUT-STREAM-P ...). ;;; Compiling (DEFMETHOD INPUT-STREAM-P ...). ;;; Compiling (DEFMETHOD INPUT-STREAM-P ...). ;;; Compiling (DEFMETHOD STREAM-INTERACTIVE-P ...). ;;; Compiling (DEFMETHOD STREAM-INTERACTIVE-P ...). ;;; Compiling (DEFMETHOD STREAM-LINE-COLUMN ...). ;;; Compiling (DEFMETHOD STREAM-LISTEN ...). ;;; Compiling (DEFMETHOD STREAM-LISTEN ...). ;;; Compiling (DEFMETHOD STREAM-LISTEN ...). ;;; Compiling (DEFMETHOD OPEN-STREAM-P ...). ;;; Compiling (DEFMETHOD OPEN-STREAM-P ...). ;;; Compiling (DEFMETHOD OUTPUT-STREAM-P ...). ;;; Compiling (DEFMETHOD OUTPUT-STREAM-P ...). ;;; Compiling (DEFMETHOD OUTPUT-STREAM-P ...). ;;; Compiling (DEFMETHOD OUTPUT-STREAM-P ...). ;;; Compiling (DEFMETHOD STREAM-PEEK-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-PEEK-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-PEEK-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-READ-BYTE ...). ;;; Compiling (DEFMETHOD STREAM-READ-BYTE ...). ;;; Compiling (DEFMETHOD STREAM-READ-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-READ-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-UNREAD-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-UNREAD-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-READ-CHAR-NO-HANG ...). ;;; Compiling (DEFMETHOD STREAM-READ-CHAR-NO-HANG ...). ;;; Compiling (DEFMETHOD STREAM-READ-CHAR-NO-HANG ...). ;;; Compiling (DEFMETHOD STREAM-READ-LINE ...). ;;; Compiling (DEFMETHOD STREAM-READ-LINE ...). ;;; Compiling (DEFMETHOD STREAM-READ-LINE ...). ;;; Compiling (DEFMETHOD STREAM-READ-SEQUENCE ...). ;;; Compiling (DEFMETHOD STREAM-READ-SEQUENCE ...). ;;; Compiling (DEFMETHOD STREAM-READ-SEQUENCE ...). ;;; Compiling (DEFMETHOD STREAM-READ-SEQUENCE ...). ;;; Compiling (DEFMETHOD STREAM-START-LINE-P ...). ;;; Compiling (DEFMETHOD STREAM-FILE-POSITION ...). ;;; Compiling (DEFMETHOD STREAM-FILE-POSITION ...). ;;; Compiling (DEFMETHOD STREAMP ...). ;;; Compiling (DEFMETHOD STREAMP ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-BYTE ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-BYTE ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-CHAR ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-SEQUENCE ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-SEQUENCE ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-SEQUENCE ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-SEQUENCE ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-STRING ...). ;;; Note: ;;; in file STREAMS.LSP, position 19676 ;;; at (DEFMETHOD STREAM-WRITE-STRING ...) ;;; In function G101, checking types of arguments START STRING. ;;; Note: ;;; in file STREAMS.LSP, position 19676 ;;; at (DEFMETHOD STREAM-WRITE-STRING ...) ;;; Checking type of STRING to be STRING ;;; Note: ;;; in file STREAMS.LSP, position 19676 ;;; at (DEFMETHOD STREAM-WRITE-STRING ...) ;;; Checking type of START to be FIXNUM ;;; Note: ;;; in file STREAMS.LSP, position 19676 ;;; at (DEFMETHOD STREAM-WRITE-STRING ...) ;;; Checking type of (OR END (LENGTH STRING)) to be FIXNUM ;;; Note: ;;; in file STREAMS.LSP, position 19676 ;;; at (DEFMETHOD STREAM-WRITE-STRING ...) ;;; Checking type of START to be SI::INDEX ;;; Note: ;;; in file STREAMS.LSP, position 19676 ;;; at (DEFMETHOD STREAM-WRITE-STRING ...) ;;; Checking type of (1+ POS) to be SI::INDEX ;;; Compiling (DEFMETHOD STREAM-WRITE-STRING ...). ;;; Compiling (DEFMETHOD STREAM-WRITE-STRING ...). ;;; Compiling (DEFMETHOD STREAM-TERPRI ...). ;;; Compiling (DEFMETHOD STREAM-TERPRI ...). ;;; Compiling (DEFMETHOD STREAM-TERPRI ...). ;;; Compiling (DEFMETHOD STREAM-FILE-DESCRIPTOR ...). ;;; Compiling (DEFMETHOD STREAM-FILE-DESCRIPTOR ...). ;;; Compiling (DEFMETHOD STREAM-FILE-DESCRIPTOR ...). ;;; Compiling (DEFMETHOD STREAM-FILE-DESCRIPTOR ...). ;;; Compiling (DEFUN %REDEFINE-CL-FUNCTIONS ...). ;;; Compiling (DEFUN REDEFINE-CL-FUNCTIONS ...). ;;; Note: ;;; in file STREAMS.LSP, position 24768 ;;; at (DEFUN REDEFINE-CL-FUNCTIONS ...) ;;; Checking type of #:LET138 to be LIST ;;; Note: ;;; in file STREAMS.LSP, position 24768 ;;; at (DEFUN REDEFINE-CL-FUNCTIONS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST136) to be LIST ;;; Style warning: ;;; in file STREAMS.LSP, position 25528 ;;; at (SETF *CLOS-BOOTED* ...) ;;; ! Variable *CLOS-BOOTED* was undefined. Compiler assumes it is a global. ;;; End of Pass 1. ;;; Emitting code for BUG-OR-ERROR. ;;; Emitting code for #:G0. ;;; Emitting code for #:G6. ;;; Emitting code for #:G7. ;;; Emitting code for #:G8. ;;; Emitting code for #:G9. ;;; Emitting code for #:G10. ;;; Emitting code for #:G11. ;;; Emitting code for #:G16. ;;; Emitting code for #:G19. ;;; Emitting code for #:G20. ;;; Emitting code for #:G21. ;;; Emitting code for #:G22. ;;; Emitting code for #:G23. ;;; Emitting code for #:G24. ;;; Emitting code for #:G25. ;;; Emitting code for #:G26. ;;; Emitting code for #:G27. ;;; Emitting code for #:G28. ;;; Emitting code for #:G29. ;;; Emitting code for #:G30. ;;; Emitting code for #:G31. ;;; Emitting code for #:G32. ;;; Emitting code for #:G33. ;;; Emitting code for #:G34. ;;; Emitting code for #:G35. ;;; Emitting code for #:G36. ;;; Emitting code for #:G37. ;;; Emitting code for #:G38. ;;; Emitting code for #:G39. ;;; Emitting code for #:G40. ;;; Emitting code for #:G41. ;;; Emitting code for #:G42. ;;; Emitting code for #:G43. ;;; Emitting code for #:G44. ;;; Emitting code for #:G45. ;;; Emitting code for #:G46. ;;; Emitting code for #:G47. ;;; Emitting code for #:G48. ;;; Emitting code for #:G49. ;;; Emitting code for #:G50. ;;; Emitting code for #:G51. ;;; Emitting code for #:G52. ;;; Emitting code for #:G53. ;;; Emitting code for #:G54. ;;; Emitting code for #:G55. ;;; Emitting code for #:G56. ;;; Emitting code for #:G57. ;;; Emitting code for #:G58. ;;; Emitting code for #:G59. ;;; Emitting code for #:G72. ;;; Emitting code for #:G82. ;;; Emitting code for #:G83. ;;; Emitting code for #:G84. ;;; Emitting code for #:G85. ;;; Emitting code for #:G86. ;;; Emitting code for #:G87. ;;; Emitting code for #:G88. ;;; Emitting code for #:G89. ;;; Emitting code for #:G90. ;;; Emitting code for #:G91. ;;; Emitting code for #:G92. ;;; Emitting code for #:G93. ;;; Emitting code for #:G94. ;;; Emitting code for #:G95. ;;; Emitting code for #:G96. ;;; Emitting code for #:G97. ;;; Emitting code for #:G98. ;;; Emitting code for #:G99. ;;; Emitting code for #:G100. ;;; Emitting code for #:G101. ;;; Emitting code for #:G114. ;;; Emitting code for #:G115. ;;; Emitting code for #:G116. ;;; Emitting code for #:G117. ;;; Emitting code for #:G118. ;;; Emitting code for #:G119. ;;; Emitting code for #:G121. ;;; Emitting code for #:G122. ;;; Emitting code for #:G124. ;;; Emitting code for %REDEFINE-CL-FUNCTIONS. ;;; Emitting code for REDEFINE-CL-FUNCTIONS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/streams.c -o clos/streams.o ;;; Finished compiling SRC:CLOS;STREAMS.LSP. ;;; (compile-file "src:lsp;pprint.lsp" :output-file #P"BUILD:CLOS;PPRINT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;PPRINT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFCLASS PRETTY-STREAM ...). ;;; Compiling (DEFUN PRETTY-STREAM-P ...). ;;; Compiling (DEFUN MAKE-PRETTY-STREAM ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFUN INDEX-POSN ...). ;;; Note: ;;; in file PPRINT.LSP, position 4944 ;;; at (DEFUN INDEX-POSN ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Compiling (DEFUN POSN-INDEX ...). ;;; Note: ;;; in file PPRINT.LSP, position 5086 ;;; at (DEFUN POSN-INDEX ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Compiling (DEFUN POSN-COLUMN ...). ;;; Note: ;;; in file PPRINT.LSP, position 5224 ;;; at (DEFUN POSN-COLUMN ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 5224 ;;; at (DEFUN POSN-COLUMN ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Compiling (DEFMETHOD GRAY:STREAM-WRITE-CHAR ...). ;;; Compiling (DEFMETHOD GRAY:STREAM-FORCE-OUTPUT ...). ;;; Compiling (DEFMETHOD GRAY:STREAM-CLEAR-OUTPUT ...). ;;; Note: ;;; in file PPRINT.LSP, position 5618 ;;; at (DEFMETHOD STREAM-CLEAR-OUTPUT ...) ;;; Inlining read access to slot TARGET from class PRETTY-STREAM ;;; Compiling (DEFUN PRETTY-OUT ...). ;;; Note: ;;; in file PPRINT.LSP, position 5769 ;;; at (DEFUN PRETTY-OUT ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 5769 ;;; at (DEFUN PRETTY-OUT ...) ;;; Inlining read access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 5769 ;;; at (DEFUN PRETTY-OUT ...) ;;; Inlining write access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Compiling (DEFUN PRETTY-SOUT ...). ;;; Note: ;;; in file PPRINT.LSP, position 6278 ;;; at (DEFUN PRETTY-SOUT ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 6278 ;;; at (DEFUN PRETTY-SOUT ...) ;;; Inlining read access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 6278 ;;; at (DEFUN PRETTY-SOUT ...) ;;; Inlining write access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Compiling (DEFSTRUCT LOGICAL-BLOCK ...). ;;; Compiling (DEFUN REALLY-START-LOGICAL-BLOCK ...). ;;; Note: ;;; in file PPRINT.LSP, position 8155 ;;; at (DEFUN REALLY-START-LOGICAL-BLOCK ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 8155 ;;; at (DEFUN REALLY-START-LOGICAL-BLOCK ...) ;;; Inlining read access to slot LINE-NUMBER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 8155 ;;; at (DEFUN REALLY-START-LOGICAL-BLOCK ...) ;;; Inlining write access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 8155 ;;; at (DEFUN REALLY-START-LOGICAL-BLOCK ...) ;;; Inlining read access to slot PREFIX from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 8155 ;;; at (DEFUN REALLY-START-LOGICAL-BLOCK ...) ;;; Inlining read access to slot SUFFIX from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 8155 ;;; at (DEFUN REALLY-START-LOGICAL-BLOCK ...) ;;; Inlining write access to slot SUFFIX from class PRETTY-STREAM ;;; Compiling (DEFUN SET-INDENTATION ...). ;;; Note: ;;; in file PPRINT.LSP, position 10261 ;;; at (DEFUN SET-INDENTATION ...) ;;; Inlining read access to slot PREFIX from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 10261 ;;; at (DEFUN SET-INDENTATION ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 10261 ;;; at (DEFUN SET-INDENTATION ...) ;;; Inlining write access to slot PREFIX from class PRETTY-STREAM ;;; Compiling (DEFUN REALLY-END-LOGICAL-BLOCK ...). ;;; Note: ;;; in file PPRINT.LSP, position 11210 ;;; at (DEFUN REALLY-END-LOGICAL-BLOCK ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 11210 ;;; at (DEFUN REALLY-END-LOGICAL-BLOCK ...) ;;; Inlining write access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 11210 ;;; at (DEFUN REALLY-END-LOGICAL-BLOCK ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 11210 ;;; at (DEFUN REALLY-END-LOGICAL-BLOCK ...) ;;; Inlining read access to slot PREFIX from class PRETTY-STREAM ;;; Compiling (DEFSTRUCT QUEUED-OP ...). ;;; Compiling (DEFSTRUCT (SECTION-START #) ...). ;;; Compiling (DEFSTRUCT (NEWLINE #) ...). ;;; Compiling (DEFUN ENQUEUE-NEWLINE ...). ;;; Note: ;;; in file PPRINT.LSP, position 13048 ;;; at (DEFUN ENQUEUE-NEWLINE ...) ;;; Inlining read access to slot PENDING-BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13048 ;;; at (DEFUN ENQUEUE-NEWLINE ...) ;;; Inlining INDEX-POSN ;;; Note: ;;; in file PPRINT.LSP, position 13048 ;;; at (DEFUN ENQUEUE-NEWLINE ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13048 ;;; at (DEFUN ENQUEUE-NEWLINE ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13048 ;;; at (DEFUN ENQUEUE-NEWLINE ...) ;;; Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13048 ;;; at (DEFUN ENQUEUE-NEWLINE ...) ;;; Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13048 ;;; at (DEFUN ENQUEUE-NEWLINE ...) ;;; Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13048 ;;; at (DEFUN ENQUEUE-NEWLINE ...) ;;; Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Compiling (DEFSTRUCT (INDENTATION #) ...). ;;; Compiling (DEFUN ENQUEUE-INDENT ...). ;;; Note: ;;; in file PPRINT.LSP, position 13812 ;;; at (DEFUN ENQUEUE-INDENT ...) ;;; Inlining INDEX-POSN ;;; Note: ;;; in file PPRINT.LSP, position 13812 ;;; at (DEFUN ENQUEUE-INDENT ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13812 ;;; at (DEFUN ENQUEUE-INDENT ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13812 ;;; at (DEFUN ENQUEUE-INDENT ...) ;;; Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13812 ;;; at (DEFUN ENQUEUE-INDENT ...) ;;; Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 13812 ;;; at (DEFUN ENQUEUE-INDENT ...) ;;; Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Compiling (DEFSTRUCT (BLOCK-START #) ...). ;;; Compiling (DEFUN START-LOGICAL-BLOCK ...). ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; In function START-LOGICAL-BLOCK, checking types of arguments SUFFIX PREFIX STREAM. ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Checking type of STREAM to be PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Checking type of PREFIX to be STRING ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Checking type of SUFFIX to be STRING ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Inlining read access to slot PENDING-BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Inlining INDEX-POSN ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14124 ;;; at (DEFUN START-LOGICAL-BLOCK ...) ;;; Inlining write access to slot PENDING-BLOCKS from class PRETTY-STREAM ;;; Compiling (DEFSTRUCT (BLOCK-END #) ...). ;;; Compiling (DEFUN END-LOGICAL-BLOCK ...). ;;; Note: ;;; in file PPRINT.LSP, position 14956 ;;; at (DEFUN END-LOGICAL-BLOCK ...) ;;; Inlining read access to slot PENDING-BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14956 ;;; at (DEFUN END-LOGICAL-BLOCK ...) ;;; Inlining write access to slot PENDING-BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14956 ;;; at (DEFUN END-LOGICAL-BLOCK ...) ;;; Inlining INDEX-POSN ;;; Note: ;;; in file PPRINT.LSP, position 14956 ;;; at (DEFUN END-LOGICAL-BLOCK ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14956 ;;; at (DEFUN END-LOGICAL-BLOCK ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14956 ;;; at (DEFUN END-LOGICAL-BLOCK ...) ;;; Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14956 ;;; at (DEFUN END-LOGICAL-BLOCK ...) ;;; Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 14956 ;;; at (DEFUN END-LOGICAL-BLOCK ...) ;;; Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Compiling (DEFSTRUCT (TAB #) ...). ;;; Compiling (DEFUN ENQUEUE-TAB ...). ;;; Note: ;;; in file PPRINT.LSP, position 15518 ;;; at (DEFUN ENQUEUE-TAB ...) ;;; Inlining INDEX-POSN ;;; Note: ;;; in file PPRINT.LSP, position 15518 ;;; at (DEFUN ENQUEUE-TAB ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 15518 ;;; at (DEFUN ENQUEUE-TAB ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 15518 ;;; at (DEFUN ENQUEUE-TAB ...) ;;; Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 15518 ;;; at (DEFUN ENQUEUE-TAB ...) ;;; Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 15518 ;;; at (DEFUN ENQUEUE-TAB ...) ;;; Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Compiling (DEFUN COMPUTE-TAB-SIZE ...). ;;; Compiling (DEFUN INDEX-COLUMN ...). ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining read access to slot BUFFER-START-COLUMN from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining INDEX-POSN ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 16648 ;;; at (DEFUN INDEX-COLUMN ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Compiling (DEFUN EXPAND-TABS ...). ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining read access to slot BUFFER-START-COLUMN from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining read access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining write access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining write access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 17590 ;;; at (DEFUN EXPAND-TABS ...) ;;; Inlining write access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Compiling (DEFUN ASSURE-SPACE-IN-BUFFER ...). ;;; Note: ;;; in file PPRINT.LSP, position 19849 ;;; at (DEFUN ASSURE-SPACE-IN-BUFFER ...) ;;; Inlining read access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 19849 ;;; at (DEFUN ASSURE-SPACE-IN-BUFFER ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 19849 ;;; at (DEFUN ASSURE-SPACE-IN-BUFFER ...) ;;; Inlining read access to slot LINE-LENGTH from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 19849 ;;; at (DEFUN ASSURE-SPACE-IN-BUFFER ...) ;;; Inlining write access to slot BUFFER from class PRETTY-STREAM ;;; Compiling (DEFUN MAYBE-OUTPUT ...). ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining read access to slot LINE-NUMBER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining POSN-COLUMN ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining POSN-COLUMN ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 20805 ;;; at (DEFUN MAYBE-OUTPUT ...) ;;; Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Compiling (DEFUN MISERING-P ...). ;;; Note: ;;; in file PPRINT.LSP, position 23515 ;;; at (DEFUN MISERING-P ...) ;;; Inlining read access to slot LINE-LENGTH from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 23515 ;;; at (DEFUN MISERING-P ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Compiling (DEFUN FITS-ON-LINE-P ...). ;;; Note: ;;; in file PPRINT.LSP, position 23798 ;;; at (DEFUN FITS-ON-LINE-P ...) ;;; Inlining read access to slot LINE-LENGTH from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 23798 ;;; at (DEFUN FITS-ON-LINE-P ...) ;;; Inlining read access to slot LINE-NUMBER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 23798 ;;; at (DEFUN FITS-ON-LINE-P ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 23798 ;;; at (DEFUN FITS-ON-LINE-P ...) ;;; Inlining POSN-COLUMN ;;; Note: ;;; in file PPRINT.LSP, position 23798 ;;; at (DEFUN FITS-ON-LINE-P ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 23798 ;;; at (DEFUN FITS-ON-LINE-P ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 23798 ;;; at (DEFUN FITS-ON-LINE-P ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Compiling (DEFUN OUTPUT-LINE ...). ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot TARGET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot LINE-NUMBER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot SUFFIX from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining write access to slot LINE-NUMBER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining write access to slot BUFFER-START-COLUMN from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot BLOCKS from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining write access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot PREFIX from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining write access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 24531 ;;; at (DEFUN OUTPUT-LINE ...) ;;; Inlining write access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Compiling (DEFUN OUTPUT-PARTIAL-LINE ...). ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining POSN-INDEX ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining read access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining read access to slot TARGET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining read access to slot BUFFER-START-COLUMN from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining write access to slot BUFFER-START-COLUMN from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining write access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 27539 ;;; at (DEFUN OUTPUT-PARTIAL-LINE ...) ;;; Inlining write access to slot BUFFER-OFFSET from class PRETTY-STREAM ;;; Compiling (DEFUN FORCE-PRETTY-OUTPUT ...). ;;; Note: ;;; in file PPRINT.LSP, position 28417 ;;; at (DEFUN FORCE-PRETTY-OUTPUT ...) ;;; Inlining read access to slot BUFFER from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 28417 ;;; at (DEFUN FORCE-PRETTY-OUTPUT ...) ;;; Inlining read access to slot TARGET from class PRETTY-STREAM ;;; Note: ;;; in file PPRINT.LSP, position 28417 ;;; at (DEFUN FORCE-PRETTY-OUTPUT ...) ;;; Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM ;;; Compiling (DEFUN PPRINT-POP-HELPER ...). ;;; Function PPRINT-POP-HELPER proclaimed (0,65536) ;;; Compiling (DEFUN CHECK-PRINT-LEVEL ...). ;;; Compiling (DEFUN SEARCH-PRINT-CIRCLE ...). ;;; Compiling (DEFUN DO-PPRINT-LOGICAL-BLOCK ...). ;;; Compiling (DEFUN PPRINT-LOGICAL-BLOCK-HELPER ...). ;;; Function PPRINT-LOGICAL-BLOCK-HELPER proclaimed (0,65536) ;;; Compiling (DEFMACRO PPRINT-LOGICAL-BLOCK ...). ;;; Compiling (DEFMACRO PPRINT-EXIT-IF-LIST-EXHAUSTED ...). ;;; Compiling (DEFMACRO PPRINT-POP ...). ;;; Compiling (DEFUN PPRINT-NEWLINE ...). ;;; Note: ;;; in file PPRINT.LSP, position 37213 ;;; at (DEFUN PPRINT-NEWLINE ...) ;;; In function PPRINT-NEWLINE, checking types of arguments STREAM KIND. ;;; Note: ;;; in file PPRINT.LSP, position 37213 ;;; at (DEFUN PPRINT-NEWLINE ...) ;;; Checking type of KIND to be (MEMBER LINEAR MISER FILL MANDATORY) ;;; Note: ;;; in file PPRINT.LSP, position 37213 ;;; at (DEFUN PPRINT-NEWLINE ...) ;;; Checking type of STREAM to be (OR STREAM (MEMBER T NIL)) ;;; Function PPRINT-NEWLINE proclaimed (1,2) ;;; Compiling (DEFUN PPRINT-INDENT ...). ;;; Note: ;;; in file PPRINT.LSP, position 38744 ;;; at (DEFUN PPRINT-INDENT ...) ;;; In function PPRINT-INDENT, checking types of arguments STREAM N RELATIVE-TO. ;;; Note: ;;; in file PPRINT.LSP, position 38744 ;;; at (DEFUN PPRINT-INDENT ...) ;;; Checking type of RELATIVE-TO to be (MEMBER BLOCK CURRENT) ;;; Note: ;;; in file PPRINT.LSP, position 38744 ;;; at (DEFUN PPRINT-INDENT ...) ;;; Checking type of N to be REAL ;;; Note: ;;; in file PPRINT.LSP, position 38744 ;;; at (DEFUN PPRINT-INDENT ...) ;;; Checking type of STREAM to be (OR STREAM (MEMBER T NIL)) ;;; Function PPRINT-INDENT proclaimed (2,3) ;;; Compiling (DEFUN PPRINT-TAB ...). ;;; Note: ;;; in file PPRINT.LSP, position 39792 ;;; at (DEFUN PPRINT-TAB ...) ;;; In function PPRINT-TAB, checking types of arguments STREAM COLINC COLNUM KIND. ;;; Note: ;;; in file PPRINT.LSP, position 39792 ;;; at (DEFUN PPRINT-TAB ...) ;;; Checking type of KIND to be (MEMBER LINE SECTION LINE-RELATIVE SECTION-RELATIVE) ;;; Note: ;;; in file PPRINT.LSP, position 39792 ;;; at (DEFUN PPRINT-TAB ...) ;;; Checking type of COLNUM to be UNSIGNED-BYTE ;;; Note: ;;; in file PPRINT.LSP, position 39792 ;;; at (DEFUN PPRINT-TAB ...) ;;; Checking type of COLINC to be UNSIGNED-BYTE ;;; Note: ;;; in file PPRINT.LSP, position 39792 ;;; at (DEFUN PPRINT-TAB ...) ;;; Checking type of STREAM to be (OR STREAM (MEMBER T NIL)) ;;; Function PPRINT-TAB proclaimed (3,4) ;;; Compiling (DEFUN PPRINT-FILL ...). ;;; Note: ;;; in file PPRINT.LSP, position 40958 ;;; at (DEFUN PPRINT-FILL ...) ;;; In function PPRINT-FILL, checking types of arguments ATSIGN? COLON? STREAM. ;;; Note: ;;; in file PPRINT.LSP, position 40958 ;;; at (DEFUN PPRINT-FILL ...) ;;; Checking type of STREAM to be (OR STREAM (MEMBER T NIL)) ;;; Note: ;;; in file PPRINT.LSP, position 40958 ;;; at (DEFUN PPRINT-FILL ...) ;;; Checking type of COLON? to be GEN-BOOL ;;; Note: ;;; in file PPRINT.LSP, position 40958 ;;; at (DEFUN PPRINT-FILL ...) ;;; Checking type of ATSIGN? to be GEN-BOOL ;;; Style warning: ;;; in file PPRINT.LSP, position 40958 ;;; at (DEFUN PPRINT-FILL ...) ;;; ! Variable ATSIGN?, declared as IGNORE, found in a lisp form. ;;; Style warning: ;;; in file PPRINT.LSP, position 40958 ;;; at (DEFUN PPRINT-FILL ...) ;;; ! The variable ATSIGN? is not used. ;;; Function PPRINT-FILL proclaimed (2,4) ;;; Compiling (DEFUN PPRINT-LINEAR ...). ;;; Note: ;;; in file PPRINT.LSP, position 41803 ;;; at (DEFUN PPRINT-LINEAR ...) ;;; In function PPRINT-LINEAR, checking types of arguments ATSIGN? COLON? STREAM. ;;; Note: ;;; in file PPRINT.LSP, position 41803 ;;; at (DEFUN PPRINT-LINEAR ...) ;;; Checking type of STREAM to be (OR STREAM (MEMBER T NIL)) ;;; Note: ;;; in file PPRINT.LSP, position 41803 ;;; at (DEFUN PPRINT-LINEAR ...) ;;; Checking type of COLON? to be GEN-BOOL ;;; Note: ;;; in file PPRINT.LSP, position 41803 ;;; at (DEFUN PPRINT-LINEAR ...) ;;; Checking type of ATSIGN? to be GEN-BOOL ;;; Style warning: ;;; in file PPRINT.LSP, position 41803 ;;; at (DEFUN PPRINT-LINEAR ...) ;;; ! Variable ATSIGN?, declared as IGNORE, found in a lisp form. ;;; Style warning: ;;; in file PPRINT.LSP, position 41803 ;;; at (DEFUN PPRINT-LINEAR ...) ;;; ! The variable ATSIGN? is not used. ;;; Function PPRINT-LINEAR proclaimed (2,4) ;;; Compiling (DEFUN PPRINT-TABULAR ...). ;;; Note: ;;; in file PPRINT.LSP, position 42656 ;;; at (DEFUN PPRINT-TABULAR ...) ;;; In function PPRINT-TABULAR, checking types of arguments TABSIZE ATSIGN? COLON? STREAM. ;;; Note: ;;; in file PPRINT.LSP, position 42656 ;;; at (DEFUN PPRINT-TABULAR ...) ;;; Checking type of STREAM to be (OR STREAM (MEMBER T NIL)) ;;; Note: ;;; in file PPRINT.LSP, position 42656 ;;; at (DEFUN PPRINT-TABULAR ...) ;;; Checking type of COLON? to be GEN-BOOL ;;; Note: ;;; in file PPRINT.LSP, position 42656 ;;; at (DEFUN PPRINT-TABULAR ...) ;;; Checking type of ATSIGN? to be GEN-BOOL ;;; Note: ;;; in file PPRINT.LSP, position 42656 ;;; at (DEFUN PPRINT-TABULAR ...) ;;; Checking type of TABSIZE to be UNSIGNED-BYTE ;;; Style warning: ;;; in file PPRINT.LSP, position 42656 ;;; at (DEFUN PPRINT-TABULAR ...) ;;; ! Variable ATSIGN?, declared as IGNORE, found in a lisp form. ;;; Style warning: ;;; in file PPRINT.LSP, position 42656 ;;; at (DEFUN PPRINT-TABULAR ...) ;;; ! The variable ATSIGN? is not used. ;;; Function PPRINT-TABULAR proclaimed (2,5) ;;; Compiling (DEFVAR *STANDARD-PPRINT-DISPATCH*). ;;; Compiling (DEFVAR *INITIAL-PPRINT-DISPATCH*). ;;; Compiling (DEFSTRUCT (PPRINT-DISPATCH-ENTRY #) ...). ;;; Compiling (DEFUN %PRINT-PPRINT-DISPATCH-ENTRY ...). ;;; Compiling (DEFSTRUCT (PPRINT-DISPATCH-TABLE #) ...). ;;; Compiling (DEFUN %PRINT-PPRINT-DISPATCH-TABLE ...). ;;; Compiling (DEFUN CONS-TYPE-SPECIFIER-P ...). ;;; Compiling (DEFUN ENTRY< ...). ;;; Compiling (DEFUN COPY-PPRINT-DISPATCH ...). ;;; Note: ;;; in file PPRINT.LSP, position 46182 ;;; at (DEFUN COPY-PPRINT-DISPATCH ...) ;;; In function COPY-PPRINT-DISPATCH, checking types of arguments TABLE. ;;; Note: ;;; in file PPRINT.LSP, position 46182 ;;; at (DEFUN COPY-PPRINT-DISPATCH ...) ;;; Checking type of TABLE to be (OR PPRINT-DISPATCH-TABLE NULL) ;;; Function COPY-PPRINT-DISPATCH proclaimed (0,1) ;;; Compiling (DEFUN DEFAULT-PPRINT-DISPATCH ...). ;;; Compiling (DEFUN PPRINT-DISPATCH ...). ;;; Note: ;;; in file PPRINT.LSP, position 46854 ;;; at (DEFUN PPRINT-DISPATCH ...) ;;; In function PPRINT-DISPATCH, checking types of arguments TABLE. ;;; Note: ;;; in file PPRINT.LSP, position 46854 ;;; at (DEFUN PPRINT-DISPATCH ...) ;;; Checking type of TABLE to be (OR PPRINT-DISPATCH-TABLE NULL) ;;; Function PPRINT-DISPATCH proclaimed (1,2) ;;; Compiling (DEFUN SET-PPRINT-DISPATCH ...). ;;; Note: ;;; in file PPRINT.LSP, position 47706 ;;; at (DEFUN SET-PPRINT-DISPATCH ...) ;;; In function SET-PPRINT-DISPATCH, checking types of arguments TABLE PRIORITY FUNCTION. ;;; Note: ;;; in file PPRINT.LSP, position 47706 ;;; at (DEFUN SET-PPRINT-DISPATCH ...) ;;; Checking type of FUNCTION to be (OR NULL FUNCTION SYMBOL) ;;; Note: ;;; in file PPRINT.LSP, position 47706 ;;; at (DEFUN SET-PPRINT-DISPATCH ...) ;;; Checking type of PRIORITY to be REAL ;;; Note: ;;; in file PPRINT.LSP, position 47706 ;;; at (DEFUN SET-PPRINT-DISPATCH ...) ;;; Checking type of TABLE to be PPRINT-DISPATCH-TABLE ;;; Note: ;;; in file PPRINT.LSP, position 47706 ;;; at (DEFUN SET-PPRINT-DISPATCH ...) ;;; Checking type of #:G562 to be CONS ;;; Note: ;;; in file PPRINT.LSP, position 47706 ;;; at (DEFUN SET-PPRINT-DISPATCH ...) ;;; Checking type of #:G565 to be CONS ;;; Function SET-PPRINT-DISPATCH proclaimed (2,4) ;;; Compiling (DEFUN PPRINT-ARRAY ...). ;;; Compiling (DEFUN PPRINT-VECTOR ...). ;;; Compiling (DEFUN PPRINT-ARRAY-CONTENTS ...). ;;; Compiling (DEFUN PPRINT-MULTI-DIM-ARRAY ...). ;;; Compiling (DEFUN PPRINT-RAW-ARRAY ...). ;;; Compiling (DEFUN PPRINT-LAMBDA-LIST ...). ;;; Compiling (DEFUN PPRINT-LAMBDA ...). ;;; Compiling (DEFUN PPRINT-BLOCK ...). ;;; Compiling (DEFUN PPRINT-FLET ...). ;;; Compiling (DEFUN PPRINT-LET ...). ;;; Compiling (DEFUN PPRINT-PROGN ...). ;;; Compiling (DEFUN PPRINT-PROGV ...). ;;; Compiling (DEFUN PPRINT-QUOTE ...). ;;; Compiling (DEFUN PPRINT-SETQ ...). ;;; Compiling (DEFUN PPRINT-TAGBODY ...). ;;; Compiling (DEFUN PPRINT-CASE ...). ;;; Compiling (DEFUN PPRINT-DEFUN ...). ;;; Compiling (DEFUN PPRINT-DESTRUCTURING-BIND ...). ;;; Compiling (DEFUN PPRINT-DO ...). ;;; Compiling (DEFUN PPRINT-DOLIST ...). ;;; Compiling (DEFUN PPRINT-TYPECASE ...). ;;; Compiling (DEFUN PPRINT-PROG ...). ;;; Compiling (DEFUN PPRINT-FUNCTION-CALL ...). ;;; End of Pass 1. ;;; Style warning: ;;; in file pprint.lsp, position 54764 ;;; at (DEFUN PPRINT-LAMBDA ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 54764 ;;; at (DEFUN PPRINT-LAMBDA ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 54958 ;;; at (DEFUN PPRINT-BLOCK ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 54958 ;;; at (DEFUN PPRINT-BLOCK ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55106 ;;; at (DEFUN PPRINT-FLET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55106 ;;; at (DEFUN PPRINT-FLET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55106 ;;; at (DEFUN PPRINT-FLET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55106 ;;; at (DEFUN PPRINT-FLET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55106 ;;; at (DEFUN PPRINT-FLET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55106 ;;; at (DEFUN PPRINT-FLET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55106 ;;; at (DEFUN PPRINT-FLET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55366 ;;; at (DEFUN PPRINT-LET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55366 ;;; at (DEFUN PPRINT-LET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55366 ;;; at (DEFUN PPRINT-LET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55366 ;;; at (DEFUN PPRINT-LET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55366 ;;; at (DEFUN PPRINT-LET ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55571 ;;; at (DEFUN PPRINT-PROGN ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55705 ;;; at (DEFUN PPRINT-PROGV ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55705 ;;; at (DEFUN PPRINT-PROGV ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55705 ;;; at (DEFUN PPRINT-PROGV ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 55705 ;;; at (DEFUN PPRINT-PROGV ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58020 ;;; at (DEFUN PPRINT-CASE ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58020 ;;; at (DEFUN PPRINT-CASE ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58020 ;;; at (DEFUN PPRINT-CASE ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58020 ;;; at (DEFUN PPRINT-CASE ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58237 ;;; at (DEFUN PPRINT-DEFUN ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58237 ;;; at (DEFUN PPRINT-DEFUN ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58237 ;;; at (DEFUN PPRINT-DEFUN ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58449 ;;; at (DEFUN PPRINT-DESTRUCTURING-BIND ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58449 ;;; at (DEFUN PPRINT-DESTRUCTURING-BIND ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58449 ;;; at (DEFUN PPRINT-DESTRUCTURING-BIND ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58449 ;;; at (DEFUN PPRINT-DESTRUCTURING-BIND ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58664 ;;; at (DEFUN PPRINT-DO ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58664 ;;; at (DEFUN PPRINT-DO ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 58664 ;;; at (DEFUN PPRINT-DO ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 59280 ;;; at (DEFUN PPRINT-DOLIST ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 59280 ;;; at (DEFUN PPRINT-DOLIST ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 59771 ;;; at (DEFUN PPRINT-TYPECASE ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 59771 ;;; at (DEFUN PPRINT-TYPECASE ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 59771 ;;; at (DEFUN PPRINT-TYPECASE ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 59771 ;;; at (DEFUN PPRINT-TYPECASE ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 60362 ;;; at (DEFUN PPRINT-FUNCTION-CALL ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 60362 ;;; at (DEFUN PPRINT-FUNCTION-CALL ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Style warning: ;;; in file pprint.lsp, position 60362 ;;; at (DEFUN PPRINT-FUNCTION-CALL ...) ;;; ! The argument 1 of function <= has type ;;; NIL ;;; instead of expected ;;; REAL ;;; Emitting code for #:G4. ;;; Emitting code for #:G5. ;;; Emitting code for #:G6. ;;; Emitting code for #:G7. ;;; Emitting code for #:G8. ;;; Emitting code for PRETTY-STREAM-P. ;;; Emitting code for MAKE-PRETTY-STREAM. ;;; Emitting code for #:G9. ;;; Emitting code for INDEX-POSN. ;;; Emitting code for POSN-INDEX. ;;; Emitting code for POSN-COLUMN. ;;; Emitting code for #:G12. ;;; Emitting code for #:G13. ;;; Emitting code for #:G14. ;;; Emitting code for PRETTY-OUT. ;;; Emitting code for PRETTY-SOUT. ;;; Emitting code for MAKE-LOGICAL-BLOCK. ;;; Emitting code for REALLY-START-LOGICAL-BLOCK. ;;; Emitting code for SET-INDENTATION. ;;; Emitting code for REALLY-END-LOGICAL-BLOCK. ;;; Emitting code for MAKE-QUEUED-OP. ;;; Emitting code for MAKE-SECTION-START. ;;; Emitting code for MAKE-NEWLINE. ;;; Emitting code for ENQUEUE-NEWLINE. ;;; Emitting code for MAKE-INDENTATION. ;;; Emitting code for ENQUEUE-INDENT. ;;; Emitting code for MAKE-BLOCK-START. ;;; Emitting code for START-LOGICAL-BLOCK. ;;; Emitting code for MAKE-BLOCK-END. ;;; Emitting code for END-LOGICAL-BLOCK. ;;; Emitting code for MAKE-TAB. ;;; Emitting code for ENQUEUE-TAB. ;;; Emitting code for COMPUTE-TAB-SIZE. ;;; Emitting code for INDEX-COLUMN. ;;; Emitting code for EXPAND-TABS. ;;; Emitting code for ASSURE-SPACE-IN-BUFFER. ;;; Emitting code for MAYBE-OUTPUT. ;;; Emitting code for MISERING-P. ;;; Emitting code for FITS-ON-LINE-P. ;;; Emitting code for OUTPUT-LINE. ;;; Emitting code for OUTPUT-PARTIAL-LINE. ;;; Emitting code for FORCE-PRETTY-OUTPUT. ;;; Emitting code for PPRINT-POP-HELPER. ;;; Emitting code for CHECK-PRINT-LEVEL. ;;; Emitting code for SEARCH-PRINT-CIRCLE. ;;; Emitting code for DO-PPRINT-LOGICAL-BLOCK. ;;; Emitting code for PPRINT-LOGICAL-BLOCK-HELPER. ;;; Emitting code for PPRINT-LOGICAL-BLOCK. ;;; Emitting code for PPRINT-EXIT-IF-LIST-EXHAUSTED. ;;; Emitting code for PPRINT-POP. ;;; Emitting code for PPRINT-NEWLINE. ;;; Emitting code for PPRINT-INDENT. ;;; Emitting code for PPRINT-TAB. ;;; Emitting code for PPRINT-FILL. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-491. ;;; Emitting code for PPRINT-LINEAR. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-507. ;;; Emitting code for PPRINT-TABULAR. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-528. ;;; Emitting code for MAKE-PPRINT-DISPATCH-ENTRY. ;;; Emitting code for %PRINT-PPRINT-DISPATCH-ENTRY. ;;; Emitting code for .PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-PPRINT-DISPATCH-TABLE. ;;; Emitting code for %PRINT-PPRINT-DISPATCH-TABLE. ;;; Emitting code for CONS-TYPE-SPECIFIER-P. ;;; Emitting code for ENTRY<. ;;; Emitting code for COPY-PPRINT-DISPATCH. ;;; Emitting code for #:G544. ;;; Emitting code for DEFAULT-PPRINT-DISPATCH. ;;; Emitting code for PPRINT-DISPATCH. ;;; Emitting code for SET-PPRINT-DISPATCH. ;;; Emitting code for PPRINT-ARRAY. ;;; Emitting code for PPRINT-VECTOR. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-573. ;;; Emitting code for PPRINT-ARRAY-CONTENTS. ;;; Emitting code for OUTPUT-GUTS. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-587. ;;; Emitting code for PPRINT-MULTI-DIM-ARRAY. ;;; Emitting code for PPRINT-RAW-ARRAY. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-606. ;;; Emitting code for PPRINT-LAMBDA-LIST. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-615. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-640. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-649. ;;; Emitting code for PPRINT-LAMBDA. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-688. ;;; Emitting code for PPRINT-BLOCK. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-727. ;;; Emitting code for PPRINT-FLET. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-766. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-795. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-813. ;;; Emitting code for PPRINT-LET. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-868. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-897. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-915. ;;; Emitting code for PPRINT-PROGN. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-958. ;;; Emitting code for PPRINT-PROGV. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-988. ;;; Emitting code for PPRINT-QUOTE. ;;; Emitting code for PPRINT-SETQ. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1037. ;;; Emitting code for PPRINT-TAGBODY. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1067. ;;; Emitting code for PPRINT-CASE. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1088. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1124. ;;; Emitting code for PPRINT-DEFUN. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1157. ;;; Emitting code for PPRINT-DESTRUCTURING-BIND. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1205. ;;; Emitting code for PPRINT-DO. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1253. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1273. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1291. ;;; Emitting code for PPRINT-DOLIST. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1339. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1359. ;;; Emitting code for PPRINT-TYPECASE. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1403. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1439. ;;; Emitting code for PPRINT-PROG. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1469. ;;; Emitting code for PPRINT-FUNCTION-CALL. ;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1494. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/pprint.c -o clos/pprint.o ;;; Finished compiling SRC:LSP;PPRINT.LSP. ;;; (compile-file "src:lsp;describe.lsp" :output-file #P"BUILD:CLOS;DESCRIBE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;DESCRIBE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *INSPECT-LEVEL* ...). ;;; Compiling (DEFPARAMETER *INSPECT-HISTORY* ...). ;;; Compiling (DEFPARAMETER *INSPECT-MODE* ...). ;;; Compiling (DEFPARAMETER *OLD-PRINT-LEVEL* ...). ;;; Compiling (DEFPARAMETER *OLD-PRINT-LENGTH* ...). ;;; Compiling (DEFUN INSPECT-READ-LINE ...). ;;; Compiling (DEFUN SELECT-P ...). ;;; Compiling (DEFUN SELECT-E ...). ;;; Compiling (DEFUN SELECT-U ...). ;;; Compiling (DEFUN SELECT-? ...). ;;; Compiling (DEFUN READ-INSPECT-COMMAND ...). ;;; Compiling (DEFUN INSPECT-INDENT ...). ;;; Compiling (DEFUN INSPECT-INDENT-1 ...). ;;; Compiling (DEFUN INSPECT-SYMBOL ...). ;;; Compiling (DEFUN INSPECT-PACKAGE ...). ;;; Compiling (DEFUN INSPECT-CHARACTER ...). ;;; Compiling (DEFUN INSPECT-NUMBER ...). ;;; Compiling (DEFUN INSPECT-CONS ...). ;;; Note: ;;; in file DESCRIBE.LSP, position 9994 ;;; at (DEFUN INSPECT-CONS ...) ;;; Checking type of (NTHCDR #:G48 #:G49) to be CONS ;;; Note: ;;; in file DESCRIBE.LSP, position 9994 ;;; at (DEFUN INSPECT-CONS ...) ;;; Checking type of #:G53 to be CONS ;;; Compiling (DEFUN INSPECT-STRING ...). ;;; Compiling (DEFUN INSPECT-VECTOR ...). ;;; Compiling (DEFUN INSPECT-ARRAY ...). ;;; Compiling (DEFUN SELECT-HT-N ...). ;;; Compiling (DEFUN SELECT-HT-L ...). ;;; Compiling (DEFUN SELECT-HT-J ...). ;;; Compiling (DEFUN SELECT-HT-? ...). ;;; Compiling (DEFUN INSPECT-HASHTABLE ...). ;;; Compiling (DEFUN INSPECT-INSTANCE ...). ;;; Compiling (DEFUN INSPECT-OBJECT ...). ;;; Compiling (DEFUN DEFAULT-INSPECTOR ...). ;;; Compiling (DEFUN INSPECT ...). ;;; Function INSPECT proclaimed (1,1) ;;; Compiling (DEFUN DESCRIBE ...). ;;; Function DESCRIBE proclaimed (1,2) ;;; Compiling (DEFUN PRINT-DOC ...). ;;; Compiling (DEFUN HELP* ...). ;;; End of Pass 1. ;;; Emitting code for INSPECT-READ-LINE. ;;; Emitting code for SELECT-P. ;;; Emitting code for SELECT-E. ;;; Emitting code for SELECT-U. ;;; Emitting code for SELECT-?. ;;; Emitting code for READ-INSPECT-COMMAND. ;;; Emitting code for #:G14. ;;; Emitting code for #:G15. ;;; Emitting code for INSPECT-INDENT. ;;; Emitting code for INSPECT-INDENT-1. ;;; Emitting code for INSPECT-SYMBOL. ;;; Emitting code for INSPECT-PACKAGE. ;;; Emitting code for INSPECT-CHARACTER. ;;; Emitting code for INSPECT-NUMBER. ;;; Emitting code for INSPECT-CONS. ;;; Emitting code for INSPECT-STRING. ;;; Emitting code for INSPECT-VECTOR. ;;; Emitting code for INSPECT-ARRAY. ;;; Emitting code for SELECT-HT-N. ;;; Emitting code for #:G74. ;;; Emitting code for SELECT-HT-L. ;;; Emitting code for #:G80. ;;; Emitting code for SELECT-HT-J. ;;; Emitting code for SELECT-HT-?. ;;; Emitting code for INSPECT-HASHTABLE. ;;; Emitting code for #:G105. ;;; Emitting code for INSPECT-INSTANCE. ;;; Emitting code for INSPECT-OBJECT. ;;; Emitting code for DEFAULT-INSPECTOR. ;;; Emitting code for INSPECT. ;;; Emitting code for DESCRIBE. ;;; Emitting code for PRINT-DOC. ;;; Emitting code for GOOD-PACKAGE. ;;; Emitting code for DOC1. ;;; Emitting code for HELP*. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/describe.c -o clos/describe.o ;;; Finished compiling SRC:LSP;DESCRIBE.LSP. ;;; (compile-file "src:clos;inspect.lsp" :output-file #P"BUILD:CLOS;INSPECT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;INSPECT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMETHOD SELECT-CLOS-N ...). ;;; Compiling (DEFUN SELECT-CLOS-N-INNER-CLASS ...). ;;; Compiling (DEFMETHOD SELECT-CLOS-N ...). ;;; Compiling (DEFMETHOD SELECT-CLOS-N ...). ;;; Compiling (DEFMETHOD SELECT-CLOS-L ...). ;;; Compiling (DEFUN SELECT-CLOS-L-INNER-CLASS ...). ;;; Compiling (DEFMETHOD SELECT-CLOS-L ...). ;;; Compiling (DEFMETHOD SELECT-CLOS-L ...). ;;; Compiling (DEFMETHOD SELECT-CLOS-J ...). ;;; Compiling (DEFUN SELECT-CLOS-J-INNER-CLASS ...). ;;; Compiling (DEFMETHOD SELECT-CLOS-J ...). ;;; Compiling (DEFMETHOD SELECT-CLOS-J ...). ;;; Compiling (DEFUN SELECT-CLOS-? ...). ;;; Compiling (DEFUN CLASS-LOCAL-SLOTS ...). ;;; Compiling (DEFUN CLASS-CLASS-SLOTS ...). ;;; Compiling (DEFMETHOD INSPECT-OBJ ...). ;;; Compiling (DEFUN INSPECT-OBJ-INNER-CLASS ...). ;;; Compiling (DEFMETHOD INSPECT-OBJ ...). ;;; Compiling (DEFMETHOD INSPECT-OBJ ...). ;;; Compiling (DEFGENERIC DOCUMENTATION ...). ;;; Compiling (DEFGENERIC (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; Compiling (DEFMETHOD DOCUMENTATION ...). ;;; Compiling (DEFMETHOD (SETF DOCUMENTATION) ...). ;;; End of Pass 1. ;;; Emitting code for #:G64. ;;; Emitting code for SELECT-CLOS-N-INNER-CLASS. ;;; Emitting code for #:G98. ;;; Emitting code for #:G99. ;;; Emitting code for #:G100. ;;; Emitting code for SELECT-CLOS-L-INNER-CLASS. ;;; Emitting code for #:G110. ;;; Emitting code for #:G111. ;;; Emitting code for #:G132. ;;; Emitting code for SELECT-CLOS-J-INNER-CLASS. ;;; Emitting code for #:G159. ;;; Emitting code for #:G160. ;;; Emitting code for SELECT-CLOS-?. ;;; Emitting code for CLASS-LOCAL-SLOTS. ;;; Emitting code for CLASS-CLASS-SLOTS. ;;; Emitting code for #:G179. ;;; Emitting code for INSPECT-OBJ-INNER-CLASS. ;;; Emitting code for #:G224. ;;; Emitting code for #:G225. ;;; Emitting code for #:G226. ;;; Emitting code for #:G240. ;;; Emitting code for #:G248. ;;; Emitting code for #:G250. ;;; Emitting code for #:G252. ;;; Emitting code for #:G260. ;;; Emitting code for #:G265. ;;; Emitting code for #:G273. ;;; Emitting code for #:G278. ;;; Emitting code for #:G280. ;;; Emitting code for #:G282. ;;; Emitting code for #:G290. ;;; Emitting code for #:G295. ;;; Emitting code for #:G303. ;;; Emitting code for #:G308. ;;; Emitting code for #:G310. ;;; Emitting code for #:G312. ;;; Emitting code for #:G320. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/inspect.c -o clos/inspect.o ;;; Finished compiling SRC:CLOS;INSPECT.LSP. ;;; (compile-file "src:lsp;top.lsp" :output-file #P"BUILD:CLOS;TOP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;TOP.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *QUIT-TAG* ...). ;;; Compiling (DEFPARAMETER *QUIT-TAGS* ...). ;;; Compiling (DEFPARAMETER *BREAK-LEVEL* ...). ;;; Compiling (DEFPARAMETER *BREAK-ENV* ...). ;;; Compiling (DEFPARAMETER *IHS-BASE* ...). ;;; Compiling (DEFPARAMETER *IHS-TOP* ...). ;;; Compiling (DEFPARAMETER *IHS-CURRENT* ...). ;;; Compiling (DEFPARAMETER *FRS-BASE* ...). ;;; Compiling (DEFPARAMETER *FRS-TOP* ...). ;;; Compiling (DEFPARAMETER *TPL-CONTINUABLE* ...). ;;; Compiling (DEFPARAMETER *TPL-PROMPT-HOOK* ...). ;;; Compiling (DEFPARAMETER *EOF* ...). ;;; Compiling (DEFPARAMETER *LAST-ERROR* ...). ;;; Compiling (DEFPARAMETER *BREAK-MESSAGE* ...). ;;; Compiling (DEFPARAMETER *BREAK-CONDITION* ...). ;;; Compiling (DEFPARAMETER *BREAK-READTABLE* ...). ;;; Compiling (DEFPARAMETER *TPL-LEVEL* ...). ;;; Compiling (DEFPARAMETER *STEP-LEVEL* ...). ;;; Compiling (DEFPARAMETER *BREAK-HIDDEN-FUNCTIONS* ...). ;;; Compiling (DEFPARAMETER *BREAK-HIDDEN-PACKAGES* ...). ;;; Compiling (DEFPARAMETER *TPL-COMMANDS* ...). ;;; Compiling (DEFPARAMETER *LISP-INITIALIZED* ...). ;;; Compiling (DEFUN TOP-LEVEL ...). ;;; Compiling (DEFPARAMETER *CONSOLE-LOCK* ...). ;;; Compiling (DEFPARAMETER *CONSOLE-AVAILABLE* ...). ;;; Compiling (DEFPARAMETER *CONSOLE-OWNER* ...). ;;; Compiling (DEFPARAMETER *CONSOLE-WAITING-LIST* ...). ;;; Compiling (DEFUN CANDIDATE-TO-GET-CONSOLE-P ...). ;;; Compiling (DEFUN REGISTER-IN-WAITING-LIST ...). ;;; Note: ;;; in file TOP.LSP, position 19340 ;;; at (DEFUN REGISTER-IN-WAITING-LIST ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK0) to be FIXNUM ;;; Compiling (DEFUN DELETE-FROM-WAITING-LIST ...). ;;; Note: ;;; in file TOP.LSP, position 19340 ;;; at (DEFUN DELETE-FROM-WAITING-LIST ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK17) to be FIXNUM ;;; Compiling (DEFUN GRAB-CONSOLE ...). ;;; Note: ;;; in file TOP.LSP, position 19340 ;;; at (DEFUN GRAB-CONSOLE ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK34) to be FIXNUM ;;; Compiling (DEFUN RELEASE-CONSOLE ...). ;;; Note: ;;; in file TOP.LSP, position 19340 ;;; at (DEFUN RELEASE-CONSOLE ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK52) to be FIXNUM ;;; Compiling (DEFMACRO WITH-GRABBED-CONSOLE ...). ;;; Compiling (DEFPARAMETER *ALLOW-RECURSIVE-DEBUG* ...). ;;; Compiling (DEFPARAMETER *DEBUG-STATUS* ...). ;;; Compiling (DEFUN SIMPLE-TERMINAL-INTERRUPT ...). ;;; Compiling (DEFUN SHOW-PROCESS-LIST ...). ;;; Note: ;;; in file TOP.LSP, position 21054 ;;; at (DEFUN SHOW-PROCESS-LIST ...) ;;; Checking type of #:LET77 to be LIST ;;; Note: ;;; in file TOP.LSP, position 21054 ;;; at (DEFUN SHOW-PROCESS-LIST ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST75) to be LIST ;;; Compiling (DEFUN QUERY-PROCESS ...). ;;; Compiling (DEFPARAMETER *INTERRUPT-LONELY-THREADS-P* ...). ;;; Compiling (DEFUN SINGLE-THREADED-TERMINAL-INTERRUPT ...). ;;; Compiling (DEFUN TERMINAL-INTERRUPT ...). ;;; Note: ;;; in file TOP.LSP, position 22175 ;;; at (DEFUN TERMINAL-INTERRUPT ...) ;;; Checking type of #:LET100 to be LIST ;;; Note: ;;; in file TOP.LSP, position 22175 ;;; at (DEFUN TERMINAL-INTERRUPT ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST96) to be LIST ;;; Note: ;;; in file TOP.LSP, position 22175 ;;; at (DEFUN TERMINAL-INTERRUPT ...) ;;; Checking type of #:LOOP-LIST-TAIL98 to be CONS ;;; Note: ;;; in file TOP.LSP, position 22175 ;;; at (DEFUN TERMINAL-INTERRUPT ...) ;;; Checking type of #:LET104 to be LIST ;;; Note: ;;; in file TOP.LSP, position 22175 ;;; at (DEFUN TERMINAL-INTERRUPT ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST102) to be LIST ;;; Note: ;;; in file TOP.LSP, position 22175 ;;; at (DEFUN TERMINAL-INTERRUPT ...) ;;; Checking type of #:LET122 to be LIST ;;; Note: ;;; in file TOP.LSP, position 22175 ;;; at (DEFUN TERMINAL-INTERRUPT ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST120) to be LIST ;;; Style warning: ;;; in file TOP.LSP, position 22175 ;;; at (DEFUN TERMINAL-INTERRUPT ...) ;;; ! The variable PROCESS is not used. ;;; Compiling (DEFUN TPL ...). ;;; Compiling (DEFUN TPL-PROMPT ...). ;;; Compiling (DEFUN TPL-READ ...). ;;; Compiling (DEFPARAMETER *DEBUG-TPL-COMMANDS* ...). ;;; Compiling (DEFUN HARDEN-COMMAND ...). ;;; Compiling (DEFUN TPL-MAKE-COMMAND ...). ;;; Compiling (DEFUN TPL-PARSE-FORMS ...). ;;; Compiling (DEFUN TPL-PARSE-STRINGS ...). ;;; Compiling (DEFUN TPL-PRINT ...). ;;; Compiling (DEFUN TPL-UNKNOWN-COMMAND ...). ;;; Compiling (DEFUN TPL-POP-COMMAND ...). ;;; Compiling (DEFUN TPL-QUIT-COMMAND ...). ;;; Compiling (DEFUN TPL-PREVIOUS ...). ;;; Compiling (DEFUN TPL-NEXT ...). ;;; Compiling (DEFUN TPL-GO ...). ;;; Compiling (DEFUN TPL-PRINT-MESSAGE ...). ;;; Compiling (DEFUN TPL-DISASSEMBLE-COMMAND ...). ;;; Compiling (DEFUN TPL-LAMBDA-EXPRESSION-COMMAND ...). ;;; Compiling (DEFUN RECONSTRUCT-BYTECODES-LAMBDA-LIST ...). ;;; Note: ;;; in file TOP.LSP, position 32726 ;;; at (DEFUN RECONSTRUCT-BYTECODES-LAMBDA-LIST ...) ;;; Checking type of (1+ N) to be FIXNUM ;;; Note: ;;; in file TOP.LSP, position 32726 ;;; at (DEFUN RECONSTRUCT-BYTECODES-LAMBDA-LIST ...) ;;; Checking type of (POP DATA) to be FIXNUM ;;; Note: ;;; in file TOP.LSP, position 32726 ;;; at (DEFUN RECONSTRUCT-BYTECODES-LAMBDA-LIST ...) ;;; Checking type of (POP DATA) to be FIXNUM ;;; Compiling (DEFUN LAMBDA-LIST-FROM-ANNOTATIONS ...). ;;; Compiling (DEFUN FUNCTION-LAMBDA-LIST ...). ;;; Compiling (DEFUN DECODE-ENV-ELT ...). ;;; Compiling (DEFUN DECODE-IHS-ENV ...). ;;; Note: ;;; in file TOP.LSP, position 37319 ;;; at (DEFUN DECODE-IHS-ENV ...) ;;; Checking type of #:LET234 to be REAL ;;; Compiling (DEFUN IHS-ENVIRONMENT ...). ;;; Note: ;;; in file TOP.LSP, position 37812 ;;; at (DEFUN IHS-ENVIRONMENT ...) ;;; Checking type of #:LET239 to be REAL ;;; Note: ;;; in file TOP.LSP, position 37812 ;;; at (DEFUN IHS-ENVIRONMENT ...) ;;; Checking type of #:LET240 to be REAL ;;; Note: ;;; in file TOP.LSP, position 37812 ;;; at (DEFUN IHS-ENVIRONMENT ...) ;;; Checking type of #:LOOP-LIST-TAIL238 to be CONS ;;; Note: ;;; in file TOP.LSP, position 37812 ;;; at (DEFUN IHS-ENVIRONMENT ...) ;;; Checking type of #:LET242 to be REAL ;;; Note: ;;; in file TOP.LSP, position 37812 ;;; at (DEFUN IHS-ENVIRONMENT ...) ;;; Checking type of #:LET243 to be REAL ;;; Note: ;;; in file TOP.LSP, position 37812 ;;; at (DEFUN IHS-ENVIRONMENT ...) ;;; Checking type of #:LET250 to be LIST ;;; Note: ;;; in file TOP.LSP, position 37812 ;;; at (DEFUN IHS-ENVIRONMENT ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST246) to be LIST ;;; Note: ;;; in file TOP.LSP, position 37812 ;;; at (DEFUN IHS-ENVIRONMENT ...) ;;; Checking type of #:LOOP-LIST-TAIL248 to be CONS ;;; Compiling (DEFUN TPL-PRINT-VARIABLES ...). ;;; Note: ;;; in file TOP.LSP, position 40740 ;;; at (DEFUN TPL-PRINT-VARIABLES ...) ;;; Checking type of #:LET262 to be LIST ;;; Note: ;;; in file TOP.LSP, position 40740 ;;; at (DEFUN TPL-PRINT-VARIABLES ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST259) to be LIST ;;; Compiling (DEFUN TPL-VARIABLES-COMMAND ...). ;;; Note: ;;; in file TOP.LSP, position 41364 ;;; at (DEFUN TPL-VARIABLES-COMMAND ...) ;;; Checking type of #:LET265 to be LIST ;;; Note: ;;; in file TOP.LSP, position 41364 ;;; at (DEFUN TPL-VARIABLES-COMMAND ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST263) to be LIST ;;; Compiling (DEFUN TPL-INSPECT-COMMAND ...). ;;; Compiling (DEFUN TPL-BDS-COMMAND ...). ;;; Compiling (DEFUN TPL-BACKTRACE ...). ;;; Compiling (DEFUN TPL-FRS-COMMAND ...). ;;; Compiling (DEFUN PRINT-FRS ...). ;;; Compiling (DEFUN BREAK-WHERE ...). ;;; Compiling (DEFUN TPL-PRINT-CURRENT ...). ;;; Compiling (DEFUN TPL-HIDE ...). ;;; Compiling (DEFUN TPL-UNHIDE ...). ;;; Compiling (DEFUN TPL-UNHIDE-PACKAGE ...). ;;; Compiling (DEFUN TPL-UNHIDE-ALL ...). ;;; Compiling (DEFUN TPL-HIDE-PACKAGE ...). ;;; Compiling (DEFUN IHS-VISIBLE ...). ;;; Compiling (DEFUN IHS-FNAME ...). ;;; Compiling (DEFUN SET-CURRENT-IHS ...). ;;; Compiling (DEFUN SET-BREAK-ENV ...). ;;; Compiling (DEFUN IHS-SEARCH ...). ;;; Compiling (DEFUN TPL-BACKWARD-SEARCH ...). ;;; Compiling (DEFUN TPL-FORWARD-SEARCH ...). ;;; Compiling (DEFUN TPL-APROPOS-COMMAND ...). ;;; Compiling (DEFUN TPL-DOCUMENT-COMMAND ...). ;;; Compiling (DEFUN TPL-STEP-COMMAND ...). ;;; Compiling (DEFUN TPL-TRACE-COMMAND ...). ;;; Compiling (DEFUN TPL-UNTRACE-COMMAND ...). ;;; Compiling (DEFPARAMETER *TPL-LAST-LOAD* ...). ;;; Compiling (DEFUN TPL-LOAD-COMMAND ...). ;;; Compiling (DEFPARAMETER *TPL-LAST-COMPILE* ...). ;;; Compiling (DEFUN TPL-COMPILE-COMMAND ...). ;;; Compiling (DEFUN TPL-HELP-COMMAND ...). ;;; Compiling (DEFUN TPL-HELP-STACK-COMMAND ...). ;;; Compiling (DEFUN COMPUTE-RESTART-COMMANDS ...). ;;; Note: ;;; in file TOP.LSP, position 52567 ;;; at (DEFUN COMPUTE-RESTART-COMMANDS ...) ;;; Checking type of #:LET351 to be LIST ;;; Note: ;;; in file TOP.LSP, position 52567 ;;; at (DEFUN COMPUTE-RESTART-COMMANDS ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST349) to be LIST ;;; Compiling (DEFUN UPDATE-DEBUG-COMMANDS ...). ;;; Compiling (DEFPARAMETER *DEFAULT-DEBUGGER-MAXIMUM-DEPTH* ...). ;;; Compiling (DEFUN CHECK-DEFAULT-DEBUGGER-RUNAWAY ...). ;;; Compiling (DEFUN TPL-SWITCH-COMMAND ...). ;;; Compiling (DEFUN TPL-WAITING-COMMAND ...). ;;; Note: ;;; in file TOP.LSP, position 55227 ;;; at (DEFUN TPL-WAITING-COMMAND ...) ;;; Checking type of #:LET371 to be LIST ;;; Note: ;;; in file TOP.LSP, position 55227 ;;; at (DEFUN TPL-WAITING-COMMAND ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST369) to be LIST ;;; Note: ;;; in file TOP.LSP, position 55227 ;;; at (DEFUN TPL-WAITING-COMMAND ...) ;;; Checking type of (CONS-CDR #:LOOP-LIST369) to be LIST ;;; Compiling (DEFUN DEFAULT-DEBUGGER ...). ;;; Compiling (DEFUN INVOKE-DEBUGGER ...). ;;; Compiling (DEFUN SAFE-EVAL ...). ;;; Function SAFE-EVAL proclaimed (0,65536) ;;; End of Pass 1. ;;; Emitting code for TOP-LEVEL. ;;; Emitting code for CANDIDATE-TO-GET-CONSOLE-P. ;;; Emitting code for REGISTER-IN-WAITING-LIST. ;;; Emitting code for DELETE-FROM-WAITING-LIST. ;;; Emitting code for GRAB-CONSOLE. ;;; Emitting code for RELEASE-CONSOLE. ;;; Emitting code for WITH-GRABBED-CONSOLE. ;;; Emitting code for SIMPLE-TERMINAL-INTERRUPT. ;;; Emitting code for SHOW-PROCESS-LIST. ;;; Emitting code for QUERY-PROCESS. ;;; Emitting code for SINGLE-THREADED-TERMINAL-INTERRUPT. ;;; Emitting code for #:G82. ;;; Emitting code for TERMINAL-INTERRUPT. ;;; Emitting code for DO-QUERY-PROCESS. ;;; Emitting code for #:G111. ;;; Emitting code for #:G112. ;;; Emitting code for #:G113. ;;; Emitting code for TPL. ;;; Emitting code for REP. ;;; Emitting code for #:G134. ;;; Emitting code for #:G135. ;;; Emitting code for #:G141. ;;; Emitting code for #:G142. ;;; Emitting code for #:G123. ;;; Emitting code for TPL-PROMPT. ;;; Emitting code for TPL-READ. ;;; Emitting code for HARDEN-COMMAND. ;;; Emitting code for TPL-MAKE-COMMAND. ;;; Emitting code for TPL-PARSE-FORMS. ;;; Emitting code for TPL-PARSE-STRINGS. ;;; Emitting code for #:G172. ;;; Emitting code for TPL-PRINT. ;;; Emitting code for TPL-UNKNOWN-COMMAND. ;;; Emitting code for TPL-POP-COMMAND. ;;; Emitting code for TPL-QUIT-COMMAND. ;;; Emitting code for TPL-PREVIOUS. ;;; Emitting code for TPL-NEXT. ;;; Emitting code for TPL-GO. ;;; Emitting code for TPL-PRINT-MESSAGE. ;;; Emitting code for TPL-DISASSEMBLE-COMMAND. ;;; Emitting code for TPL-LAMBDA-EXPRESSION-COMMAND. ;;; Emitting code for RECONSTRUCT-BYTECODES-LAMBDA-LIST. ;;; Emitting code for LAMBDA-LIST-FROM-ANNOTATIONS. ;;; Emitting code for FUNCTION-LAMBDA-LIST. ;;; Emitting code for DECODE-ENV-ELT. ;;; Emitting code for DECODE-IHS-ENV. ;;; Emitting code for IHS-ENVIRONMENT. ;;; Emitting code for EXTRACT-RESTARTS. ;;; Emitting code for SPECIAL-VARIABLES-ALIST. ;;; Emitting code for NEWLY-BOUND-SPECIAL-VARIABLES. ;;; Emitting code for TPL-PRINT-VARIABLES. ;;; Emitting code for TPL-VARIABLES-COMMAND. ;;; Emitting code for TPL-INSPECT-COMMAND. ;;; Emitting code for TPL-BDS-COMMAND. ;;; Emitting code for TPL-BACKTRACE. ;;; Emitting code for TPL-FRS-COMMAND. ;;; Emitting code for PRINT-FRS. ;;; Emitting code for BREAK-WHERE. ;;; Emitting code for TPL-PRINT-CURRENT. ;;; Emitting code for TPL-HIDE. ;;; Emitting code for TPL-UNHIDE. ;;; Emitting code for TPL-UNHIDE-PACKAGE. ;;; Emitting code for TPL-UNHIDE-ALL. ;;; Emitting code for TPL-HIDE-PACKAGE. ;;; Emitting code for IHS-VISIBLE. ;;; Emitting code for IHS-FNAME. ;;; Emitting code for SET-CURRENT-IHS. ;;; Emitting code for SET-BREAK-ENV. ;;; Emitting code for IHS-SEARCH. ;;; Emitting code for TPL-BACKWARD-SEARCH. ;;; Emitting code for TPL-FORWARD-SEARCH. ;;; Emitting code for TPL-APROPOS-COMMAND. ;;; Emitting code for TPL-DOCUMENT-COMMAND. ;;; Emitting code for TPL-STEP-COMMAND. ;;; Emitting code for TPL-TRACE-COMMAND. ;;; Emitting code for TPL-UNTRACE-COMMAND. ;;; Emitting code for TPL-LOAD-COMMAND. ;;; Emitting code for TPL-COMPILE-COMMAND. ;;; Emitting code for TPL-HELP-COMMAND. ;;; Emitting code for TPL-HELP-STACK-COMMAND. ;;; Emitting code for COMPUTE-RESTART-COMMANDS. ;;; Emitting code for UPDATE-DEBUG-COMMANDS. ;;; Emitting code for #:G358. ;;; Emitting code for CHECK-DEFAULT-DEBUGGER-RUNAWAY. ;;; Emitting code for TPL-SWITCH-COMMAND. ;;; Emitting code for TPL-WAITING-COMMAND. ;;; Emitting code for DEFAULT-DEBUGGER. ;;; Emitting code for INVOKE-DEBUGGER. ;;; Emitting code for SAFE-EVAL. ;;; Emitting code for #:G375. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/top.c -o clos/top.o ;;; Finished compiling SRC:LSP;TOP.LSP. ;;; (compile-file "src:lsp;process.lsp" :output-file #P"BUILD:CLOS;PROCESS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;PROCESS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFSTRUCT (EXTERNAL-PROCESS #) ...). ;;; Compiling (DEFUN EXTERNAL-PROCESS-STATUS ...). ;;; Compiling (DEFUN SYSTEM ...). ;;; Function SYSTEM proclaimed (1,1) ;;; End of Pass 1. ;;; Emitting code for MAKE-EXTERNAL-PROCESS. ;;; Emitting code for EXTERNAL-PROCESS-STATUS. ;;; Emitting code for SYSTEM. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/process.c -o clos/process.o ;;; Finished compiling SRC:LSP;PROCESS.LSP. ;;; (compile-file "src:lsp;unicode.lsp" :output-file #P"BUILD:CLOS;UNICODE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:LSP;UNICODE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFINE-CONDITION CHARACTER-CODING-ERROR ...). ;;; Compiling (DEFINE-CONDITION CHARACTER-ENCODING-ERROR ...). ;;; Compiling (DEFINE-CONDITION CHARACTER-DECODING-ERROR ...). ;;; Compiling (DEFINE-CONDITION STREAM-ENCODING-ERROR ...). ;;; Compiling (DEFINE-CONDITION STREAM-DECODING-ERROR ...). ;;; Compiling (DEFUN ENCODING-ERROR ...). ;;; Compiling (DEFUN DECODING-ERROR ...). ;;; End of Pass 1. ;;; Emitting code for #:G0. ;;; Emitting code for #:G1. ;;; Emitting code for #:G4. ;;; Emitting code for #:G5. ;;; Emitting code for ENCODING-ERROR. ;;; Emitting code for #:G13. ;;; Emitting code for #:G14. ;;; Emitting code for #:G15. ;;; Emitting code for #:G16. ;;; Emitting code for DECODING-ERROR. ;;; Emitting code for #:G26. ;;; Emitting code for #:G27. ;;; Emitting code for #:G28. ;;; Emitting code for #:G29. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/unicode.c -o clos/unicode.o ;;; Finished compiling SRC:LSP;UNICODE.LSP. ;;; (compile-file "ext:bytecmp;bytecmp.lsp" :output-file #P"BUILD:CLOS;BYTECMP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:BYTECMP;BYTECMP.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN BC-DISASSEMBLE ...). ;;; Compiling (DEFUN BC-COMPILE ...). ;;; Compiling (DEFUN BC-COMPILE-FILE-PATHNAME ...). ;;; Style warning: ;;; in file BYTECMP.LSP, position 2294 ;;; at (DEFUN BC-COMPILE-FILE-PATHNAME ...) ;;; ! The variable EXTERNAL-FORMAT is not used. ;;; Compiling (DEFUN BC-COMPILE-FILE ...). ;;; Note: ;;; in file BYTECMP.LSP, position 2784 ;;; at (DEFUN BC-COMPILE-FILE ...) ;;; Checking type of *SOURCE-LOCATION* to be CONS ;;; Note: ;;; in file BYTECMP.LSP, position 2784 ;;; at (DEFUN BC-COMPILE-FILE ...) ;;; Checking type of #:LOOP-LIST-TAIL11 to be CONS ;;; Compiling (DEFUN INSTALL-BYTECODES-COMPILER ...). ;;; Compiling (DEFUN INSTALL-C-COMPILER ...). ;;; End of Pass 1. ;;; Emitting code for BC-DISASSEMBLE. ;;; Emitting code for BC-COMPILE. ;;; Emitting code for BC-COMPILE-FILE-PATHNAME. ;;; Emitting code for BC-COMPILE-FILE. ;;; Emitting code for INSTALL-BYTECODES-COMPILER. ;;; Emitting code for INSTALL-C-COMPILER. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/bytecmp.c -o clos/bytecmp.o ;;; Finished compiling EXT:BYTECMP;BYTECMP.LSP. ;;; (compile-file "ext:ecl-cdb;ecl-cdb.lisp" :output-file #P"BUILD:CLOS;ECL-CDB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:ECL-CDB;ECL-CDB.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFSTRUCT CDB ...). ;;; Compiling (DEFUN READ-WORD ...). ;;; Compiling (DEFUN WRITE-WORD ...). ;;; Compiling (DEFUN WRITE-VECTOR ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 3132 ;;; at (DEFUN WRITE-VECTOR ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-1) to be FIXNUM ;;; Compiling (DEFUN TO-CDB-HASH ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32). Assuming it is T. ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Checking type of #:LET10 to be (UNSIGNED-BYTE 8) ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Checking type of (AREF #:LOOP-ACROSS-VECTOR-7 #:LOOP-ACROSS-INDEX-8) to be (UNSIGNED-BYTE 8) ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-8) to be FIXNUM ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32). Assuming it is T. ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32). Assuming it is T. ;;; Compiling (DEFUN %MAKE-CDB ...). ;;; Compiling (DEFMACRO WITH-OUTPUT-TO-CDB ...). ;;; Compiling (DEFUN ADD-RECORD ...). ;;; Compiling (DEFUN DUMP-TABLE ...). ;;; Compiling (DEFUN DUMP-CDB ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 6148 ;;; at (DEFUN DUMP-CDB ...) ;;; Checking type of #:LET61 to be VECTOR ;;; Note: ;;; in file ECL-CDB.LISP, position 6148 ;;; at (DEFUN DUMP-CDB ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-58) to be FIXNUM ;;; Note: ;;; in file ECL-CDB.LISP, position 6148 ;;; at (DEFUN DUMP-CDB ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-58) to be FIXNUM ;;; Compiling (DEFUN CLOSE-CDB ...). ;;; Compiling (DEFUN CDB-ERROR ...). ;;; Compiling (DEFUN VALUES-COINCIDE ...). ;;; Compiling (DEFUN LOOKUP-CDB ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 7705 ;;; at (DEFUN LOOKUP-CDB ...) ;;; Checking type of #:LET74 to be REAL ;;; Compiling (DEFUN MAP-CDB ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 9147 ;;; at (DEFUN MAP-CDB ...) ;;; Checking type of #:LET83 to be REAL ;;; Note: ;;; in file ECL-CDB.LISP, position 9147 ;;; at (DEFUN MAP-CDB ...) ;;; Checking type of TABLE-POSITION to be REAL ;;; End of Pass 1. ;;; Note: ;;; in file ecl-cdb.lisp, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32). Assuming it is T. ;;; Note: ;;; in file ecl-cdb.lisp, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32) ;;; Emitting code for MAKE-CDB. ;;; Emitting code for READ-WORD. ;;; Emitting code for WRITE-WORD. ;;; Emitting code for WRITE-VECTOR. ;;; Emitting code for TO-CDB-HASH. ;;; Emitting code for %MAKE-CDB. ;;; Emitting code for WITH-OUTPUT-TO-CDB. ;;; Emitting code for ADD-RECORD. ;;; Emitting code for DUMP-TABLE. ;;; Emitting code for DUMP-CDB. ;;; Emitting code for CLOSE-CDB. ;;; Emitting code for CDB-ERROR. ;;; Emitting code for VALUES-COINCIDE. ;;; Emitting code for LOOKUP-CDB. ;;; Emitting code for MAP-CDB. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/ecl-cdb.c -o clos/ecl-cdb.o ;;; Finished compiling EXT:ECL-CDB;ECL-CDB.LISP. ;;; (compile-file "ext:ecl-cdb;ecl-help.lisp" :output-file #P"BUILD:CLOS;ECL-HELP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:ECL-CDB;ECL-HELP.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN TO-CDB-VECTOR ...). ;;; Compiling (DEFUN FROM-CDB-VECTOR ...). ;;; Compiling (DEFUN SEARCH-HELP-FILE ...). ;;; Compiling (DEFUN DUMP-HELP-FILE ...). ;;; End of Pass 1. ;;; Emitting code for TO-CDB-VECTOR. ;;; Emitting code for FROM-CDB-VECTOR. ;;; Emitting code for SEARCH-HELP-FILE. ;;; Emitting code for DUMP-HELP-FILE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/ecl-help.c -o clos/ecl-help.o ;;; Finished compiling EXT:ECL-CDB;ECL-HELP.LISP. ;;; (compile-file "src:clos;walk.lsp" :output-file #P"BUILD:CLOS;WALK.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLOS;WALK.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN UNBOUND-LEXICAL-FUNCTION ...). ;;; Compiling (DEFMACRO WITH-AUGMENTED-ENVIRONMENT ...). ;;; Compiling (DEFUN WITH-AUGMENTED-ENVIRONMENT-INTERNAL ...). ;;; Compiling (DEFUN ENVIRONMENT-MACRO ...). ;;; Compiling (DEFMACRO WITH-NEW-DEFINITION-IN-ENVIRONMENT ...). ;;; Compiling (DEFUN CONVERT-MACRO-TO-LAMBDA ...). ;;; Compiling (DEFMACRO WALKER-ENVIRONMENT-BIND ...). ;;; Compiling (DEFVAR *KEY-TO-WALKER-ENVIRONMENT* ...). ;;; Compiling (DEFUN ENV-LOCK ...). ;;; Compiling (DEFUN WALKER-ENVIRONMENT-BIND-1 ...). ;;; Compiling (DEFUN ENV-WALK-FUNCTION ...). ;;; Compiling (DEFUN ENV-WALK-FORM ...). ;;; Compiling (DEFUN ENV-DECLARATIONS ...). ;;; Compiling (DEFUN ENV-LEXICAL-VARIABLES ...). ;;; Compiling (DEFUN NOTE-DECLARATION ...). ;;; Note: ;;; in file WALK.LSP, position 9814 ;;; at (DEFUN NOTE-DECLARATION ...) ;;; Checking type of (CDDR #:G53) to be CONS ;;; Compiling (DEFUN NOTE-LEXICAL-BINDING ...). ;;; Note: ;;; in file WALK.LSP, position 9929 ;;; at (DEFUN NOTE-LEXICAL-BINDING ...) ;;; Checking type of (CDDDR #:G56) to be CONS ;;; Compiling (DEFUN VARIABLE-LEXICAL-P ...). ;;; Compiling (DEFUN VARIABLE-SYMBOL-MACRO-P ...). ;;; Compiling (DEFVAR *VARIABLE-DECLARATIONS* ...). ;;; Compiling (DEFUN VARIABLE-DECLARATION ...). ;;; Compiling (DEFUN VARIABLE-SPECIAL-P ...). ;;; Compiling (DEFUN VARIABLE-GLOBALLY-SPECIAL-P ...). ;;; Compiling (DEFMACRO GET-WALKER-TEMPLATE-INTERNAL ...). ;;; Compiling (DEFMACRO DEFINE-WALKER-TEMPLATE ...). ;;; Compiling (DEFUN GET-WALKER-TEMPLATE ...). ;;; Compiling (DEFUN GET-IMPLEMENTATION-DEPENDENT-WALKER-TEMPLATE ...). ;;; Compiling (DEFVAR WALK-FORM-EXPAND-MACROS-P ...). ;;; Compiling (DEFUN MACROEXPAND-ALL ...). ;;; Compiling (DEFUN WALK-FORM ...). ;;; Compiling (DEFUN WALK-FORM-INTERNAL ...). ;;; Compiling (DEFUN WALK-TEMPLATE ...). ;;; Compiling (DEFUN WALK-TEMPLATE-HANDLE-REPEAT ...). ;;; Compiling (DEFUN WALK-TEMPLATE-HANDLE-REPEAT-1 ...). ;;; Compiling (DEFUN WALK-REPEAT-EVAL ...). ;;; Compiling (DEFUN RECONS ...). ;;; Compiling (DEFUN RELIST ...). ;;; Compiling (DEFUN RELIST* ...). ;;; Compiling (DEFUN RELIST-INTERNAL ...). ;;; Compiling (DEFUN WALK-DECLARATIONS ...). ;;; Compiling (DEFUN WALK-UNEXPECTED-DECLARE ...). ;;; Compiling (DEFUN WALK-ARGLIST ...). ;;; Compiling (DEFUN WALK-LET ...). ;;; Compiling (DEFUN WALK-LET* ...). ;;; Compiling (DEFUN WALK-PROG ...). ;;; Compiling (DEFUN WALK-PROG* ...). ;;; Compiling (DEFUN WALK-DO ...). ;;; Compiling (DEFUN WALK-DO* ...). ;;; Compiling (DEFUN WALK-LET/LET* ...). ;;; Compiling (DEFUN WALK-LOCALLY ...). ;;; Compiling (DEFUN WALK-PROG/PROG* ...). ;;; Compiling (DEFUN WALK-DO/DO* ...). ;;; Compiling (DEFUN WALK-DOTIMES/DOLIST ...). ;;; Compiling (DEFUN WALK-MULTIPLE-VALUE-SETQ ...). ;;; Note: ;;; in file WALK.LSP, position 37869 ;;; at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...) ;;; Checking type of #:LET107 to be LIST ;;; Note: ;;; in file WALK.LSP, position 37869 ;;; at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST102) to be LIST ;;; Note: ;;; in file WALK.LSP, position 37869 ;;; at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...) ;;; Checking type of #:LOOP-LIST-TAIL104 to be CONS ;;; Note: ;;; in file WALK.LSP, position 37869 ;;; at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...) ;;; Checking type of #:LET117 to be LIST ;;; Note: ;;; in file WALK.LSP, position 37869 ;;; at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...) ;;; Checking type of #:LET119 to be LIST ;;; Note: ;;; in file WALK.LSP, position 37869 ;;; at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST111) to be LIST ;;; Note: ;;; in file WALK.LSP, position 37869 ;;; at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST112) to be LIST ;;; Note: ;;; in file WALK.LSP, position 37869 ;;; at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...) ;;; Checking type of #:LOOP-LIST-TAIL114 to be CONS ;;; Compiling (DEFUN WALK-MULTIPLE-VALUE-BIND ...). ;;; Compiling (DEFUN WALK-BINDINGS-1 ...). ;;; Compiling (DEFUN WALK-BINDINGS-2 ...). ;;; Compiling (DEFUN WALK-LAMBDA ...). ;;; Compiling (DEFUN WALK-NAMED-LAMBDA ...). ;;; Compiling (DEFUN WALK-SETQ ...). ;;; Compiling (DEFUN WALK-SYMBOL-MACROLET ...). ;;; Note: ;;; in file WALK.LSP, position 43538 ;;; at (DEFUN WALK-SYMBOL-MACROLET ...) ;;; Checking type of #:LET140 to be LIST ;;; Note: ;;; in file WALK.LSP, position 43538 ;;; at (DEFUN WALK-SYMBOL-MACROLET ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST135) to be LIST ;;; Note: ;;; in file WALK.LSP, position 43538 ;;; at (DEFUN WALK-SYMBOL-MACROLET ...) ;;; Checking type of #:LOOP-LIST-TAIL137 to be CONS ;;; Compiling (DEFUN WALK-TAGBODY ...). ;;; Compiling (DEFUN WALK-TAGBODY-1 ...). ;;; Compiling (DEFUN WALK-COMPILER-LET ...). ;;; Compiling (DEFUN WALK-MACROLET ...). ;;; Compiling (DEFUN WALK-FLET ...). ;;; Compiling (DEFUN WALK-LABELS ...). ;;; Compiling (DEFUN WALK-IF ...). ;;; Compiling (DEFUN WALK-WHEN/UNLESS ...). ;;; Compiling (DEFUN WALK-C-INLINE ...). ;;; End of Pass 1. ;;; Emitting code for UNBOUND-LEXICAL-FUNCTION. ;;; Emitting code for WITH-AUGMENTED-ENVIRONMENT. ;;; Emitting code for WITH-AUGMENTED-ENVIRONMENT-INTERNAL. ;;; Emitting code for ENVIRONMENT-MACRO. ;;; Emitting code for WITH-NEW-DEFINITION-IN-ENVIRONMENT. ;;; Emitting code for CONVERT-MACRO-TO-LAMBDA. ;;; Emitting code for WALKER-ENVIRONMENT-BIND. ;;; Emitting code for ENV-LOCK. ;;; Emitting code for WALKER-ENVIRONMENT-BIND-1. ;;; Emitting code for ENV-WALK-FUNCTION. ;;; Emitting code for ENV-WALK-FORM. ;;; Emitting code for ENV-DECLARATIONS. ;;; Emitting code for ENV-LEXICAL-VARIABLES. ;;; Emitting code for NOTE-DECLARATION. ;;; Emitting code for NOTE-LEXICAL-BINDING. ;;; Emitting code for VARIABLE-LEXICAL-P. ;;; Emitting code for VARIABLE-SYMBOL-MACRO-P. ;;; Emitting code for VARIABLE-DECLARATION. ;;; Emitting code for VARIABLE-SPECIAL-P. ;;; Emitting code for VARIABLE-GLOBALLY-SPECIAL-P. ;;; Emitting code for GET-WALKER-TEMPLATE-INTERNAL. ;;; Emitting code for DEFINE-WALKER-TEMPLATE. ;;; Emitting code for GET-WALKER-TEMPLATE. ;;; Emitting code for GET-IMPLEMENTATION-DEPENDENT-WALKER-TEMPLATE. ;;; Emitting code for MACROEXPAND-ALL. ;;; Emitting code for WALK-FORM. ;;; Emitting code for #:G87. ;;; Emitting code for WALK-FORM-INTERNAL. ;;; Emitting code for WALK-TEMPLATE. ;;; Emitting code for WALK-TEMPLATE-HANDLE-REPEAT. ;;; Emitting code for WALK-TEMPLATE-HANDLE-REPEAT-1. ;;; Emitting code for WALK-REPEAT-EVAL. ;;; Emitting code for RECONS. ;;; Emitting code for RELIST. ;;; Emitting code for RELIST*. ;;; Emitting code for RELIST-INTERNAL. ;;; Emitting code for WALK-DECLARATIONS. ;;; Emitting code for WALK-UNEXPECTED-DECLARE. ;;; Emitting code for WALK-ARGLIST. ;;; Emitting code for WALK-LET. ;;; Emitting code for WALK-LET*. ;;; Emitting code for WALK-PROG. ;;; Emitting code for WALK-PROG*. ;;; Emitting code for WALK-DO. ;;; Emitting code for WALK-DO*. ;;; Emitting code for WALK-LET/LET*. ;;; Emitting code for WALK-LOCALLY. ;;; Emitting code for WALK-PROG/PROG*. ;;; Emitting code for #:G98. ;;; Emitting code for WALK-DO/DO*. ;;; Emitting code for WALK-DOTIMES/DOLIST. ;;; Emitting code for WALK-MULTIPLE-VALUE-SETQ. ;;; Emitting code for #:G99. ;;; Emitting code for #:G105. ;;; Emitting code for #:G115. ;;; Emitting code for WALK-MULTIPLE-VALUE-BIND. ;;; Emitting code for #:G120. ;;; Emitting code for WALK-BINDINGS-1. ;;; Emitting code for WALK-BINDINGS-2. ;;; Emitting code for WALK-LAMBDA. ;;; Emitting code for WALK-NAMED-LAMBDA. ;;; Emitting code for WALK-SETQ. ;;; Emitting code for WALK-SYMBOL-MACROLET. ;;; Emitting code for #:G138. ;;; Emitting code for WALK-TAGBODY. ;;; Emitting code for WALK-TAGBODY-1. ;;; Emitting code for WALK-COMPILER-LET. ;;; Emitting code for WALK-MACROLET. ;;; Emitting code for WALK-DEFINITIONS. ;;; Emitting code for WALK-FLET. ;;; Emitting code for WALK-DEFINITIONS. ;;; Emitting code for WALK-LABELS. ;;; Emitting code for WALK-DEFINITIONS. ;;; Emitting code for WALK-IF. ;;; Emitting code for WALK-WHEN/UNLESS. ;;; Emitting code for WALK-C-INLINE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clos/walk.c -o clos/walk.o ;;; Finished compiling SRC:CLOS;WALK.LSP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -DECL_API -I/<>/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitSHZOx4.c -o eclinitSHZOx4.o ;;; Note: ;;; Invoking external command: ;;; ar cr liblsp.a eclinitSHZOx4.o lsp/export.o lsp/defmacro.o lsp/helpfile.o lsp/evalmacros.o lsp/cmuutil.o lsp/setf.o lsp/predlib.o lsp/seq.o lsp/arraylib.o lsp/assert.o lsp/defstruct.o lsp/iolib.o lsp/listlib.o lsp/mislib.o lsp/numlib.o lsp/packlib.o lsp/seqlib.o lsp/trace.o lsp/loop2.o lsp/format.o lsp/defpackage.o lsp/ffi.o lsp/mp.o lsp/config.o lsp/module.o lsp/cmdline.o lsp/autoload.o lsp/cdr-5.o clos/package.o clos/cpl.o clos/std-slot-value.o clos/slot.o clos/boot.o clos/kernel.o clos/method.o clos/combin.o clos/std-accessors.o clos/defclass.o clos/slotvalue.o clos/standard.o clos/builtin.o clos/change.o clos/stdmethod.o clos/generic.o clos/fixup.o clos/conditions.o clos/print.o clos/streams.o clos/pprint.o clos/describe.o clos/inspect.o clos/top.o clos/process.o clos/unicode.o clos/bytecmp.o clos/ecl-cdb.o clos/ecl-help.o clos/walk.o ;;; Note: ;;; Invoking external command: ;;; ranlib liblsp.a NIL ;;; Note: ;;; Invoking external command: ;;; gcc -o libecl.so -L/<>/build/ c/main.o c/all_symbols2.o liblsp.a libeclmin.a -shared -Wl,-soname,libecl.so.16.1 -latomic_ops -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "src:cmp;cmppackage.lsp" :output-file #P"BUILD:CMP;CMPPACKAGE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPPACKAGE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmppackage.c -o cmp/cmppackage.o ;;; Finished compiling SRC:CMP;CMPPACKAGE.LSP. ;;; (compile-file "src:cmp;cmptypes.lsp" :output-file #P"BUILD:CMP;CMPTYPES.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPTYPES.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFSTRUCT (REF #) ...). ;;; Compiling (DEFSTRUCT (VAR # ...) ...). ;;; Compiling (DEFSTRUCT (FUN #) ...). ;;; Compiling (DEFSTRUCT (BLK #) ...). ;;; Compiling (DEFSTRUCT (TAG #) ...). ;;; Compiling (DEFSTRUCT (INFO) ...). ;;; Compiling (DEFSTRUCT (INLINE-INFO) ...). ;;; Compiling (DEFSTRUCT (C1FORM # ...) ...). ;;; Compiling (DEFSTRUCT VV ...). ;;; Compiling (DEFSTRUCT MACHINE ...). ;;; Compiling (DEFSTRUCT (REP-TYPE #) ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-REF. ;;; Emitting code for OBJECT. ;;; Emitting code for %MAKE-VAR. ;;; Emitting code for MAKE-FUN. ;;; Emitting code for MAKE-BLK. ;;; Emitting code for MAKE-TAG. ;;; Emitting code for MAKE-INFO. ;;; Emitting code for MAKE-INLINE-INFO. ;;; Emitting code for DO-MAKE-C1FORM. ;;; Emitting code for MAKE-VV. ;;; Emitting code for MAKE-MACHINE. ;;; Emitting code for %MAKE-REP-TYPE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmptypes.c -o cmp/cmptypes.o ;;; Finished compiling SRC:CMP;CMPTYPES.LSP. ;;; (compile-file "src:cmp;cmpglobals.lsp" :output-file #P"BUILD:CMP;CMPGLOBALS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPGLOBALS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *INFO* ...). ;;; Compiling (DEFVAR *INLINE-BLOCKS* ...). ;;; Compiling (DEFVAR *OPENED-C-BRACES* ...). ;;; Compiling (DEFVAR *INLINE-MAX-DEPTH* ...). ;;; Compiling (DEFVAR *INLINE-INFORMATION* ...). ;;; Compiling (DEFVAR *CURRENT-FORM* ...). ;;; Compiling (DEFVAR *CURRENT-TOPLEVEL-FORM* ...). ;;; Compiling (DEFVAR *COMPILE-FILE-POSITION* ...). ;;; Compiling (DEFVAR *FIRST-ERROR* ...). ;;; Compiling (DEFVAR *ACTIVE-PROTECTION* ...). ;;; Compiling (DEFVAR *PENDING-ACTIONS* ...). ;;; Compiling (DEFVAR *COMPILER-CONDITIONS* ...). ;;; Compiling (DEFVAR *COMPILE-PRINT* ...). ;;; Compiling (DEFVAR *COMPILE-VERBOSE* ...). ;;; Compiling (DEFVAR *COMPILER-FEATURES* ...). ;;; Compiling (DEFVAR *SUPPRESS-COMPILER-MESSAGES* ...). ;;; Compiling (DEFVAR *COMPILER-BREAK-ENABLE* ...). ;;; Compiling (DEFVAR *COMPILER-IN-USE* ...). ;;; Compiling (DEFVAR *COMPILER-INPUT*). ;;; Compiling (DEFVAR *COMPILER-OUTPUT1*). ;;; Compiling (DEFVAR *COMPILER-OUTPUT2*). ;;; Compiling (DEFVAR *CALLBACKS* ...). ;;; Compiling (DEFVAR *MACHINE* ...). ;;; Compiling (DEFVAR *COMPILE-TO-LINKING-CALL* ...). ;;; Compiling (DEFVAR *COMPILER-DECLARED-GLOBALS*). ;;; Compiling (DEFVAR *SAFETY* ...). ;;; Compiling (DEFVAR *SPEED* ...). ;;; Compiling (DEFVAR *SPACE* ...). ;;; Compiling (DEFVAR *DEBUG* ...). ;;; Compiling (DEFVAR *AUTOMATIC-CHECK-TYPE-IN-LAMBDA* ...). ;;; Compiling (DEFVAR *LCL* ...). ;;; Compiling (DEFVAR *TEMP* ...). ;;; Compiling (DEFVAR *MAX-TEMP* ...). ;;; Compiling (DEFVAR *LEVEL* ...). ;;; Compiling (DEFVAR *LEX* ...). ;;; Compiling (DEFVAR *MAX-LEX* ...). ;;; Compiling (DEFVAR *ENV* ...). ;;; Compiling (DEFVAR *MAX-ENV* ...). ;;; Compiling (DEFVAR *ENV-LVL* ...). ;;; Compiling (DEFVAR *AUX-CLOSURE* ...). ;;; Compiling (DEFVAR *IHS-USED-P* ...). ;;; Compiling (DEFVAR *NEXT-CMACRO* ...). ;;; Compiling (DEFVAR *NEXT-CFUN* ...). ;;; Compiling (DEFVAR *TAIL-RECURSION-INFO* ...). ;;; Compiling (DEFVAR *ALLOW-C-LOCAL-DECLARATION* ...). ;;; Compiling (DEFVAR *LAST-LABEL* ...). ;;; Compiling (DEFVAR *EXIT*). ;;; Compiling (DEFVAR *UNWIND-EXIT*). ;;; Compiling (DEFVAR *CURRENT-FUNCTION* ...). ;;; Compiling (DEFVAR *CMP-ENV* ...). ;;; Compiling (DEFVAR *CMP-ENV-ROOT* ...). ;;; Compiling (DEFVAR *DESTINATION*). ;;; Compiling (DEFVAR *DEBUG-COMPILER* ...). ;;; Compiling (DEFVAR *DELETE-FILES* ...). ;;; Compiling (DEFVAR *FILES-TO-BE-DELETED* ...). ;;; Compiling (DEFVAR *USER-LD-FLAGS* ...). ;;; Compiling (DEFVAR *USER-CC-FLAGS* ...). ;;; Compiling (DEFVAR *DO-TYPE-PROPAGATION* ...). ;;; Compiling (DEFVAR *COMPILER-PHASE* ...). ;;; Compiling (DEFVAR *VOLATILE*). ;;; Compiling (DEFVAR *SETJMPS* ...). ;;; Compiling (DEFVAR *COMPILE-TOPLEVEL* ...). ;;; Compiling (DEFVAR *CLINES-STRING-LIST* ...). ;;; Compiling (DEFVAR *COMPILE-TIME-TOO* ...). ;;; Compiling (DEFVAR *NOT-COMPILE-TIME* ...). ;;; Compiling (DEFVAR *PERMANENT-DATA* ...). ;;; Compiling (DEFVAR *PERMANENT-OBJECTS* ...). ;;; Compiling (DEFVAR *TEMPORARY-OBJECTS* ...). ;;; Compiling (DEFVAR *LOAD-OBJECTS* ...). ;;; Compiling (DEFVAR *LOAD-TIME-VALUES* ...). ;;; Compiling (DEFVAR *SETF-DEFINITIONS* ...). ;;; Compiling (DEFVAR *OPTIMIZABLE-CONSTANTS* ...). ;;; Compiling (DEFVAR *USE-STATIC-CONSTANTS-P* ...). ;;; Compiling (DEFVAR *STATIC-CONSTANTS* ...). ;;; Compiling (DEFVAR *COMPILER-CONSTANTS* ...). ;;; Compiling (DEFVAR *PROCLAIM-FIXED-ARGS* ...). ;;; Compiling (DEFVAR *GLOBAL-VARS* ...). ;;; Compiling (DEFVAR *GLOBAL-FUNS* ...). ;;; Compiling (DEFVAR *USE-C-GLOBAL* ...). ;;; Compiling (DEFVAR *GLOBAL-CFUNS-ARRAY* ...). ;;; Compiling (DEFVAR *LINKING-CALLS* ...). ;;; Compiling (DEFVAR *LOCAL-FUNS* ...). ;;; Compiling (DEFVAR *TOP-LEVEL-FORMS* ...). ;;; Compiling (DEFVAR *MAKE-FORMS* ...). ;;; Compiling (DEFVAR *GLOBAL-ENTRIES* ...). ;;; Compiling (DEFVAR *GLOBAL-MACROS* ...). ;;; Compiling (DEFVAR *SELF-DESTRUCTING-FASL* ...). ;;; Compiling (DEFVAR *UNDEFINED-VARS* ...). ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpglobals.c -o cmp/cmpglobals.o ;;; Finished compiling SRC:CMP;CMPGLOBALS.LSP. ;;; (compile-file "build:cmp;cmpdefs.lsp" :output-file #P"BUILD:CMP;CMPDEFS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling BUILD:CMP;CMPDEFS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *CMPINCLUDE* ...). ;;; Compiling (DEFVAR *CC* ...). ;;; Compiling (DEFVAR *LD* ...). ;;; Compiling (DEFVAR *RANLIB* ...). ;;; Compiling (DEFVAR *AR* ...). ;;; Compiling (DEFVAR *CC-FLAGS* ...). ;;; Compiling (DEFVAR *CC-OPTIMIZE* ...). ;;; Compiling (DEFVAR *LD-FORMAT* ...). ;;; Compiling (DEFVAR *CC-FORMAT* ...). ;;; Compiling (DEFVAR *CC-IS-CXX* ...). ;;; Compiling (DEFVAR *LD-FLAGS* ...). ;;; Compiling (DEFVAR *LD-SHARED-FLAGS* ...). ;;; Compiling (DEFVAR *LD-BUNDLE-FLAGS* ...). ;;; Compiling (DEFVAR +SHARED-LIBRARY-PREFIX+ ...). ;;; Compiling (DEFVAR +SHARED-LIBRARY-EXTENSION+ ...). ;;; Compiling (DEFVAR +SHARED-LIBRARY-FORMAT+ ...). ;;; Compiling (DEFVAR +STATIC-LIBRARY-PREFIX+ ...). ;;; Compiling (DEFVAR +STATIC-LIBRARY-EXTENSION+ ...). ;;; Compiling (DEFVAR +STATIC-LIBRARY-FORMAT+ ...). ;;; Compiling (DEFVAR +OBJECT-FILE-EXTENSION+ ...). ;;; Compiling (DEFVAR +EXECUTABLE-FILE-FORMAT+ ...). ;;; Compiling (DEFVAR *ECL-INCLUDE-DIRECTORY* ...). ;;; Compiling (DEFVAR *ECL-LIBRARY-DIRECTORY* ...). ;;; Compiling (DEFVAR *LD-RPATH* ...). ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpdefs.c -o cmp/cmpdefs.o ;;; Finished compiling BUILD:CMP;CMPDEFS.LSP. ;;; (compile-file "src:cmp;cmpmac.lsp" :output-file #P"BUILD:CMP;CMPMAC.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPMAC.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO DEFUN-CACHED ...). ;;; Note: ;;; in file CMPMAC.LSP, position 534 ;;; at (FSET 'DEFUN-CACHED ...) ;;; Checking type of #:LET31 to be LIST ;;; Note: ;;; in file CMPMAC.LSP, position 534 ;;; at (FSET 'DEFUN-CACHED ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST27) to be LIST ;;; Note: ;;; in file CMPMAC.LSP, position 534 ;;; at (FSET 'DEFUN-CACHED ...) ;;; Checking type of #:LOOP-LIST-TAIL29 to be CONS ;;; Compiling (DEFMACRO DEFUN-EQUAL-CACHED ...). ;;; Compiling (DEFUN-CACHED ENV-VAR-NAME ...). ;;; Compiling (DEFUN-CACHED ENV-VAR-NAME ...). ;;; Compiling (DEFUN-CACHED ENV-VAR-NAME ...). ;;; Note: ;;; in file CMPMAC.LSP, position 2234 ;;; at (DEFUN-CACHED ENV-VAR-NAME ...) ;;; Checking type of (LOGAND (SI:HASH-EQL N) 1023) to be (INTEGER 0 1023) ;;; Warning: ;;; in file CMPMAC.LSP, position 2234 ;;; at (DEFUN-CACHED ENV-VAR-NAME ...) ;;; ! Declaration of type ;;; (ARRAY T (*)) ;;; was found for not bound variable *ENV-VAR-NAME-CACHE*. ;;; Note: ;;; in file CMPMAC.LSP, position 2234 ;;; at (DEFUN-CACHED ENV-VAR-NAME ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPMAC.LSP, position 2234 ;;; at (DEFUN-CACHED ENV-VAR-NAME ...) ;;; Checking type of #:G45 to be CONS ;;; Compiling (DEFUN-CACHED LEX-ENV-VAR-NAME ...). ;;; Compiling (DEFUN-CACHED LEX-ENV-VAR-NAME ...). ;;; Compiling (DEFUN-CACHED LEX-ENV-VAR-NAME ...). ;;; Note: ;;; in file CMPMAC.LSP, position 2295 ;;; at (DEFUN-CACHED LEX-ENV-VAR-NAME ...) ;;; Checking type of (LOGAND (SI:HASH-EQL N) 1023) to be (INTEGER 0 1023) ;;; Warning: ;;; in file CMPMAC.LSP, position 2295 ;;; at (DEFUN-CACHED LEX-ENV-VAR-NAME ...) ;;; ! Declaration of type ;;; (ARRAY T (*)) ;;; was found for not bound variable *LEX-ENV-VAR-NAME-CACHE*. ;;; Note: ;;; in file CMPMAC.LSP, position 2295 ;;; at (DEFUN-CACHED LEX-ENV-VAR-NAME ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPMAC.LSP, position 2295 ;;; at (DEFUN-CACHED LEX-ENV-VAR-NAME ...) ;;; Checking type of #:G56 to be CONS ;;; Compiling (DEFUN SAME-FNAME-P ...). ;;; Compiling (DEFMACRO NEXT-CMACRO ...). ;;; Compiling (DEFUN NEXT-LABEL ...). ;;; Compiling (DEFUN NEXT-LABEL* ...). ;;; Compiling (DEFUN LABELP ...). ;;; Compiling (DEFUN MAYBE-NEXT-LABEL ...). ;;; Compiling (DEFUN MAYBE-WT-LABEL ...). ;;; Compiling (DEFMACRO WITH-EXIT-LABEL ...). ;;; Compiling (DEFMACRO WITH-OPTIONAL-EXIT-LABEL ...). ;;; Compiling (DEFUN NEXT-LCL ...). ;;; Compiling (DEFUN NEXT-CFUN ...). ;;; Compiling (DEFUN NEXT-TEMP ...). ;;; Compiling (DEFUN NEXT-LEX ...). ;;; Compiling (DEFUN NEXT-ENV ...). ;;; Compiling (DEFMACRO RECKLESS ...). ;;; End of Pass 1. ;;; Emitting code for DEFUN-CACHED. ;;; Emitting code for DEFUN-EQUAL-CACHED. ;;; Emitting code for ENV-VAR-NAME-EMPTY-CACHE. ;;; Emitting code for ENV-VAR-NAME. ;;; Emitting code for ENV-VAR-NAME. ;;; Emitting code for LEX-ENV-VAR-NAME-EMPTY-CACHE. ;;; Emitting code for LEX-ENV-VAR-NAME. ;;; Emitting code for LEX-ENV-VAR-NAME. ;;; Emitting code for SAME-FNAME-P. ;;; Emitting code for NEXT-CMACRO. ;;; Emitting code for NEXT-LABEL. ;;; Emitting code for NEXT-LABEL*. ;;; Emitting code for LABELP. ;;; Emitting code for MAYBE-NEXT-LABEL. ;;; Emitting code for MAYBE-WT-LABEL. ;;; Emitting code for WITH-EXIT-LABEL. ;;; Emitting code for WITH-OPTIONAL-EXIT-LABEL. ;;; Emitting code for NEXT-LCL. ;;; Emitting code for NEXT-CFUN. ;;; Emitting code for NEXT-TEMP. ;;; Emitting code for NEXT-LEX. ;;; Emitting code for NEXT-ENV. ;;; Emitting code for RECKLESS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpmac.c -o cmp/cmpmac.o ;;; Finished compiling SRC:CMP;CMPMAC.LSP. ;;; (compile-file "src:cmp;cmpform.lsp" :output-file #P"BUILD:CMP;CMPFORM.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPFORM.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN PRINT-C1FORM ...). ;;; Compiling (DEFUN MAKE-C1FORM ...). ;;; Compiling (DEFUN MAKE-C1FORM* ...). ;;; Compiling (DEFUN C1FORM-ADD-INFO-LOOP ...). ;;; Compiling (DEFUN C1FORM-ADD-INFO ...). ;;; Compiling (DEFUN COPY-C1FORM ...). ;;; Compiling (DEFMACRO C1FORM-ARG ...). ;;; Compiling (DEFUN C1FORM-VOLATILE* ...). ;;; Compiling (DEFUN C1FORM-PRIMARY-TYPE ...). ;;; Compiling (DEFUN LOCATION-PRIMARY-TYPE ...). ;;; Compiling (DEFUN FIND-FORM-IN-NODE-LIST ...). ;;; Note: ;;; in file CMPFORM.LSP, position 4370 ;;; at (DEFUN FIND-FORM-IN-NODE-LIST ...) ;;; Checking type of #:LET39 to be LIST ;;; Note: ;;; in file CMPFORM.LSP, position 4370 ;;; at (DEFUN FIND-FORM-IN-NODE-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST36) to be LIST ;;; Note: ;;; in file CMPFORM.LSP, position 4370 ;;; at (DEFUN FIND-FORM-IN-NODE-LIST ...) ;;; Checking type of #:LET43 to be LIST ;;; Note: ;;; in file CMPFORM.LSP, position 4370 ;;; at (DEFUN FIND-FORM-IN-NODE-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST40) to be LIST ;;; Compiling (DEFUN ADD-FORM-TO-NODE-LIST ...). ;;; Compiling (DEFUN DELETE-FORM-FROM-NODE-LIST ...). ;;; Compiling (DEFUN TRAVERSE-C1FORM-TREE ...). ;;; Note: ;;; in file CMPFORM.LSP, position 5205 ;;; at (DEFUN TRAVERSE-C1FORM-TREE ...) ;;; Checking type of #:LET46 to be LIST ;;; Note: ;;; in file CMPFORM.LSP, position 5205 ;;; at (DEFUN TRAVERSE-C1FORM-TREE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST ;;; Note: ;;; in file CMPFORM.LSP, position 5205 ;;; at (DEFUN TRAVERSE-C1FORM-TREE ...) ;;; Checking type of #:LET49 to be LIST ;;; Note: ;;; in file CMPFORM.LSP, position 5205 ;;; at (DEFUN TRAVERSE-C1FORM-TREE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST47) to be LIST ;;; Compiling (DEFUN C1FORM-MOVABLE-P ...). ;;; Compiling (DEFUN C1FORM-PURE-P ...). ;;; Compiling (DEFUN C1FORM-UNMODIFIED-P ...). ;;; Compiling (DEFUN C1FORM-VALUES-NUMBER ...). ;;; Compiling (DEFUN C1FORM-SINGLE-VALUED-P ...). ;;; Compiling (DEFMACRO WITH-C1FORM-ENV ...). ;;; Compiling (DEFUN RELOCATE-PARENTS-LIST ...). ;;; Note: ;;; in file CMPFORM.LSP, position 7482 ;;; at (DEFUN RELOCATE-PARENTS-LIST ...) ;;; Checking type of #:G65 to be CONS ;;; Note: ;;; in file CMPFORM.LSP, position 7482 ;;; at (DEFUN RELOCATE-PARENTS-LIST ...) ;;; Checking type of #:G67 to be CONS ;;; Compiling (DEFUN C1FORM-REPLACE-WITH ...). ;;; Compiling (DEFUN DELETE-C1FORMS ...). ;;; Compiling (DEFUN C1FORM-CONSTANT-P ...). ;;; End of Pass 1. ;;; Emitting code for PRINT-C1FORM. ;;; Emitting code for MAKE-C1FORM. ;;; Emitting code for MAKE-C1FORM*. ;;; Emitting code for C1FORM-ADD-INFO-LOOP. ;;; Emitting code for C1FORM-ADD-INFO. ;;; Emitting code for COPY-C1FORM. ;;; Emitting code for C1FORM-ARG. ;;; Emitting code for C1FORM-VOLATILE*. ;;; Emitting code for C1FORM-PRIMARY-TYPE. ;;; Emitting code for LOCATION-PRIMARY-TYPE. ;;; Emitting code for FIND-FORM-IN-NODE-LIST. ;;; Emitting code for ADD-FORM-TO-NODE-LIST. ;;; Emitting code for DELETE-FORM-FROM-NODE-LIST. ;;; Emitting code for TRAVERSE-C1FORM-TREE. ;;; Emitting code for C1FORM-MOVABLE-P. ;;; Emitting code for ABORT-ON-NOT-PURE. ;;; Emitting code for C1FORM-PURE-P. ;;; Emitting code for C1FORM-UNMODIFIED-P. ;;; Emitting code for ABORT-ON-NOT-PURE. ;;; Emitting code for C1FORM-VALUES-NUMBER. ;;; Emitting code for C1FORM-SINGLE-VALUED-P. ;;; Emitting code for WITH-C1FORM-ENV. ;;; Emitting code for RELOCATE-PARENTS-LIST. ;;; Emitting code for C1FORM-REPLACE-WITH. ;;; Emitting code for DELETE-C1FORMS. ;;; Emitting code for ELIMINATE-REFERENCES. ;;; Emitting code for C1FORM-CONSTANT-P. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpform.c -o cmp/cmpform.o ;;; Finished compiling SRC:CMP;CMPFORM.LSP. ;;; (compile-file "src:cmp;cmptables.lsp" :output-file #P"BUILD:CMP;CMPTABLES.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPTABLES.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-DISPATCH-TABLE ...). ;;; Note: ;;; in file CMPTABLES.LSP, position 10215 ;;; at (DEFUN MAKE-DISPATCH-TABLE ...) ;;; Checking type of #:LET13 to be LIST ;;; Note: ;;; in file CMPTABLES.LSP, position 10215 ;;; at (DEFUN MAKE-DISPATCH-TABLE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST10) to be LIST ;;; Compiling (DEFPARAMETER *C1-DISPATCH-TABLE* ...). ;;; Compiling (DEFPARAMETER *T1-DISPATCH-TABLE* ...). ;;; Compiling (DEFPARAMETER *C2-DISPATCH-TABLE* ...). ;;; Compiling (DEFPARAMETER *SET-LOC-DISPATCH-TABLE* ...). ;;; Compiling (DEFPARAMETER *WT-LOC-DISPATCH-TABLE* ...). ;;; Compiling (DEFPARAMETER *T2-DISPATCH-TABLE* ...). ;;; Compiling (DEFPARAMETER *P1-DISPATCH-TABLE* ...). ;;; Compiling (DEFPARAMETER *P0-DISPATCH-TABLE* ...). ;;; Compiling (DEFPARAMETER *CINLINE-DISPATCH-TABLE* ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-DISPATCH-TABLE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmptables.c -o cmp/cmptables.o ;;; Finished compiling SRC:CMP;CMPTABLES.LSP. ;;; (compile-file "src:cmp;cmpinline.lsp" :output-file #P"BUILD:CMP;CMPINLINE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPINLINE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-INLINE-TEMP-VAR ...). ;;; Compiling (DEFUN SAVE-INLINE-LOC ...). ;;; Compiling (DEFMACRO WITH-INLINED-LOC ...). ;;; Compiling (DEFUN EMIT-INLINED-VARIABLE ...). ;;; Compiling (DEFUN EMIT-INLINED-SETQ ...). ;;; Compiling (DEFUN EMIT-INLINED-CALL-GLOBAL ...). ;;; Compiling (DEFUN EMIT-INLINED-PROGN ...). ;;; Compiling (DEFUN EMIT-INLINED-VALUES ...). ;;; Note: ;;; in file CMPINLINE.LSP, position 3771 ;;; at (DEFUN EMIT-INLINED-VALUES ...) ;;; Checking type of #:LET32 to be LIST ;;; Note: ;;; in file CMPINLINE.LSP, position 3771 ;;; at (DEFUN EMIT-INLINED-VALUES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST30) to be LIST ;;; Compiling (DEFUN EMIT-INLINED-STRUCTURE-REF ...). ;;; Compiling (DEFUN EMIT-INLINED-INSTANCE-REF ...). ;;; Compiling (DEFUN EMIT-INLINE-FORM ...). ;;; Compiling (DEFUN INLINE-ARGS ...). ;;; Note: ;;; in file CMPINLINE.LSP, position 6188 ;;; at (DEFUN INLINE-ARGS ...) ;;; Checking type of #:LOOP-LIST-TAIL35 to be CONS ;;; Compiling (DEFUN DESTINATION-TYPE ...). ;;; Compiling (DEFUN MAYBE-OPEN-INLINE-BLOCK ...). ;;; Compiling (DEFUN OPEN-INLINE-BLOCK ...). ;;; Compiling (DEFUN CLOSE-INLINE-BLOCKS ...). ;;; Note: ;;; in file CMPINLINE.LSP, position 6629 ;;; at (DEFUN CLOSE-INLINE-BLOCKS ...) ;;; Checking type of #:LET40 to be FIXNUM ;;; Style warning: ;;; in file CMPINLINE.LSP, position 6629 ;;; at (DEFUN CLOSE-INLINE-BLOCKS ...) ;;; ! The variable NEW-LINE is not used. ;;; Compiling (DEFUN FORM-CAUSES-SIDE-EFFECT ...). ;;; Compiling (DEFUN ARGS-CAUSE-SIDE-EFFECT ...). ;;; Compiling (DEFUN FUNCTION-MAY-HAVE-SIDE-EFFECTS ...). ;;; Compiling (DEFUN FUNCTION-MAY-CHANGE-SP ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-INLINE-TEMP-VAR. ;;; Emitting code for SAVE-INLINE-LOC. ;;; Emitting code for WITH-INLINED-LOC. ;;; Emitting code for EMIT-INLINED-VARIABLE. ;;; Emitting code for EMIT-INLINED-SETQ. ;;; Emitting code for EMIT-INLINED-CALL-GLOBAL. ;;; Emitting code for EMIT-INLINED-PROGN. ;;; Emitting code for EMIT-INLINED-VALUES. ;;; Emitting code for EMIT-INLINED-STRUCTURE-REF. ;;; Emitting code for EMIT-INLINED-INSTANCE-REF. ;;; Emitting code for EMIT-INLINE-FORM. ;;; Emitting code for INLINE-ARGS. ;;; Emitting code for DESTINATION-TYPE. ;;; Emitting code for MAYBE-OPEN-INLINE-BLOCK. ;;; Emitting code for OPEN-INLINE-BLOCK. ;;; Emitting code for CLOSE-INLINE-BLOCKS. ;;; Emitting code for FORM-CAUSES-SIDE-EFFECT. ;;; Emitting code for ARGS-CAUSE-SIDE-EFFECT. ;;; Emitting code for FUNCTION-MAY-HAVE-SIDE-EFFECTS. ;;; Emitting code for FUNCTION-MAY-CHANGE-SP. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpinline.c -o cmp/cmpinline.o ;;; Finished compiling SRC:CMP;CMPINLINE.LSP. ;;; (compile-file "src:cmp;cmputil.lsp" :output-file #P"BUILD:CMP;CMPUTIL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPUTIL.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN BRIEF-NAMESTRING ...). ;;; Compiling (DEFUN INNERMOST-NON-EXPANDED-FORM ...). ;;; Note: ;;; in file CMPUTIL.LSP, position 1658 ;;; at (DEFUN INNERMOST-NON-EXPANDED-FORM ...) ;;; Checking type of #:LET2 to be LIST ;;; Note: ;;; in file CMPUTIL.LSP, position 1658 ;;; at (DEFUN INNERMOST-NON-EXPANDED-FORM ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Compiling (DEFUN COMPILER-MESSAGE-REPORT ...). ;;; Compiling (DEFINE-CONDITION COMPILER-MESSAGE ...). ;;; Compiling (DEFINE-CONDITION COMPILER-NOTE ...). ;;; Compiling (DEFINE-CONDITION COMPILER-DEBUG-NOTE ...). ;;; Compiling (DEFINE-CONDITION COMPILER-WARNING ...). ;;; Compiling (DEFINE-CONDITION COMPILER-MACRO-EXPANSION-FAILED ...). ;;; Compiling (DEFINE-CONDITION COMPILER-ERROR ...). ;;; Compiling (DEFINE-CONDITION COMPILER-FATAL-ERROR ...). ;;; Compiling (DEFINE-CONDITION COMPILER-INTERNAL-ERROR ...). ;;; Compiling (DEFINE-CONDITION COMPILER-STYLE-WARNING ...). ;;; Compiling (DEFINE-CONDITION COMPILER-UNDEFINED-VARIABLE ...). ;;; Compiling (DEFUN PRINT-COMPILER-MESSAGE ...). ;;; Compiling (DEFUN HANDLE-COMPILER-NOTE ...). ;;; Compiling (DEFUN HANDLE-COMPILER-WARNING ...). ;;; Compiling (DEFUN HANDLE-COMPILER-ERROR ...). ;;; Compiling (DEFUN HANDLE-COMPILER-INTERNAL-ERROR ...). ;;; Compiling (DEFUN DO-COMPILATION-UNIT ...). ;;; Note: ;;; in file CMPUTIL.LSP, position 6312 ;;; at (DEFUN DO-COMPILATION-UNIT ...) ;;; Checking type of #:LET23 to be LIST ;;; Note: ;;; in file CMPUTIL.LSP, position 6312 ;;; at (DEFUN DO-COMPILATION-UNIT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST21) to be LIST ;;; Compiling (DEFMACRO WITH-COMPILATION-UNIT ...). ;;; Compiling (DEFMACRO WITH-COMPILER-ENV ...). ;;; Compiling (DEFVAR *C1FORM-LEVEL* ...). ;;; Compiling (DEFUN PRINT-C1FORMS ...). ;;; Note: ;;; in file CMPUTIL.LSP, position 7663 ;;; at (DEFUN PRINT-C1FORMS ...) ;;; Checking type of #:LET52 to be LIST ;;; Note: ;;; in file CMPUTIL.LSP, position 7663 ;;; at (DEFUN PRINT-C1FORMS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST50) to be LIST ;;; Compiling (DEFUN PRINT-REF ...). ;;; Compiling (DEFUN PRINT-VAR ...). ;;; Compiling (DEFUN CMPPROGRESS ...). ;;; Compiling (DEFMACRO CMPCK ...). ;;; Compiling (DEFMACRO CMPASSERT ...). ;;; Compiling (DEFUN CMPERR ...). ;;; Compiling (DEFUN SAFE-LIST-LENGTH ...). ;;; Compiling (DEFUN CHECK-ARGS-NUMBER ...). ;;; Compiling (DEFUN TOO-MANY-ARGS ...). ;;; Compiling (DEFUN TOO-FEW-ARGS ...). ;;; Compiling (DEFUN DO-CMPWARN ...). ;;; Compiling (DEFUN CMPWARN-STYLE ...). ;;; Compiling (DEFUN CMPWARN ...). ;;; Compiling (DEFUN CMPNOTE ...). ;;; Compiling (DEFUN CMPDEBUG ...). ;;; Compiling (DEFUN PRINT-CURRENT-FORM ...). ;;; Compiling (DEFUN PRINT-EMITTING ...). ;;; Compiling (DEFUN UNDEFINED-VARIABLE ...). ;;; Compiling (DEFUN BABOON ...). ;;; Compiling (DEFMACRO WITH-CMP-PROTECTION ...). ;;; Compiling (DEFUN CMP-EVAL ...). ;;; Compiling (DEFUN CMP-MACRO-FUNCTION ...). ;;; Compiling (DEFUN CMP-EXPAND-MACRO ...). ;;; Compiling (DEFUN CMP-EXPAND-COMPILER-MACRO ...). ;;; Compiling (DEFUN SI::COMPILER-CLEAR-COMPILER-PROPERTIES ...). ;;; Compiling (DEFUN LISP-TO-C-NAME ...). ;;; End of Pass 1. ;;; Emitting code for BRIEF-NAMESTRING. ;;; Emitting code for INNERMOST-NON-EXPANDED-FORM. ;;; Emitting code for COMPILER-MESSAGE-REPORT. ;;; Emitting code for #:G9. ;;; Emitting code for #:G11. ;;; Emitting code for #:G12. ;;; Emitting code for #:G13. ;;; Emitting code for #:G14. ;;; Emitting code for #:G10. ;;; Emitting code for #:G15. ;;; Emitting code for #:G16. ;;; Emitting code for PRINT-COMPILER-MESSAGE. ;;; Emitting code for HANDLE-COMPILER-NOTE. ;;; Emitting code for HANDLE-COMPILER-WARNING. ;;; Emitting code for HANDLE-COMPILER-ERROR. ;;; Emitting code for HANDLE-COMPILER-INTERNAL-ERROR. ;;; Emitting code for DO-COMPILATION-UNIT. ;;; Emitting code for WITH-COMPILATION-UNIT. ;;; Emitting code for WITH-COMPILER-ENV. ;;; Emitting code for PRINT-C1FORMS. ;;; Emitting code for PRINT-REF. ;;; Emitting code for PRINT-VAR. ;;; Emitting code for CMPPROGRESS. ;;; Emitting code for CMPCK. ;;; Emitting code for CMPASSERT. ;;; Emitting code for CMPERR. ;;; Emitting code for SAFE-LIST-LENGTH. ;;; Emitting code for CHECK-ARGS-NUMBER. ;;; Emitting code for TOO-MANY-ARGS. ;;; Emitting code for TOO-FEW-ARGS. ;;; Emitting code for DO-CMPWARN. ;;; Emitting code for #:G78. ;;; Emitting code for #:G79. ;;; Emitting code for CMPWARN-STYLE. ;;; Emitting code for CMPWARN. ;;; Emitting code for CMPNOTE. ;;; Emitting code for CMPDEBUG. ;;; Emitting code for PRINT-CURRENT-FORM. ;;; Emitting code for PRINT-EMITTING. ;;; Emitting code for UNDEFINED-VARIABLE. ;;; Emitting code for BABOON. ;;; Emitting code for WITH-CMP-PROTECTION. ;;; Emitting code for CMP-EVAL. ;;; Emitting code for #:G94. ;;; Emitting code for CMP-MACRO-FUNCTION. ;;; Emitting code for CMP-EXPAND-MACRO. ;;; Emitting code for #:G98. ;;; Emitting code for CMP-EXPAND-COMPILER-MACRO. ;;; Emitting code for #:G102. ;;; Emitting code for SI::COMPILER-CLEAR-COMPILER-PROPERTIES. ;;; Emitting code for LISP-TO-C-NAME. ;;; Emitting code for #:G103. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmputil.c -o cmp/cmputil.o ;;; Finished compiling SRC:CMP;CMPUTIL.LSP. ;;; (compile-file "src:cmp;cmptype-arith.lsp" :output-file #P"BUILD:CMP;CMPTYPE-ARITH.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPTYPE-ARITH.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MEMBER-TYPE ...). ;;; Compiling (DEFUN OBJECT-TYPE ...). ;;; Compiling (DEFUN VALID-TYPE-SPECIFIER ...). ;;; Compiling (DEFUN KNOWN-TYPE-P ...). ;;; Compiling (DEFUN TRIVIAL-TYPE-P ...). ;;; Compiling (DEFUN-EQUAL-CACHED TYPE-AND ...). ;;; Compiling (DEFUN-EQUAL-CACHED TYPE-AND ...). ;;; Compiling (DEFUN-EQUAL-CACHED TYPE-AND ...). ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 2583 ;;; at (DEFUN-EQUAL-CACHED TYPE-AND ...) ;;; Checking type of (LOGAND (SI:HASH-EQUAL T1 T2) 1023) to be (INTEGER 0 1023) ;;; Warning: ;;; in file CMPTYPE-ARITH.LSP, position 2583 ;;; at (DEFUN-EQUAL-CACHED TYPE-AND ...) ;;; ! Declaration of type ;;; (ARRAY T (*)) ;;; was found for not bound variable *TYPE-AND-CACHE*. ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 2583 ;;; at (DEFUN-EQUAL-CACHED TYPE-AND ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 2583 ;;; at (DEFUN-EQUAL-CACHED TYPE-AND ...) ;;; Checking type of #:G21 to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 2583 ;;; at (DEFUN-EQUAL-CACHED TYPE-AND ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 2583 ;;; at (DEFUN-EQUAL-CACHED TYPE-AND ...) ;;; Checking type of #:G23 to be CONS ;;; Compiling (DEFUN VALUES-NUMBER-FROM-TYPE ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...). ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 4450 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...) ;;; Checking type of (LOGAND (SI:HASH-EQUAL TYPE) 1023) to be (INTEGER 0 1023) ;;; Warning: ;;; in file CMPTYPE-ARITH.LSP, position 4450 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...) ;;; ! Declaration of type ;;; (ARRAY T (*)) ;;; was found for not bound variable *VALUES-TYPE-PRIMARY-TYPE-CACHE*. ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 4450 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 4450 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...) ;;; Checking type of #:G38 to be CONS ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...). ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 5018 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...) ;;; Checking type of (LOGAND (SI:HASH-EQUAL TYPE LENGTH) 1023) to be (INTEGER 0 1023) ;;; Warning: ;;; in file CMPTYPE-ARITH.LSP, position 5018 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...) ;;; ! Declaration of type ;;; (ARRAY T (*)) ;;; was found for not bound variable *VALUES-TYPE-TO-N-TYPES-CACHE*. ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 5018 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 5018 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...) ;;; Checking type of #:G49 to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 5018 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 5018 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...) ;;; Checking type of #:G51 to be CONS ;;; Compiling (DEFUN DO-VALUES-TYPE-TO-N-TYPES ...). ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 5145 ;;; at (DEFUN DO-VALUES-TYPE-TO-N-TYPES ...) ;;; Checking type of #:LET61 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 5145 ;;; at (DEFUN DO-VALUES-TYPE-TO-N-TYPES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST57) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 5145 ;;; at (DEFUN DO-VALUES-TYPE-TO-N-TYPES ...) ;;; Checking type of #:LOOP-LIST-TAIL59 to be CONS ;;; Compiling (DEFUN SPLIT-VALUES-TYPE ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...). ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of #:LET77 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST75) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of #:LET88 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST86) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of #:LET99 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST97) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of #:LET103 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST101) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of (LOGAND (SI:HASH-EQUAL T1 T2) 1023) to be (INTEGER 0 1023) ;;; Warning: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; ! Declaration of type ;;; (ARRAY T (*)) ;;; was found for not bound variable *VALUES-TYPE-OR-CACHE*. ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of #:G112 to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 6993 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...) ;;; Checking type of #:G114 to be CONS ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...). ;;; Compiling (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...). ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of #:LET125 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST123) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of #:LET137 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST135) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of #:LET149 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST147) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of #:LET153 to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST151) to be LIST ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of (LOGAND (SI:HASH-EQUAL T1 T2) 1023) to be (INTEGER 0 1023) ;;; Warning: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; ! Declaration of type ;;; (ARRAY T (*)) ;;; was found for not bound variable *VALUES-TYPE-AND-CACHE*. ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of #:G161 to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 8682 ;;; at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...) ;;; Checking type of #:G163 to be CONS ;;; Compiling (DEFUN-EQUAL-CACHED TYPE-OR ...). ;;; Compiling (DEFUN-EQUAL-CACHED TYPE-OR ...). ;;; Compiling (DEFUN-EQUAL-CACHED TYPE-OR ...). ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 10217 ;;; at (DEFUN-EQUAL-CACHED TYPE-OR ...) ;;; Checking type of (LOGAND (SI:HASH-EQUAL T1 T2) 1023) to be (INTEGER 0 1023) ;;; Warning: ;;; in file CMPTYPE-ARITH.LSP, position 10217 ;;; at (DEFUN-EQUAL-CACHED TYPE-OR ...) ;;; ! Declaration of type ;;; (ARRAY T (*)) ;;; was found for not bound variable *TYPE-OR-CACHE*. ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 10217 ;;; at (DEFUN-EQUAL-CACHED TYPE-OR ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 10217 ;;; at (DEFUN-EQUAL-CACHED TYPE-OR ...) ;;; Checking type of #:G176 to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 10217 ;;; at (DEFUN-EQUAL-CACHED TYPE-OR ...) ;;; Checking type of ELT to be CONS ;;; Note: ;;; in file CMPTYPE-ARITH.LSP, position 10217 ;;; at (DEFUN-EQUAL-CACHED TYPE-OR ...) ;;; Checking type of #:G178 to be CONS ;;; Compiling (DEFUN TYPE>= ...). ;;; End of Pass 1. ;;; Emitting code for MEMBER-TYPE. ;;; Emitting code for OBJECT-TYPE. ;;; Emitting code for VALID-TYPE-SPECIFIER. ;;; Emitting code for #:G13. ;;; Emitting code for KNOWN-TYPE-P. ;;; Emitting code for TRIVIAL-TYPE-P. ;;; Emitting code for TYPE-AND-EMPTY-CACHE. ;;; Emitting code for TYPE-AND. ;;; Emitting code for TYPE-AND. ;;; Emitting code for VALUES-NUMBER-FROM-TYPE. ;;; Emitting code for VALUES-TYPE-PRIMARY-TYPE-EMPTY-CACHE. ;;; Emitting code for VALUES-TYPE-PRIMARY-TYPE. ;;; Emitting code for VALUES-TYPE-PRIMARY-TYPE. ;;; Emitting code for VALUES-TYPE-TO-N-TYPES-EMPTY-CACHE. ;;; Emitting code for VALUES-TYPE-TO-N-TYPES. ;;; Emitting code for VALUES-TYPE-TO-N-TYPES. ;;; Emitting code for DO-VALUES-TYPE-TO-N-TYPES. ;;; Emitting code for SPLIT-VALUES-TYPE. ;;; Emitting code for VALUES-TYPE-OR-EMPTY-CACHE. ;;; Emitting code for VALUES-TYPE-OR. ;;; Emitting code for VALUES-TYPE-OR. ;;; Emitting code for VALUES-TYPE-AND-EMPTY-CACHE. ;;; Emitting code for VALUES-TYPE-AND. ;;; Emitting code for VALUES-TYPE-AND. ;;; Emitting code for TYPE-OR-EMPTY-CACHE. ;;; Emitting code for TYPE-OR. ;;; Emitting code for TYPE-OR. ;;; Emitting code for TYPE>=. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmptype-arith.c -o cmp/cmptype-arith.o ;;; Finished compiling SRC:CMP;CMPTYPE-ARITH.LSP. ;;; (compile-file "src:cmp;cmptype-prop.lsp" :output-file #P"BUILD:CMP;CMPTYPE-PROP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPTYPE-PROP.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN INFER-ARG-AND-RETURN-TYPES ...). ;;; Note: ;;; in file CMPTYPE-PROP.LSP, position 669 ;;; at (DEFUN INFER-ARG-AND-RETURN-TYPES ...) ;;; Checking type of #:LET8 to be LIST ;;; Note: ;;; in file CMPTYPE-PROP.LSP, position 669 ;;; at (DEFUN INFER-ARG-AND-RETURN-TYPES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4) to be LIST ;;; Note: ;;; in file CMPTYPE-PROP.LSP, position 669 ;;; at (DEFUN INFER-ARG-AND-RETURN-TYPES ...) ;;; Checking type of #:LOOP-LIST-TAIL6 to be CONS ;;; Compiling (DEFUN ENFORCE-TYPES ...). ;;; Compiling (DEFUN PROPAGATE-TYPES ...). ;;; Compiling (DEFMACRO DEF-TYPE-PROPAGATOR ...). ;;; Compiling (DEFUN COPY-TYPE-PROPAGATOR ...). ;;; Note: ;;; in file CMPTYPE-PROP.LSP, position 3212 ;;; at (DEFUN COPY-TYPE-PROPAGATOR ...) ;;; Checking type of #:LET37 to be LIST ;;; Note: ;;; in file CMPTYPE-PROP.LSP, position 3212 ;;; at (DEFUN COPY-TYPE-PROPAGATOR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST35) to be LIST ;;; End of Pass 1. ;;; Emitting code for INFER-ARG-AND-RETURN-TYPES. ;;; Emitting code for ENFORCE-TYPES. ;;; Emitting code for PROPAGATE-TYPES. ;;; Emitting code for DEF-TYPE-PROPAGATOR. ;;; Emitting code for COPY-TYPE-PROPAGATOR. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmptype-prop.c -o cmp/cmptype-prop.o ;;; Finished compiling SRC:CMP;CMPTYPE-PROP.LSP. ;;; (compile-file "src:cmp;cmptype.lsp" :output-file #P"BUILD:CMP;CMPTYPE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPTYPE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN AND-FORM-TYPE ...). ;;; Compiling (DEFUN DEFAULT-INIT ...). ;;; Compiling (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...). ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LET13 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LET15 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST8) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST9) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LOOP-LIST-TAIL11 to be CONS ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LET21 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LET23 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of (CDDDR #:LOOP-LIST16) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of (CDDDR #:LOOP-LIST17) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LOOP-LIST-TAIL19 to be CONS ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LOOP-LIST-TAIL25 to be CONS ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LET30 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LOOP-LIST-TAIL28 to be CONS ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LET35 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of (CDDDR #:LOOP-LIST31) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LOOP-LIST-TAIL33 to be CONS ;;; Note: ;;; in file CMPTYPE.LSP, position 1865 ;;; at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...) ;;; Checking type of #:LOOP-LIST-TAIL37 to be CONS ;;; Compiling (DEFUN LAMBDA-TYPE-CHECK-PRECISE ...). ;;; Note: ;;; in file CMPTYPE.LSP, position 3364 ;;; at (DEFUN LAMBDA-TYPE-CHECK-PRECISE ...) ;;; Checking type of #:LET40 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 3364 ;;; at (DEFUN LAMBDA-TYPE-CHECK-PRECISE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST38) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 3364 ;;; at (DEFUN LAMBDA-TYPE-CHECK-PRECISE ...) ;;; Checking type of RECORD to be CONS ;;; Compiling (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...). ;;; Note: ;;; in file CMPTYPE.LSP, position 3791 ;;; at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...) ;;; Checking type of #:LET44 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 3791 ;;; at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST41) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 3791 ;;; at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...) ;;; Checking type of #:LET47 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 3791 ;;; at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST45) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 3791 ;;; at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...) ;;; Checking type of #:LET60 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 3791 ;;; at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST56) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 3791 ;;; at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...) ;;; Checking type of #:LOOP-LIST-TAIL58 to be CONS ;;; Compiling (DEFUN TYPE-ERROR-CHECK ...). ;;; Compiling (DEFMACRO ASSERT-TYPE-IF-KNOWN ...). ;;; Compiling (DEFUN REPLACE-INVALID-TYPES ...). ;;; Note: ;;; in file CMPTYPE.LSP, position 7340 ;;; at (DEFUN REPLACE-INVALID-TYPES ...) ;;; Checking type of #:LET76 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 7340 ;;; at (DEFUN REPLACE-INVALID-TYPES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST72) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 7340 ;;; at (DEFUN REPLACE-INVALID-TYPES ...) ;;; Checking type of #:LOOP-LIST-TAIL74 to be CONS ;;; Compiling (DEFMACRO OPTIONAL-TYPE-CHECK ...). ;;; Compiling (DEFMACRO WITH-LET*-TYPE-CHECK ...). ;;; Note: ;;; in file CMPTYPE.LSP, position 8043 ;;; at (FSET 'WITH-LET*-TYPE-CHECK ...) ;;; Checking type of #:LET108 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 8043 ;;; at (FSET 'WITH-LET*-TYPE-CHECK ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST102) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 8043 ;;; at (FSET 'WITH-LET*-TYPE-CHECK ...) ;;; Checking type of #:LOOP-LIST-TAIL104 to be CONS ;;; Note: ;;; in file CMPTYPE.LSP, position 8043 ;;; at (FSET 'WITH-LET*-TYPE-CHECK ...) ;;; Checking type of #:LET115 to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 8043 ;;; at (FSET 'WITH-LET*-TYPE-CHECK ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST111) to be LIST ;;; Note: ;;; in file CMPTYPE.LSP, position 8043 ;;; at (FSET 'WITH-LET*-TYPE-CHECK ...) ;;; Checking type of #:LOOP-LIST-TAIL113 to be CONS ;;; End of Pass 1. ;;; Emitting code for AND-FORM-TYPE. ;;; Emitting code for DEFAULT-INIT. ;;; Emitting code for LAMBDA-TYPE-CHECK-ASSOCIATE. ;;; Emitting code for LAMBDA-TYPE-CHECK-PRECISE. ;;; Emitting code for EXTRACT-LAMBDA-TYPE-CHECKS. ;;; Emitting code for TYPE-ERROR-CHECK. ;;; Emitting code for ASSERT-TYPE-IF-KNOWN. ;;; Emitting code for REPLACE-INVALID-TYPES. ;;; Emitting code for OPTIONAL-TYPE-CHECK. ;;; Emitting code for WITH-LET*-TYPE-CHECK. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmptype.c -o cmp/cmptype.o ;;; Finished compiling SRC:CMP;CMPTYPE.LSP. ;;; (compile-file "src:cmp;cmptype-assert.lsp" :output-file #P"BUILD:CMP;CMPTYPE-ASSERT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPTYPE-ASSERT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1COMPILER-TYPECASE ...). ;;; Note: ;;; in file CMPTYPE-ASSERT.LSP, position 624 ;;; at (DEFUN C1COMPILER-TYPECASE ...) ;;; Checking type of #:LET3 to be LIST ;;; Note: ;;; in file CMPTYPE-ASSERT.LSP, position 624 ;;; at (DEFUN C1COMPILER-TYPECASE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Note: ;;; in file CMPTYPE-ASSERT.LSP, position 624 ;;; at (DEFUN C1COMPILER-TYPECASE ...) ;;; Checking type of #:LET11 to be LIST ;;; Note: ;;; in file CMPTYPE-ASSERT.LSP, position 624 ;;; at (DEFUN C1COMPILER-TYPECASE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST6) to be LIST ;;; Note: ;;; in file CMPTYPE-ASSERT.LSP, position 624 ;;; at (DEFUN C1COMPILER-TYPECASE ...) ;;; Checking type of #:LOOP-LIST-TAIL8 to be CONS ;;; Compiling (DEFUN C2COMPILER-TYPECASE ...). ;;; Note: ;;; in file CMPTYPE-ASSERT.LSP, position 1881 ;;; at (DEFUN C2COMPILER-TYPECASE ...) ;;; Checking type of #:LET16 to be LIST ;;; Note: ;;; in file CMPTYPE-ASSERT.LSP, position 1881 ;;; at (DEFUN C2COMPILER-TYPECASE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST13) to be LIST ;;; Compiling (DEFUN SIMPLE-TYPE-ASSERTION ...). ;;; Style warning: ;;; in file CMPTYPE-ASSERT.LSP, position 2596 ;;; at (DEFUN SIMPLE-TYPE-ASSERTION ...) ;;; ! The variable ENV is not used. ;;; Compiling (DEFUN EXPAND-TYPE-ASSERTION ...). ;;; Compiling (DEFUN C1CHECKED-VALUE ...). ;;; Compiling (DEFUN C2CHECKED-VALUE ...). ;;; Style warning: ;;; in file CMPTYPE-ASSERT.LSP, position 5757 ;;; at (DEFUN C2CHECKED-VALUE ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFMACRO OPTIONAL-TYPE-ASSERTION ...). ;;; Compiling (DEFMACRO TYPE-ASSERTION ...). ;;; End of Pass 1. ;;; Emitting code for C1COMPILER-TYPECASE. ;;; Emitting code for C2COMPILER-TYPECASE. ;;; Emitting code for SIMPLE-TYPE-ASSERTION. ;;; Emitting code for EXPAND-TYPE-ASSERTION. ;;; Emitting code for C1CHECKED-VALUE. ;;; Emitting code for C2CHECKED-VALUE. ;;; Emitting code for OPTIONAL-TYPE-ASSERTION. ;;; Emitting code for TYPE-ASSERTION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmptype-assert.c -o cmp/cmptype-assert.o ;;; Finished compiling SRC:CMP;CMPTYPE-ASSERT.LSP. ;;; (compile-file "src:cmp;cmpenv-api.lsp" :output-file #P"BUILD:CMP;CMPENV-API.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPENV-API.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN CMP-ENV-ROOT ...). ;;; Compiling (DEFUN CMP-ENV-COPY ...). ;;; Compiling (DEFMACRO CMP-ENV-VARIABLES ...). ;;; Compiling (DEFMACRO CMP-ENV-FUNCTIONS ...). ;;; Compiling (DEFUN CMP-ENV-CLEANUPS ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 1141 ;;; at (DEFUN CMP-ENV-CLEANUPS ...) ;;; Checking type of #:LET23 to be LIST ;;; Note: ;;; in file CMPENV-API.LSP, position 1141 ;;; at (DEFUN CMP-ENV-CLEANUPS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST19) to be LIST ;;; Note: ;;; in file CMPENV-API.LSP, position 1141 ;;; at (DEFUN CMP-ENV-CLEANUPS ...) ;;; Checking type of #:LOOP-LIST-TAIL21 to be CONS ;;; Compiling (DEFUN CMP-ENV-REGISTER-VAR ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 2013 ;;; at (DEFUN CMP-ENV-REGISTER-VAR ...) ;;; Checking type of #:G24 to be CONS ;;; Compiling (DEFUN CMP-ENV-DECLARE-SPECIAL ...). ;;; Compiling (DEFUN CMP-ENV-ADD-DECLARATION ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 2489 ;;; at (DEFUN CMP-ENV-ADD-DECLARATION ...) ;;; Checking type of #:G28 to be CONS ;;; Compiling (DEFUN CMP-ENV-EXTEND-DECLARATION ...). ;;; Compiling (DEFUN CMP-ENV-REGISTER-FUNCTION ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 2860 ;;; at (DEFUN CMP-ENV-REGISTER-FUNCTION ...) ;;; Checking type of #:G31 to be CONS ;;; Compiling (DEFUN CMP-ENV-REGISTER-GLOBAL-MACRO ...). ;;; Compiling (DEFUN CMP-ENV-REGISTER-MACRO ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 3183 ;;; at (DEFUN CMP-ENV-REGISTER-MACRO ...) ;;; Checking type of #:G34 to be CONS ;;; Compiling (DEFUN CMP-ENV-REGISTER-FTYPE ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 3336 ;;; at (DEFUN CMP-ENV-REGISTER-FTYPE ...) ;;; Checking type of #:G37 to be CONS ;;; Compiling (DEFUN CMP-ENV-REGISTER-SYMBOL-MACRO ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 3494 ;;; at (DEFUN CMP-ENV-REGISTER-SYMBOL-MACRO ...) ;;; Checking type of #:G40 to be CONS ;;; Compiling (DEFUN CMP-ENV-REGISTER-BLOCK ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 3719 ;;; at (DEFUN CMP-ENV-REGISTER-BLOCK ...) ;;; Checking type of #:G44 to be CONS ;;; Compiling (DEFUN CMP-ENV-REGISTER-TAG ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 3863 ;;; at (DEFUN CMP-ENV-REGISTER-TAG ...) ;;; Checking type of #:G47 to be CONS ;;; Compiling (DEFUN CMP-ENV-REGISTER-CLEANUP ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 4005 ;;; at (DEFUN CMP-ENV-REGISTER-CLEANUP ...) ;;; Checking type of #:G50 to be CONS ;;; Compiling (DEFUN CMP-ENV-SEARCH-FUNCTION ...). ;;; Compiling (DEFUN CMP-ENV-SEARCH-VARIABLES ...). ;;; Compiling (DEFUN CMP-ENV-SEARCH-BLOCK ...). ;;; Compiling (DEFUN CMP-ENV-SEARCH-TAG ...). ;;; Compiling (DEFUN CMP-ENV-SEARCH-SYMBOL-MACRO ...). ;;; Compiling (DEFUN CMP-ENV-SEARCH-VAR ...). ;;; Compiling (DEFUN CMP-ENV-SEARCH-MACRO ...). ;;; Compiling (DEFUN CMP-ENV-SEARCH-FTYPE ...). ;;; Compiling (DEFUN CMP-ENV-MARK ...). ;;; Compiling (DEFUN CMP-ENV-NEW-VARIABLES ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 6924 ;;; at (DEFUN CMP-ENV-NEW-VARIABLES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST86) to be LIST ;;; Note: ;;; in file CMPENV-API.LSP, position 6924 ;;; at (DEFUN CMP-ENV-NEW-VARIABLES ...) ;;; Checking type of #:LOOP-LIST-TAIL88 to be CONS ;;; Compiling (DEFUN CMP-ENV-SEARCH-DECLARATION ...). ;;; Note: ;;; in file CMPENV-API.LSP, position 7154 ;;; at (DEFUN CMP-ENV-SEARCH-DECLARATION ...) ;;; Checking type of #:LET93 to be LIST ;;; Note: ;;; in file CMPENV-API.LSP, position 7154 ;;; at (DEFUN CMP-ENV-SEARCH-DECLARATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST91) to be LIST ;;; End of Pass 1. ;;; Emitting code for CMP-ENV-ROOT. ;;; Emitting code for CMP-ENV-COPY. ;;; Emitting code for CMP-ENV-VARIABLES. ;;; Emitting code for CMP-ENV-FUNCTIONS. ;;; Emitting code for CMP-ENV-CLEANUPS. ;;; Emitting code for CMP-ENV-REGISTER-VAR. ;;; Emitting code for CMP-ENV-DECLARE-SPECIAL. ;;; Emitting code for CMP-ENV-ADD-DECLARATION. ;;; Emitting code for CMP-ENV-EXTEND-DECLARATION. ;;; Emitting code for CMP-ENV-REGISTER-FUNCTION. ;;; Emitting code for CMP-ENV-REGISTER-GLOBAL-MACRO. ;;; Emitting code for CMP-ENV-REGISTER-MACRO. ;;; Emitting code for CMP-ENV-REGISTER-FTYPE. ;;; Emitting code for CMP-ENV-REGISTER-SYMBOL-MACRO. ;;; Emitting code for #:G43. ;;; Emitting code for CMP-ENV-REGISTER-BLOCK. ;;; Emitting code for CMP-ENV-REGISTER-TAG. ;;; Emitting code for CMP-ENV-REGISTER-CLEANUP. ;;; Emitting code for CMP-ENV-SEARCH-FUNCTION. ;;; Emitting code for CMP-ENV-SEARCH-VARIABLES. ;;; Emitting code for CMP-ENV-SEARCH-BLOCK. ;;; Emitting code for CMP-ENV-SEARCH-TAG. ;;; Emitting code for CMP-ENV-SEARCH-SYMBOL-MACRO. ;;; Emitting code for CMP-ENV-SEARCH-VAR. ;;; Emitting code for CMP-ENV-SEARCH-MACRO. ;;; Emitting code for CMP-ENV-SEARCH-FTYPE. ;;; Emitting code for CMP-ENV-MARK. ;;; Emitting code for CMP-ENV-NEW-VARIABLES. ;;; Emitting code for CMP-ENV-SEARCH-DECLARATION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpenv-api.c -o cmp/cmpenv-api.o ;;; Finished compiling SRC:CMP;CMPENV-API.LSP. ;;; (compile-file "src:cmp;cmpenv-fun.lsp" :output-file #P"BUILD:CMP;CMPENV-FUN.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPENV-FUN.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN FUNCTION-ARG-TYPES ...). ;;; Note: ;;; in file CMPENV-FUN.LSP, position 667 ;;; at (DEFUN FUNCTION-ARG-TYPES ...) ;;; Checking type of ARG-TYPES to be OBJECT ;;; Note: ;;; in file CMPENV-FUN.LSP, position 667 ;;; at (DEFUN FUNCTION-ARG-TYPES ...) ;;; Checking type of (CDR AL) to be OBJECT ;;; Compiling (DEFUN PROCLAIM-FUNCTION ...). ;;; Compiling (DEFUN ADD-FUNCTION-DECLARATION ...). ;;; Compiling (DEFUN GET-ARG-TYPES ...). ;;; Compiling (DEFUN GET-RETURN-TYPE ...). ;;; Compiling (DEFUN GET-LOCAL-ARG-TYPES ...). ;;; Compiling (DEFUN GET-LOCAL-RETURN-TYPE ...). ;;; Style warning: ;;; in file CMPENV-FUN.LSP, position 3573 ;;; at (DEFUN GET-LOCAL-RETURN-TYPE ...) ;;; ! The variable ENV is not used. ;;; Compiling (DEFUN GET-PROCLAIMED-NARG ...). ;;; Note: ;;; in file CMPENV-FUN.LSP, position 3754 ;;; at (DEFUN GET-PROCLAIMED-NARG ...) ;;; Checking type of #:LET16 to be LIST ;;; Note: ;;; in file CMPENV-FUN.LSP, position 3754 ;;; at (DEFUN GET-PROCLAIMED-NARG ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST14) to be LIST ;;; Compiling (DEFUN DECLARE-INLINE ...). ;;; Compiling (DEFUN DECLARE-NOTINLINE ...). ;;; Compiling (DEFUN PROCLAIM-INLINE ...). ;;; Compiling (DEFUN PROCLAIM-NOTINLINE ...). ;;; Compiling (DEFUN DECLARED-INLINE-P ...). ;;; Compiling (DEFUN DECLARED-NOTINLINE-P ...). ;;; Compiling (DEFUN INLINE-POSSIBLE ...). ;;; Compiling (DEFUN MAYBE-INSTALL-INLINE-FUNCTION ...). ;;; End of Pass 1. ;;; Emitting code for FUNCTION-ARG-TYPES. ;;; Emitting code for PROCLAIM-FUNCTION. ;;; Emitting code for ADD-FUNCTION-DECLARATION. ;;; Emitting code for GET-ARG-TYPES. ;;; Emitting code for GET-RETURN-TYPE. ;;; Emitting code for GET-LOCAL-ARG-TYPES. ;;; Emitting code for GET-LOCAL-RETURN-TYPE. ;;; Emitting code for GET-PROCLAIMED-NARG. ;;; Emitting code for DECLARE-INLINE. ;;; Emitting code for DECLARE-NOTINLINE. ;;; Emitting code for PROCLAIM-INLINE. ;;; Emitting code for PROCLAIM-NOTINLINE. ;;; Emitting code for DECLARED-INLINE-P. ;;; Emitting code for DECLARED-NOTINLINE-P. ;;; Emitting code for INLINE-POSSIBLE. ;;; Emitting code for MAYBE-INSTALL-INLINE-FUNCTION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpenv-fun.c -o cmp/cmpenv-fun.o ;;; Finished compiling SRC:CMP;CMPENV-FUN.LSP. ;;; (compile-file "src:cmp;cmpenv-declare.lsp" :output-file #P"BUILD:CMP;CMPENV-DECLARE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPENV-DECLARE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN VALID-FORM-P ...). ;;; Compiling (DEFUN TYPE-NAME-P ...). ;;; Compiling (DEFUN VALIDATE-ALIEN-DECLARATION ...). ;;; Style warning: ;;; in file CMPENV-DECLARE.LSP, position 1121 ;;; at (DEFUN VALIDATE-ALIEN-DECLARATION ...) ;;; ! The variable ERROR is not used. ;;; Compiling (DEFUN ALIEN-DECLARATION-P ...). ;;; Compiling (DEFUN PARSE-IGNORE-DECLARATION ...). ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 1677 ;;; at (DEFUN PARSE-IGNORE-DECLARATION ...) ;;; Checking type of #:LET5 to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 1677 ;;; at (DEFUN PARSE-IGNORE-DECLARATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3) to be LIST ;;; Compiling (DEFUN COLLECT-DECLARED ...). ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 2150 ;;; at (DEFUN COLLECT-DECLARED ...) ;;; Checking type of #:LET9 to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 2150 ;;; at (DEFUN COLLECT-DECLARED ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST7) to be LIST ;;; Compiling (DEFUN C1BODY ...). ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 2423 ;;; at (DEFUN C1BODY ...) ;;; Checking type of #:LET13 to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 2423 ;;; at (DEFUN C1BODY ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST11) to be LIST ;;; Compiling (DEFUN ADD-ONE-DECLARATION ...). ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 5184 ;;; at (DEFUN ADD-ONE-DECLARATION ...) ;;; Checking type of #:LET29 to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 5184 ;;; at (DEFUN ADD-ONE-DECLARATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST27) to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 5184 ;;; at (DEFUN ADD-ONE-DECLARATION ...) ;;; Checking type of #:LET33 to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 5184 ;;; at (DEFUN ADD-ONE-DECLARATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST31) to be LIST ;;; Compiling (DEFUN SYMBOL-MACRO-DECLARATION-P ...). ;;; Compiling (DEFUN CHECK-VDECL ...). ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 7349 ;;; at (DEFUN CHECK-VDECL ...) ;;; Checking type of #:LET41 to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 7349 ;;; at (DEFUN CHECK-VDECL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST38) to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 7349 ;;; at (DEFUN CHECK-VDECL ...) ;;; Checking type of #:LET45 to be LIST ;;; Note: ;;; in file CMPENV-DECLARE.LSP, position 7349 ;;; at (DEFUN CHECK-VDECL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST42) to be LIST ;;; End of Pass 1. ;;; Emitting code for VALID-FORM-P. ;;; Emitting code for TYPE-NAME-P. ;;; Emitting code for VALIDATE-ALIEN-DECLARATION. ;;; Emitting code for ALIEN-DECLARATION-P. ;;; Emitting code for PARSE-IGNORE-DECLARATION. ;;; Emitting code for COLLECT-DECLARED. ;;; Emitting code for C1BODY. ;;; Emitting code for ADD-ONE-DECLARATION. ;;; Emitting code for SYMBOL-MACRO-DECLARATION-P. ;;; Emitting code for CHECK-VDECL. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpenv-declare.c -o cmp/cmpenv-declare.o ;;; Finished compiling SRC:CMP;CMPENV-DECLARE.LSP. ;;; (compile-file "src:cmp;cmpenv-proclaim.lsp" :output-file #P"BUILD:CMP;CMPENV-PROCLAIM.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPENV-PROCLAIM.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN PROCLAIM ...). ;;; Note: ;;; in file CMPENV-PROCLAIM.LSP, position 1042 ;;; at (DEFUN PROCLAIM ...) ;;; Checking type of #:LET33 to be LIST ;;; Note: ;;; in file CMPENV-PROCLAIM.LSP, position 1042 ;;; at (DEFUN PROCLAIM ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST31) to be LIST ;;; Compiling (DEFUN PROCLAIM-VAR ...). ;;; End of Pass 1. ;;; Emitting code for PROCLAIM. ;;; Emitting code for PROCLAIM-VAR. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpenv-proclaim.c -o cmp/cmpenv-proclaim.o ;;; Finished compiling SRC:CMP;CMPENV-PROCLAIM.LSP. ;;; (compile-file "src:cmp;cmpenv-declaim.lsp" :output-file #P"BUILD:CMP;CMPENV-DECLAIM.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPENV-DECLAIM.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN PROCESS-DECLAIM-ARGS ...). ;;; Note: ;;; in file CMPENV-DECLAIM.LSP, position 925 ;;; at (DEFUN PROCESS-DECLAIM-ARGS ...) ;;; Checking type of #:LET2 to be LIST ;;; Note: ;;; in file CMPENV-DECLAIM.LSP, position 925 ;;; at (DEFUN PROCESS-DECLAIM-ARGS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Note: ;;; in file CMPENV-DECLAIM.LSP, position 925 ;;; at (DEFUN PROCESS-DECLAIM-ARGS ...) ;;; Checking type of #:LET7 to be LIST ;;; Note: ;;; in file CMPENV-DECLAIM.LSP, position 925 ;;; at (DEFUN PROCESS-DECLAIM-ARGS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4) to be LIST ;;; Style warning: ;;; in file CMPENV-DECLAIM.LSP, position 925 ;;; at (DEFUN PROCESS-DECLAIM-ARGS ...) ;;; ! The variable BODY is not used. ;;; Style warning: ;;; in file CMPENV-DECLAIM.LSP, position 925 ;;; at (DEFUN PROCESS-DECLAIM-ARGS ...) ;;; ! The variable DOC is not used. ;;; Style warning: ;;; in file CMPENV-DECLAIM.LSP, position 925 ;;; at (DEFUN PROCESS-DECLAIM-ARGS ...) ;;; ! The variable ALL is not used. ;;; Compiling (DEFMACRO DECLAIM ...). ;;; Compiling (DEFMACRO EXT::C-DECLAIM ...). ;;; End of Pass 1. ;;; Emitting code for PROCESS-DECLAIM-ARGS. ;;; Emitting code for ADD-VARIABLES. ;;; Emitting code for DECLAIM. ;;; Emitting code for EXT::C-DECLAIM. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpenv-declaim.c -o cmp/cmpenv-declaim.o ;;; Finished compiling SRC:CMP;CMPENV-DECLAIM.LSP. ;;; (compile-file "src:cmp;cmpc-machine.lsp" :output-file #P"BUILD:CMP;CMPC-MACHINE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPC-MACHINE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-REP-TYPE ...). ;;; Compiling (DEFUN MAKE-REP-TYPE-HASH ...). ;;; Style warning: ;;; in file CMPC-MACHINE.LSP, position 5893 ;;; at (DEFUN MAKE-REP-TYPE-HASH ...) ;;; ! The variable ALL-C-TYPES is not used. ;;; Compiling (DEFUN DEFAULT-MACHINE ...). ;;; Note: ;;; in file CMPC-MACHINE.LSP, position 6001 ;;; at (DEFUN DEFAULT-MACHINE ...) ;;; Checking type of #:LET7 to be LIST ;;; Note: ;;; in file CMPC-MACHINE.LSP, position 6001 ;;; at (DEFUN DEFAULT-MACHINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3) to be LIST ;;; Note: ;;; in file CMPC-MACHINE.LSP, position 6001 ;;; at (DEFUN DEFAULT-MACHINE ...) ;;; Checking type of #:LOOP-LIST-TAIL5 to be CONS ;;; Note: ;;; in file CMPC-MACHINE.LSP, position 6001 ;;; at (DEFUN DEFAULT-MACHINE ...) ;;; Checking type of #:LET18 to be LIST ;;; Note: ;;; in file CMPC-MACHINE.LSP, position 6001 ;;; at (DEFUN DEFAULT-MACHINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST15) to be LIST ;;; Compiling (DEFUN MACHINE-C-TYPE-P ...). ;;; Compiling (DEFUN MACHINE-FIXNUMP ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-REP-TYPE. ;;; Emitting code for MAKE-REP-TYPE-HASH. ;;; Emitting code for DEFAULT-MACHINE. ;;; Emitting code for MACHINE-C-TYPE-P. ;;; Emitting code for MACHINE-FIXNUMP. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpc-machine.c -o cmp/cmpc-machine.o ;;; Finished compiling SRC:CMP;CMPC-MACHINE.LSP. ;;; (compile-file "src:cmp;cmpc-wt.lsp" :output-file #P"BUILD:CMP;CMPC-WT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPC-WT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN WT1 ...). ;;; Compiling (DEFUN WT-H1 ...). ;;; Compiling (DEFUN WT ...). ;;; Note: ;;; in file CMPC-WT.LSP, position 1521 ;;; at (DEFUN WT ...) ;;; Checking type of #:LET8 to be LIST ;;; Note: ;;; in file CMPC-WT.LSP, position 1521 ;;; at (DEFUN WT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST6) to be LIST ;;; Compiling (DEFUN WT-H ...). ;;; Note: ;;; in file CMPC-WT.LSP, position 1568 ;;; at (DEFUN WT-H ...) ;;; Checking type of #:LET14 to be LIST ;;; Note: ;;; in file CMPC-WT.LSP, position 1568 ;;; at (DEFUN WT-H ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST12) to be LIST ;;; Compiling (DEFUN WT-NL-H ...). ;;; Note: ;;; in file CMPC-WT.LSP, position 1619 ;;; at (DEFUN WT-NL-H ...) ;;; Checking type of #:LET20 to be LIST ;;; Note: ;;; in file CMPC-WT.LSP, position 1619 ;;; at (DEFUN WT-NL-H ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST18) to be LIST ;;; Compiling (DEFUN PRINC-H ...). ;;; Compiling (DEFUN WT-NL ...). ;;; Note: ;;; in file CMPC-WT.LSP, position 1761 ;;; at (DEFUN WT-NL ...) ;;; Checking type of #:LET26 to be LIST ;;; Note: ;;; in file CMPC-WT.LSP, position 1761 ;;; at (DEFUN WT-NL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST24) to be LIST ;;; Compiling (DEFUN WT-NL1 ...). ;;; Note: ;;; in file CMPC-WT.LSP, position 1828 ;;; at (DEFUN WT-NL1 ...) ;;; Checking type of #:LET32 to be LIST ;;; Note: ;;; in file CMPC-WT.LSP, position 1828 ;;; at (DEFUN WT-NL1 ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST30) to be LIST ;;; Compiling (DEFVAR +MAX-DEPTH+ ...). ;;; Compiling (DEFVAR +C-NEWLINE-INDENT-STRINGS+ ...). ;;; Compiling (DEFUN WT-NL-INDENT ...). ;;; Compiling (DEFUN WT-OPEN-BRACE ...). ;;; Compiling (DEFUN WT-NL-OPEN-BRACE ...). ;;; Compiling (DEFUN WT-NL-CLOSE-MANY-BRACES ...). ;;; Note: ;;; in file CMPC-WT.LSP, position 2587 ;;; at (DEFUN WT-NL-CLOSE-MANY-BRACES ...) ;;; Checking type of #:LET42 to be REAL ;;; Compiling (DEFUN WT-NL-CLOSE-BRACE ...). ;;; Compiling (DEFMACRO WITH-INDENTATION ...). ;;; Compiling (DEFUN WT-GO ...). ;;; Note: ;;; in file CMPC-WT.LSP, position 3173 ;;; at (DEFUN WT-GO ...) ;;; Checking type of #:G51 to be CONS ;;; Compiling (DEFUN WT-LABEL ...). ;;; Compiling (DEFUN WT-FILTERED-COMMENT ...). ;;; Note: ;;; in file CMPC-WT.LSP, position 3438 ;;; at (DEFUN WT-FILTERED-COMMENT ...) ;;; Checking type of (1- (LENGTH TEXT)) to be FIXNUM ;;; Compiling (DEFUN DO-WT-COMMENT ...). ;;; Compiling (DEFUN WT-COMMENT ...). ;;; Compiling (DEFUN WT-COMMENT-NL ...). ;;; Compiling (DEFVAR *WT-STRING-SIZE* ...). ;;; Compiling (DEFUN ENCODE-STRING ...). ;;; Compiling (DEFUN WT-FILTERED-DATA ...). ;;; Compiling (DEFUN C-FILTERED-STRING ...). ;;; End of Pass 1. ;;; Emitting code for WT1. ;;; Emitting code for WT-H1. ;;; Emitting code for WT. ;;; Emitting code for WT-H. ;;; Emitting code for WT-NL-H. ;;; Emitting code for PRINC-H. ;;; Emitting code for WT-NL. ;;; Emitting code for WT-NL1. ;;; Emitting code for WT-NL-INDENT. ;;; Emitting code for WT-OPEN-BRACE. ;;; Emitting code for WT-NL-OPEN-BRACE. ;;; Emitting code for WT-NL-CLOSE-MANY-BRACES. ;;; Emitting code for WT-NL-CLOSE-BRACE. ;;; Emitting code for WITH-INDENTATION. ;;; Emitting code for WT-GO. ;;; Emitting code for WT-LABEL. ;;; Emitting code for WT-FILTERED-COMMENT. ;;; Emitting code for DO-WT-COMMENT. ;;; Emitting code for WT-COMMENT. ;;; Emitting code for WT-COMMENT-NL. ;;; Emitting code for ENCODE-STRING. ;;; Emitting code for WT-FILTERED-DATA. ;;; Emitting code for C-FILTERED-STRING. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpc-wt.c -o cmp/cmpc-wt.o ;;; Finished compiling SRC:CMP;CMPC-WT.LSP. ;;; (compile-file "src:cmp;cmpc-inliner.lsp" :output-file #P"BUILD:CMP;CMPC-INLINER.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPC-INLINER.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN INLINED-ARG-LOC ...). ;;; Compiling (DEFUN INLINED-ARG-TYPE ...). ;;; Compiling (DEFUN INLINED-ARG-REP-TYPE ...). ;;; Compiling (DEFMACRO DEFINE-C-INLINER ...). ;;; Compiling (DEFUN APPLY-INLINER ...). ;;; Compiling (DEFUN DEFAULT-C-INLINER ...). ;;; Note: ;;; in file CMPC-INLINER.LSP, position 1246 ;;; at (DEFUN DEFAULT-C-INLINER ...) ;;; Checking type of #:LET14 to be LIST ;;; Note: ;;; in file CMPC-INLINER.LSP, position 1246 ;;; at (DEFUN DEFAULT-C-INLINER ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST10) to be LIST ;;; Note: ;;; in file CMPC-INLINER.LSP, position 1246 ;;; at (DEFUN DEFAULT-C-INLINER ...) ;;; Checking type of #:LOOP-LIST-TAIL12 to be CONS ;;; Compiling (DEFUN INLINE-FUNCTION ...). ;;; Style warning: ;;; in file CMPC-INLINER.LSP, position 1622 ;;; at (DEFUN INLINE-FUNCTION ...) ;;; ! The variable DEST-REP-TYPE is not used. ;;; Compiling (DEFUN APPLY-INLINE-INFO ...). ;;; Style warning: ;;; in file CMPC-INLINER.LSP, position 2047 ;;; at (DEFUN APPLY-INLINE-INFO ...) ;;; ! The variable OUT-TYPE is not used. ;;; Compiling (DEFUN CHOOSE-INLINE-INFO ...). ;;; Compiling (DEFUN GET-INLINE-INFO ...). ;;; Compiling (DEFUN TO-FIXNUM-FLOAT-TYPE ...). ;;; Compiling (DEFUN MAXIMUM-FLOAT-TYPE ...). ;;; Compiling (DEFUN INLINE-TYPE-MATCHES ...). ;;; End of Pass 1. ;;; Emitting code for INLINED-ARG-LOC. ;;; Emitting code for INLINED-ARG-TYPE. ;;; Emitting code for INLINED-ARG-REP-TYPE. ;;; Emitting code for DEFINE-C-INLINER. ;;; Emitting code for APPLY-INLINER. ;;; Emitting code for DEFAULT-C-INLINER. ;;; Emitting code for INLINE-FUNCTION. ;;; Emitting code for APPLY-INLINE-INFO. ;;; Emitting code for CHOOSE-INLINE-INFO. ;;; Emitting code for GET-INLINE-INFO. ;;; Emitting code for TO-FIXNUM-FLOAT-TYPE. ;;; Emitting code for MAXIMUM-FLOAT-TYPE. ;;; Emitting code for INLINE-TYPE-MATCHES. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpc-inliner.c -o cmp/cmpc-inliner.o ;;; Finished compiling SRC:CMP;CMPC-INLINER.LSP. ;;; (compile-file "src:cmp;cmpbind.lsp" :output-file #P"BUILD:CMP;CMPBIND.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPBIND.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN BIND ...). ;;; Compiling (DEFUN BIND-INIT ...). ;;; Compiling (DEFUN BDS-BIND ...). ;;; End of Pass 1. ;;; Emitting code for BIND. ;;; Emitting code for BIND-INIT. ;;; Emitting code for BDS-BIND. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpbind.c -o cmp/cmpbind.o ;;; Finished compiling SRC:CMP;CMPBIND.LSP. ;;; (compile-file "src:cmp;cmpblock.lsp" :output-file #P"BUILD:CMP;CMPBLOCK.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPBLOCK.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1BLOCK ...). ;;; Compiling (DEFUN C2BLOCK ...). ;;; Compiling (DEFUN C1RETURN-FROM ...). ;;; Compiling (DEFUN C2RETURN-FROM ...). ;;; End of Pass 1. ;;; Emitting code for C1BLOCK. ;;; Emitting code for C2BLOCK. ;;; Emitting code for C1RETURN-FROM. ;;; Emitting code for C2RETURN-FROM. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpblock.c -o cmp/cmpblock.o ;;; Finished compiling SRC:CMP;CMPBLOCK.LSP. ;;; (compile-file "src:cmp;cmpcall.lsp" :output-file #P"BUILD:CMP;CMPCALL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPCALL.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN UNOPTIMIZED-LONG-CALL ...). ;;; Note: ;;; in file CMPCALL.LSP, position 647 ;;; at (DEFUN UNOPTIMIZED-LONG-CALL ...) ;;; Checking type of #:LET4 to be LIST ;;; Note: ;;; in file CMPCALL.LSP, position 647 ;;; at (DEFUN UNOPTIMIZED-LONG-CALL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Note: ;;; in file CMPCALL.LSP, position 647 ;;; at (DEFUN UNOPTIMIZED-LONG-CALL ...) ;;; Checking type of #:LOOP-LIST-TAIL2 to be CONS ;;; Compiling (DEFUN UNOPTIMIZED-FUNCALL ...). ;;; Compiling (DEFUN C1FUNCALL ...). ;;; Compiling (DEFUN C2FUNCALL ...). ;;; Compiling (DEFUN C2CALL-GLOBAL ...). ;;; Compiling (DEFUN CALL-GLOBAL-LOC ...). ;;; Compiling (DEFUN CALL-LOC ...). ;;; Compiling (DEFUN CALL-EXPORTED-FUNCTION-LOC ...). ;;; Compiling (DEFUN CALL-UNKNOWN-GLOBAL-LOC ...). ;;; Compiling (DEFUN MAYBE-SAVE-VALUE ...). ;;; Compiling (DEFVAR *TEXT-FOR-LEXICAL-LEVEL* ...). ;;; Compiling (DEFVAR *TEXT-FOR-CLOSURE* ...). ;;; Compiling (DEFUN ENV-VAR-NAME ...). ;;; Compiling (DEFUN WT-STACK-POINTER ...). ;;; Compiling (DEFUN WT-CALL ...). ;;; Compiling (DEFUN WT-CALL-INDIRECT ...). ;;; Compiling (DEFUN WT-CALL-NORMAL ...). ;;; Note: ;;; in file CMPCALL.LSP, position 9796 ;;; at (DEFUN WT-CALL-NORMAL ...) ;;; Checking type of (NTHCDR #:G53 #:G54) to be CONS ;;; Note: ;;; in file CMPCALL.LSP, position 9796 ;;; at (DEFUN WT-CALL-NORMAL ...) ;;; Checking type of (NTHCDR #:G60 #:G61) to be CONS ;;; Style warning: ;;; in file CMPCALL.LSP, position 9796 ;;; at (DEFUN WT-CALL-NORMAL ...) ;;; ! The variable TYPE is not used. ;;; End of Pass 1. ;;; Emitting code for UNOPTIMIZED-LONG-CALL. ;;; Emitting code for UNOPTIMIZED-FUNCALL. ;;; Emitting code for C1FUNCALL. ;;; Emitting code for C2FUNCALL. ;;; Emitting code for C2CALL-GLOBAL. ;;; Emitting code for CALL-GLOBAL-LOC. ;;; Emitting code for CALL-LOC. ;;; Emitting code for CALL-EXPORTED-FUNCTION-LOC. ;;; Emitting code for CALL-UNKNOWN-GLOBAL-LOC. ;;; Emitting code for MAYBE-SAVE-VALUE. ;;; Emitting code for ENV-VAR-NAME. ;;; Emitting code for WT-STACK-POINTER. ;;; Emitting code for WT-CALL. ;;; Emitting code for WT-CALL-INDIRECT. ;;; Emitting code for WT-CALL-NORMAL. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpcall.c -o cmp/cmpcall.o ;;; Finished compiling SRC:CMP;CMPCALL.LSP. ;;; (compile-file "src:cmp;cmpcatch.lsp" :output-file #P"BUILD:CMP;CMPCATCH.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPCATCH.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1CATCH ...). ;;; Compiling (DEFUN C2CATCH ...). ;;; Compiling (DEFUN C1UNWIND-PROTECT ...). ;;; Compiling (DEFUN C2UNWIND-PROTECT ...). ;;; Compiling (DEFUN C1THROW ...). ;;; Compiling (DEFUN C2THROW ...). ;;; End of Pass 1. ;;; Emitting code for C1CATCH. ;;; Emitting code for C2CATCH. ;;; Emitting code for C1UNWIND-PROTECT. ;;; Emitting code for C2UNWIND-PROTECT. ;;; Emitting code for C1THROW. ;;; Emitting code for C2THROW. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpcatch.c -o cmp/cmpcatch.o ;;; Finished compiling SRC:CMP;CMPCATCH.LSP. ;;; (compile-file "src:cmp;cmppolicy.lsp" :output-file #P"BUILD:CMP;CMPPOLICY.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPPOLICY.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN POLICY-TO-DEBUG-LEVEL ...). ;;; Note: ;;; in file CMPPOLICY.LSP, position 1360 ;;; at (DEFUN POLICY-TO-DEBUG-LEVEL ...) ;;; Checking type of (1+ LEVEL) to be FIXNUM ;;; Compiling (DEFUN POLICY-TO-SAFETY-LEVEL ...). ;;; Note: ;;; in file CMPPOLICY.LSP, position 1360 ;;; at (DEFUN POLICY-TO-SAFETY-LEVEL ...) ;;; Checking type of (1+ LEVEL) to be FIXNUM ;;; Compiling (DEFUN POLICY-TO-SPEED-LEVEL ...). ;;; Note: ;;; in file CMPPOLICY.LSP, position 1360 ;;; at (DEFUN POLICY-TO-SPEED-LEVEL ...) ;;; Checking type of (1+ LEVEL) to be FIXNUM ;;; Compiling (DEFUN POLICY-TO-SPACE-LEVEL ...). ;;; Note: ;;; in file CMPPOLICY.LSP, position 1360 ;;; at (DEFUN POLICY-TO-SPACE-LEVEL ...) ;;; Checking type of (1+ LEVEL) to be FIXNUM ;;; Compiling (DEFUN OPTIMIZATION-QUALITY-SWITCHES ...). ;;; Compiling (DEFUN COMPUTE-POLICY ...). ;;; Compiling (DEFUN DEFAULT-POLICY ...). ;;; Compiling (DEFUN CMP-ENV-POLICY ...). ;;; Compiling (DEFUN CMP-ENV-ADD-OPTIMIZATIONS ...). ;;; Compiling (DEFUN POLICY-DECLARATION-NAME-P ...). ;;; Compiling (DEFUN MAYBE-ADD-POLICY ...). ;;; Compiling (DEFUN ADD-DEFAULT-OPTIMIZATIONS ...). ;;; Compiling (DEFUN CMP-ENV-ALL-OPTIMIZATIONS ...). ;;; Compiling (DEFUN CMP-ENV-OPTIMIZATION ...). ;;; Compiling (DEFINE-POLICY ASSUME-NO-ERRORS ...). ;;; Compiling (DEFINE-POLICY ASSUME-RIGHT-TYPE ...). ;;; Compiling (DEFINE-POLICY TYPE-ASSERTIONS ...). ;;; Compiling (DEFINE-POLICY CHECK-STACK-OVERFLOW ...). ;;; Compiling (DEFINE-POLICY CHECK-ARGUMENTS-TYPE ...). ;;; Compiling (DEFINE-POLICY ARRAY-BOUNDS-CHECK ...). ;;; Compiling (DEFINE-POLICY GLOBAL-VAR-CHECKING ...). ;;; Compiling (DEFINE-POLICY GLOBAL-FUNCTION-CHECKING ...). ;;; Compiling (DEFINE-POLICY CHECK-NARGS ...). ;;; Compiling (DEFINE-POLICY THE-IS-CHECKED ...). ;;; Compiling (DEFINE-POLICY ASSUME-TYPES-DONT-CHANGE ...). ;;; Compiling (DEFINE-POLICY INLINE-SLOT-ACCESS ...). ;;; Compiling (DEFINE-POLICY INLINE-ACCESSORS ...). ;;; Compiling (DEFINE-POLICY INLINE-BIT-OPERATIONS ...). ;;; Compiling (DEFINE-POLICY OPEN-CODE-AREF/ASET ...). ;;; Compiling (DEFINE-POLICY EVALUATE-FORMS ...). ;;; Compiling (DEFINE-POLICY USE-DIRECT-C-CALL ...). ;;; Compiling (DEFINE-POLICY INLINE-TYPE-CHECKS ...). ;;; Compiling (DEFINE-POLICY INLINE-SEQUENCE-FUNCTIONS ...). ;;; Compiling (DEFINE-POLICY DEBUG-VARIABLE-BINDINGS ...). ;;; Compiling (DEFINE-POLICY DEBUG-IHS-FRAME ...). ;;; Compiling (DEFUN SAFE-COMPILE ...). ;;; Compiling (DEFUN COMPILER-PUSH-EVENTS ...). ;;; Compiling (DEFPARAMETER *OPTIMIZATION-QUALITY-SWITCHES* ...). ;;; End of Pass 1. ;;; Emitting code for POLICY-TO-DEBUG-LEVEL. ;;; Emitting code for POLICY-TO-SAFETY-LEVEL. ;;; Emitting code for POLICY-TO-SPEED-LEVEL. ;;; Emitting code for POLICY-TO-SPACE-LEVEL. ;;; Emitting code for OPTIMIZATION-QUALITY-SWITCHES. ;;; Emitting code for COMPUTE-POLICY. ;;; Emitting code for DEFAULT-POLICY. ;;; Emitting code for CMP-ENV-POLICY. ;;; Emitting code for CMP-ENV-ADD-OPTIMIZATIONS. ;;; Emitting code for POLICY-DECLARATION-NAME-P. ;;; Emitting code for MAYBE-ADD-POLICY. ;;; Emitting code for ADD-DEFAULT-OPTIMIZATIONS. ;;; Emitting code for CMP-ENV-ALL-OPTIMIZATIONS. ;;; Emitting code for CMP-ENV-OPTIMIZATION. ;;; Emitting code for POLICY-ASSUME-NO-ERRORS. ;;; Emitting code for POLICY-ASSUME-RIGHT-TYPE. ;;; Emitting code for POLICY-TYPE-ASSERTIONS. ;;; Emitting code for POLICY-CHECK-STACK-OVERFLOW. ;;; Emitting code for POLICY-CHECK-ARGUMENTS-TYPE. ;;; Emitting code for POLICY-ARRAY-BOUNDS-CHECK. ;;; Emitting code for POLICY-GLOBAL-VAR-CHECKING. ;;; Emitting code for POLICY-GLOBAL-FUNCTION-CHECKING. ;;; Emitting code for POLICY-CHECK-NARGS. ;;; Emitting code for POLICY-THE-IS-CHECKED. ;;; Emitting code for POLICY-ASSUME-TYPES-DONT-CHANGE. ;;; Emitting code for POLICY-INLINE-SLOT-ACCESS. ;;; Emitting code for POLICY-INLINE-ACCESSORS. ;;; Emitting code for POLICY-INLINE-BIT-OPERATIONS. ;;; Emitting code for POLICY-OPEN-CODE-AREF/ASET. ;;; Emitting code for POLICY-EVALUATE-FORMS. ;;; Emitting code for POLICY-USE-DIRECT-C-CALL. ;;; Emitting code for POLICY-INLINE-TYPE-CHECKS. ;;; Emitting code for POLICY-INLINE-SEQUENCE-FUNCTIONS. ;;; Emitting code for POLICY-DEBUG-VARIABLE-BINDINGS. ;;; Emitting code for POLICY-DEBUG-IHS-FRAME. ;;; Emitting code for SAFE-COMPILE. ;;; Emitting code for COMPILER-PUSH-EVENTS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmppolicy.c -o cmp/cmppolicy.o ;;; Finished compiling SRC:CMP;CMPPOLICY.LSP. ;;; (compile-file "src:cmp;cmpeval.lsp" :output-file #P"BUILD:CMP;CMPEVAL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPEVAL.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1EXPR-INNER ...). ;;; Compiling (DEFUN C1EXPR ...). ;;; Compiling (DEFVAR *C1NIL* ...). ;;; Compiling (DEFUN C1NIL ...). ;;; Compiling (DEFVAR *C1T* ...). ;;; Compiling (DEFUN C1T ...). ;;; Compiling (DEFUN C1CALL ...). ;;; Compiling (DEFUN C1CALL-LOCAL ...). ;;; Compiling (DEFUN C1CALL-GLOBAL ...). ;;; Compiling (DEFUN C1CALL-CONSTANT-FOLD ...). ;;; Note: ;;; in file CMPEVAL.LSP, position 5690 ;;; at (DEFUN C1CALL-CONSTANT-FOLD ...) ;;; Checking type of #:LET19 to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 5690 ;;; at (DEFUN C1CALL-CONSTANT-FOLD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST17) to be LIST ;;; Compiling (DEFUN C2EXPR ...). ;;; Compiling (DEFUN C2EXPR* ...). ;;; Compiling (DEFUN C1WITH-BACKEND ...). ;;; Note: ;;; in file CMPEVAL.LSP, position 7032 ;;; at (DEFUN C1WITH-BACKEND ...) ;;; Checking type of #:LOOP-LIST-TAIL22 to be CONS ;;; Compiling (DEFUN C1PROGN ...). ;;; Note: ;;; in file CMPEVAL.LSP, position 7228 ;;; at (DEFUN C1PROGN ...) ;;; Checking type of #:LET33 to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 7228 ;;; at (DEFUN C1PROGN ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST29) to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 7228 ;;; at (DEFUN C1PROGN ...) ;;; Checking type of #:LOOP-LIST-TAIL31 to be CONS ;;; Compiling (DEFUN C2PROGN ...). ;;; Compiling (DEFUN C1ARGS* ...). ;;; Note: ;;; in file CMPEVAL.LSP, position 8184 ;;; at (DEFUN C1ARGS* ...) ;;; Checking type of #:LET44 to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 8184 ;;; at (DEFUN C1ARGS* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST40) to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 8184 ;;; at (DEFUN C1ARGS* ...) ;;; Checking type of #:LOOP-LIST-TAIL42 to be CONS ;;; Compiling (DEFVAR *COMPILER-TEMPS* ...). ;;; Compiling (DEFMACRO SI::DEFINE-INLINE-FUNCTION ...). ;;; Note: ;;; in file CMPEVAL.LSP, position 8399 ;;; at (FSET 'DEFINE-INLINE-FUNCTION ...) ;;; Checking type of #:LET87 to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 8399 ;;; at (FSET 'DEFINE-INLINE-FUNCTION ...) ;;; Checking type of #:LET89 to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 8399 ;;; at (FSET 'DEFINE-INLINE-FUNCTION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST81) to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 8399 ;;; at (FSET 'DEFINE-INLINE-FUNCTION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST82) to be LIST ;;; Note: ;;; in file CMPEVAL.LSP, position 8399 ;;; at (FSET 'DEFINE-INLINE-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL84 to be CONS ;;; End of Pass 1. ;;; Emitting code for C1EXPR-INNER. ;;; Emitting code for C1EXPR. ;;; Emitting code for C1NIL. ;;; Emitting code for C1T. ;;; Emitting code for C1CALL. ;;; Emitting code for C1CALL-LOCAL. ;;; Emitting code for C1CALL-GLOBAL. ;;; Emitting code for C1CALL-CONSTANT-FOLD. ;;; Emitting code for #:G16. ;;; Emitting code for C2EXPR. ;;; Emitting code for C2EXPR*. ;;; Emitting code for C1WITH-BACKEND. ;;; Emitting code for C1PROGN. ;;; Emitting code for C2PROGN. ;;; Emitting code for C1ARGS*. ;;; Emitting code for SI::DEFINE-INLINE-FUNCTION. ;;; Emitting code for #:G85. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpeval.c -o cmp/cmpeval.o ;;; Finished compiling SRC:CMP;CMPEVAL.LSP. ;;; (compile-file "src:cmp;cmpexit.lsp" :output-file #P"BUILD:CMP;CMPEXIT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPEXIT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN UNWIND-BDS ...). ;;; Compiling (DEFUN UNWIND-EXIT ...). ;;; Note: ;;; in file CMPEXIT.LSP, position 2134 ;;; at (DEFUN UNWIND-EXIT ...) ;;; Checking type of (+ BDS-BIND #:G19) to be FIXNUM ;;; Compiling (DEFUN BABOON-IMPROPER-*EXIT* ...). ;;; Compiling (DEFUN BABOON-UNWIND-EXIT ...). ;;; Compiling (DEFUN UNWIND-NO-EXIT-UNTIL ...). ;;; Compiling (DEFUN UNWIND-NO-EXIT ...). ;;; Compiling (DEFUN TAIL-RECURSION-POSSIBLE ...). ;;; Compiling (DEFUN C2TRY-TAIL-RECURSIVE-CALL ...). ;;; End of Pass 1. ;;; Emitting code for UNWIND-BDS. ;;; Emitting code for UNWIND-EXIT. ;;; Emitting code for BABOON-IMPROPER-*EXIT*. ;;; Emitting code for BABOON-UNWIND-EXIT. ;;; Emitting code for UNWIND-NO-EXIT-UNTIL. ;;; Emitting code for UNWIND-NO-EXIT. ;;; Emitting code for TAIL-RECURSION-POSSIBLE. ;;; Emitting code for C2TRY-TAIL-RECURSIVE-CALL. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpexit.c -o cmp/cmpexit.o ;;; Finished compiling SRC:CMP;CMPEXIT.LSP. ;;; (compile-file "src:cmp;cmpflet.lsp" :output-file #P"BUILD:CMP;CMPFLET.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPFLET.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1LABELS ...). ;;; Compiling (DEFUN C1FLET ...). ;;; Compiling (DEFUN C1LABELS/FLET ...). ;;; Note: ;;; in file CMPFLET.LSP, position 763 ;;; at (DEFUN C1LABELS/FLET ...) ;;; Checking type of #:LET15 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 763 ;;; at (DEFUN C1LABELS/FLET ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST13) to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 763 ;;; at (DEFUN C1LABELS/FLET ...) ;;; Checking type of #:LET18 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 763 ;;; at (DEFUN C1LABELS/FLET ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST16) to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 763 ;;; at (DEFUN C1LABELS/FLET ...) ;;; Checking type of #:LET23 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 763 ;;; at (DEFUN C1LABELS/FLET ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST21) to be LIST ;;; Compiling (DEFUN CHILD-FUNCTION-P ...). ;;; Compiling (DEFUN COMPUTE-CLOSURE-TYPE ...). ;;; Compiling (DEFUN UPDATE-FUN-CLOSURE-TYPE-MANY ...). ;;; Compiling (DEFUN PREPEND-NEW ...). ;;; Note: ;;; in file CMPFLET.LSP, position 5378 ;;; at (DEFUN PREPEND-NEW ...) ;;; Checking type of #:LET47 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 5378 ;;; at (DEFUN PREPEND-NEW ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST45) to be LIST ;;; Compiling (DEFUN UPDATE-FUN-CLOSURE-TYPE ...). ;;; Note: ;;; in file CMPFLET.LSP, position 5456 ;;; at (DEFUN UPDATE-FUN-CLOSURE-TYPE ...) ;;; Checking type of #:LET57 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 5456 ;;; at (DEFUN UPDATE-FUN-CLOSURE-TYPE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST53) to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 5456 ;;; at (DEFUN UPDATE-FUN-CLOSURE-TYPE ...) ;;; Checking type of #:LOOP-LIST-TAIL55 to be CONS ;;; Compiling (DEFUN C2LOCALS ...). ;;; Note: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; Checking type of #:LET79 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST77) to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; Checking type of #:LET87 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST85) to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; Checking type of #:LET93 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST91) to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; Checking type of #:LET96 to be LIST ;;; Note: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST94) to be LIST ;;; Style warning: ;;; in file CMPFLET.LSP, position 7063 ;;; at (DEFUN C2LOCALS ...) ;;; ! The variable LABELS is not used. ;;; Compiling (DEFUN C1DECL-BODY ...). ;;; Compiling (DEFUN C1LOCALLY ...). ;;; Compiling (DEFUN C1MACROLET ...). ;;; Compiling (DEFUN C1SYMBOL-MACROLET ...). ;;; Compiling (DEFUN LOCAL-FUNCTION-REF ...). ;;; Style warning: ;;; in file CMPFLET.LSP, position 9579 ;;; at (DEFUN LOCAL-FUNCTION-REF ...) ;;; ! The variable UNW is not used. ;;; Compiling (DEFUN C2CALL-LOCAL ...). ;;; Style warning: ;;; in file CMPFLET.LSP, position 10770 ;;; at (DEFUN C2CALL-LOCAL ...) ;;; ! Variable C1FORM, declared as IGNORE, found in a lisp form. ;;; End of Pass 1. ;;; Emitting code for C1LABELS. ;;; Emitting code for C1FLET. ;;; Emitting code for C1LABELS/FLET. ;;; Emitting code for CHILD-FUNCTION-P. ;;; Emitting code for COMPUTE-CLOSURE-TYPE. ;;; Emitting code for UPDATE-FUN-CLOSURE-TYPE-MANY. ;;; Emitting code for PREPEND-NEW. ;;; Emitting code for UPDATE-FUN-CLOSURE-TYPE. ;;; Emitting code for C2LOCALS. ;;; Emitting code for C1DECL-BODY. ;;; Emitting code for C1LOCALLY. ;;; Emitting code for C1MACROLET. ;;; Emitting code for C1SYMBOL-MACROLET. ;;; Emitting code for LOCAL-FUNCTION-REF. ;;; Emitting code for C2CALL-LOCAL. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpflet.c -o cmp/cmpflet.o ;;; Finished compiling SRC:CMP;CMPFLET.LSP. ;;; (compile-file "src:cmp;cmpfun.lsp" :output-file #P"BUILD:CMP;CMPFUN.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPFUN.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1APPLY ...). ;;; Compiling (DEFUN RESULT-TYPE ...). ;;; End of Pass 1. ;;; Emitting code for C1APPLY. ;;; Emitting code for DEFAULT-APPLY. ;;; Emitting code for BOOLE. ;;; Emitting code for RESULT-TYPE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpfun.c -o cmp/cmpfun.o ;;; Finished compiling SRC:CMP;CMPFUN.LSP. ;;; (compile-file "src:cmp;cmpif.lsp" :output-file #P"BUILD:CMP;CMPIF.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPIF.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1IF ...). ;;; Compiling (DEFUN C1NOT ...). ;;; Compiling (DEFUN C1AND ...). ;;; Compiling (DEFUN C1OR ...). ;;; Compiling (DEFUN C2IF ...). ;;; Compiling (DEFUN NEGATE-ARGUMENT ...). ;;; Compiling (DEFUN C2FMLA-NOT ...). ;;; Compiling (DEFUN JUMP-TRUE-DESTINATION-P ...). ;;; Compiling (DEFUN JUMP-FALSE-DESTINATION-P ...). ;;; Compiling (DEFUN C2FMLA-AND ...). ;;; Note: ;;; in file CMPIF.LSP, position 5288 ;;; at (DEFUN C2FMLA-AND ...) ;;; Checking type of #:LET9 to be LIST ;;; Note: ;;; in file CMPIF.LSP, position 5288 ;;; at (DEFUN C2FMLA-AND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST7) to be LIST ;;; Note: ;;; in file CMPIF.LSP, position 5288 ;;; at (DEFUN C2FMLA-AND ...) ;;; Checking type of #:LET15 to be LIST ;;; Note: ;;; in file CMPIF.LSP, position 5288 ;;; at (DEFUN C2FMLA-AND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST13) to be LIST ;;; Compiling (DEFUN C2FMLA-OR ...). ;;; Note: ;;; in file CMPIF.LSP, position 5701 ;;; at (DEFUN C2FMLA-OR ...) ;;; Checking type of #:LET21 to be LIST ;;; Note: ;;; in file CMPIF.LSP, position 5701 ;;; at (DEFUN C2FMLA-OR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST19) to be LIST ;;; Note: ;;; in file CMPIF.LSP, position 5701 ;;; at (DEFUN C2FMLA-OR ...) ;;; Checking type of #:LET27 to be LIST ;;; Note: ;;; in file CMPIF.LSP, position 5701 ;;; at (DEFUN C2FMLA-OR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST25) to be LIST ;;; Compiling (DEFUN SET-JUMP-TRUE ...). ;;; Compiling (DEFUN SET-JUMP-FALSE ...). ;;; End of Pass 1. ;;; Emitting code for C1IF. ;;; Emitting code for C1NOT. ;;; Emitting code for C1AND. ;;; Emitting code for C1OR. ;;; Emitting code for C2IF. ;;; Emitting code for NEGATE-ARGUMENT. ;;; Emitting code for C2FMLA-NOT. ;;; Emitting code for JUMP-TRUE-DESTINATION-P. ;;; Emitting code for JUMP-FALSE-DESTINATION-P. ;;; Emitting code for C2FMLA-AND. ;;; Emitting code for C2FMLA-OR. ;;; Emitting code for SET-JUMP-TRUE. ;;; Emitting code for SET-JUMP-FALSE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpif.c -o cmp/cmpif.o ;;; Finished compiling SRC:CMP;CMPIF.LSP. ;;; (compile-file "src:cmp;cmplam.lsp" :output-file #P"BUILD:CMP;CMPLAM.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPLAM.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1LAMBDA-DOC ...). ;;; Compiling (DEFUN C1LAMBDA-BODY ...). ;;; Compiling (DEFUN C1LAMBDA-LIST ...). ;;; Compiling (DEFUN FUN-NEEDS-NARG ...). ;;; Compiling (DEFUN FUN-FIXED-NARG ...). ;;; Compiling (DEFUN ADD-TO-FUN-REFERENCED-VARS ...). ;;; Note: ;;; in file CMPLAM.LSP, position 2296 ;;; at (DEFUN ADD-TO-FUN-REFERENCED-VARS ...) ;;; Checking type of #:LET3 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 2296 ;;; at (DEFUN ADD-TO-FUN-REFERENCED-VARS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1) to be LIST ;;; Compiling (DEFUN ADD-TO-FUN-REFERENCED-FUNS ...). ;;; Note: ;;; in file CMPLAM.LSP, position 2748 ;;; at (DEFUN ADD-TO-FUN-REFERENCED-FUNS ...) ;;; Checking type of #:LET10 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 2748 ;;; at (DEFUN ADD-TO-FUN-REFERENCED-FUNS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST8) to be LIST ;;; Compiling (DEFUN C1COMPILE-FUNCTION ...). ;;; Note: ;;; in file CMPLAM.LSP, position 3277 ;;; at (DEFUN C1COMPILE-FUNCTION ...) ;;; Checking type of #:LET55 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 3277 ;;; at (DEFUN C1COMPILE-FUNCTION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST53) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 3277 ;;; at (DEFUN C1COMPILE-FUNCTION ...) ;;; Checking type of #:LET58 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 3277 ;;; at (DEFUN C1COMPILE-FUNCTION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST56) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 3277 ;;; at (DEFUN C1COMPILE-FUNCTION ...) ;;; Checking type of #:LET65 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 3277 ;;; at (DEFUN C1COMPILE-FUNCTION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST61) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 3277 ;;; at (DEFUN C1COMPILE-FUNCTION ...) ;;; Checking type of #:LOOP-LIST-TAIL63 to be CONS ;;; Compiling (DEFUN CMP-PROCESS-LAMBDA-LIST ...). ;;; Compiling (DEFUN C1LAMBDA-EXPR ...). ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:G73 to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:G78 to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (CDR #:G80) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (CDDR #:G82) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (CDR #:G87) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (CDDR #:G89) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (CDDDR #:G91) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:LOOP-LIST-TAIL95 to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:LET102 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST98) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:LOOP-LIST-TAIL100 to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:LET109 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST105) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:LOOP-LIST-TAIL107 to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:LET116 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST111) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:LOOP-LIST-TAIL113 to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of #:LET121 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 6436 ;;; at (DEFUN C1LAMBDA-EXPR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST118) to be LIST ;;; Compiling (DEFUN LAMBDA-FORM-ALLOWED-NARGS ...). ;;; Style warning: ;;; in file CMPLAM.LSP, position 11811 ;;; at (DEFUN LAMBDA-FORM-ALLOWED-NARGS ...) ;;; ! The variable KEYWORDS is not used. ;;; Compiling (DEFUN C2LAMBDA-EXPR ...). ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (/ (LENGTH KEYWORDS) 4) to be FIXNUM ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (FIRST (TRULY-THE CONS #:G139)) to be VAR ;;; Warning: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; ! The expression NIL is not of the expected type VAR ;;; Warning: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; ! In LET body, the type of the form VAR is SYMBOL, not VAR. ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of #:LET153 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST149) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of #:G154 to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of #:LET160 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST158) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of #:LET174 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of #:LET176 to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST171) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST172) to be LIST ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (CDR #:G194) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (CDR #:G196) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (CDR #:G200) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (CDR #:G202) to be CONS ;;; Note: ;;; in file CMPLAM.LSP, position 12759 ;;; at (DEFUN C2LAMBDA-EXPR ...) ;;; Checking type of (1+ I) to be FIXNUM ;;; Compiling (DEFUN OPTIMIZE-FUNCALL/APPLY-LAMBDA ...). ;;; Note: ;;; in file CMPLAM.LSP, position 21259 ;;; at (DEFUN OPTIMIZE-FUNCALL/APPLY-LAMBDA ...) ;;; Checking type of #:G212 to be CONS ;;; End of Pass 1. ;;; Emitting code for C1LAMBDA-DOC. ;;; Emitting code for C1LAMBDA-BODY. ;;; Emitting code for C1LAMBDA-LIST. ;;; Emitting code for FUN-NEEDS-NARG. ;;; Emitting code for FUN-FIXED-NARG. ;;; Emitting code for ADD-TO-FUN-REFERENCED-VARS. ;;; Emitting code for ADD-TO-FUN-REFERENCED-FUNS. ;;; Emitting code for C1COMPILE-FUNCTION. ;;; Emitting code for CMP-PROCESS-LAMBDA-LIST. ;;; Emitting code for #:G69. ;;; Emitting code for C1LAMBDA-EXPR. ;;; Emitting code for LAMBDA-FORM-ALLOWED-NARGS. ;;; Emitting code for C2LAMBDA-EXPR. ;;; Emitting code for DO-DECL. ;;; Emitting code for WT-DECL. ;;; Emitting code for LAST-VARIABLE. ;;; Emitting code for OPTIMIZE-FUNCALL/APPLY-LAMBDA. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmplam.c -o cmp/cmplam.o ;;; Finished compiling SRC:CMP;CMPLAM.LSP. ;;; (compile-file "src:cmp;cmplet.lsp" :output-file #P"BUILD:CMP;CMPLET.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPLET.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1LET ...). ;;; Note: ;;; in file CMPLET.LSP, position 639 ;;; at (DEFUN C1LET ...) ;;; Checking type of #:LET12 to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 639 ;;; at (DEFUN C1LET ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2) to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 639 ;;; at (DEFUN C1LET ...) ;;; Checking type of #:LOOP-LIST-TAIL4 to be CONS ;;; Note: ;;; in file CMPLET.LSP, position 639 ;;; at (DEFUN C1LET ...) ;;; Checking type of #:LOOP-LIST-TAIL6 to be CONS ;;; Note: ;;; in file CMPLET.LSP, position 639 ;;; at (DEFUN C1LET ...) ;;; Checking type of #:LOOP-LIST-TAIL8 to be CONS ;;; Note: ;;; in file CMPLET.LSP, position 639 ;;; at (DEFUN C1LET ...) ;;; Checking type of #:LOOP-LIST-TAIL10 to be CONS ;;; Note: ;;; in file CMPLET.LSP, position 639 ;;; at (DEFUN C1LET ...) ;;; Checking type of #:LOOP-LIST-TAIL4 to be CONS ;;; Note: ;;; in file CMPLET.LSP, position 639 ;;; at (DEFUN C1LET ...) ;;; Checking type of #:LOOP-LIST-TAIL6 to be CONS ;;; Compiling (DEFUN C1LET* ...). ;;; Compiling (DEFUN C1LET/LET* ...). ;;; Note: ;;; in file CMPLET.LSP, position 2344 ;;; at (DEFUN C1LET/LET* ...) ;;; Checking type of #:LET21 to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 2344 ;;; at (DEFUN C1LET/LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST19) to be LIST ;;; Style warning: ;;; in file CMPLET.LSP, position 2344 ;;; at (DEFUN C1LET/LET* ...) ;;; ! The variable SP-CHANGE is not used. ;;; Compiling (DEFUN INVALID-LET-BINDINGS ...). ;;; Compiling (DEFUN PROCESS-LET-BINDINGS ...). ;;; Note: ;;; in file CMPLET.LSP, position 3241 ;;; at (DEFUN PROCESS-LET-BINDINGS ...) ;;; Checking type of #:LET48 to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 3241 ;;; at (DEFUN PROCESS-LET-BINDINGS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST46) to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 3241 ;;; at (DEFUN PROCESS-LET-BINDINGS ...) ;;; Checking type of #:LET55 to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 3241 ;;; at (DEFUN PROCESS-LET-BINDINGS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST51) to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 3241 ;;; at (DEFUN PROCESS-LET-BINDINGS ...) ;;; Checking type of #:LOOP-LIST-TAIL53 to be CONS ;;; Compiling (DEFUN C1LET-OPTIMIZE-READ-ONLY-VARS ...). ;;; Note: ;;; in file CMPLET.LSP, position 5164 ;;; at (DEFUN C1LET-OPTIMIZE-READ-ONLY-VARS ...) ;;; Checking type of #:LOOP-LIST-TAIL57 to be CONS ;;; Note: ;;; in file CMPLET.LSP, position 5164 ;;; at (DEFUN C1LET-OPTIMIZE-READ-ONLY-VARS ...) ;;; Checking type of #:LOOP-LIST-TAIL59 to be CONS ;;; Compiling (DEFUN FIX-READ-ONLY-VARIABLE-TYPE ...). ;;; Style warning: ;;; in file CMPLET.LSP, position 6247 ;;; at (DEFUN FIX-READ-ONLY-VARIABLE-TYPE ...) ;;; ! The variable REST-FORMS is not used. ;;; Compiling (DEFUN C1LET-UNUSED-VARIABLE-P ...). ;;; Compiling (DEFUN C1LET-CONSTANT-VALUE-P ...). ;;; Style warning: ;;; in file CMPLET.LSP, position 6960 ;;; at (DEFUN C1LET-CONSTANT-VALUE-P ...) ;;; ! The variable REST-FORMS is not used. ;;; Style warning: ;;; in file CMPLET.LSP, position 6960 ;;; at (DEFUN C1LET-CONSTANT-VALUE-P ...) ;;; ! The variable REST-VARS is not used. ;;; Compiling (DEFUN C1LET-CONSTANT-VARIABLE-P ...). ;;; Compiling (DEFUN C2LET-REPLACEABLE-VAR-REF-P ...). ;;; Note: ;;; in file CMPLET.LSP, position 7993 ;;; at (DEFUN C2LET-REPLACEABLE-VAR-REF-P ...) ;;; Checking type of (C1FORM-ARG 0 FORM) to be VAR ;;; Compiling (DEFUN C1LET-CAN-MOVE-VARIABLE-VALUE-P ...). ;;; Compiling (DEFUN READ-ONLY-VARIABLE-P ...). ;;; Compiling (DEFUN ENV-GROWS ...). ;;; Compiling (DEFUN REPLACEABLE ...). ;;; Compiling (DEFUN C2LET* ...). ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of #:LET77 to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST71) to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of #:LOOP-LIST-TAIL73 to be CONS ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of #:LOOP-LIST-TAIL75 to be CONS ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST71) to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of #:LET82 to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST80) to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of #:LET88 to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of #:LET90 to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST85) to be LIST ;;; Note: ;;; in file CMPLET.LSP, position 10574 ;;; at (DEFUN C2LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST86) to be LIST ;;; Compiling (DEFUN DISCARDED ...). ;;; Compiling (DEFUN NSUBST-VAR ...). ;;; Compiling (DEFUN MEMBER-VAR ...). ;;; End of Pass 1. ;;; Emitting code for C1LET. ;;; Emitting code for C1LET*. ;;; Emitting code for C1LET/LET*. ;;; Emitting code for INVALID-LET-BINDINGS. ;;; Emitting code for PROCESS-LET-BINDINGS. ;;; Emitting code for C1LET-OPTIMIZE-READ-ONLY-VARS. ;;; Emitting code for FIX-READ-ONLY-VARIABLE-TYPE. ;;; Emitting code for C1LET-UNUSED-VARIABLE-P. ;;; Emitting code for C1LET-CONSTANT-VALUE-P. ;;; Emitting code for C1LET-CONSTANT-VARIABLE-P. ;;; Emitting code for C2LET-REPLACEABLE-VAR-REF-P. ;;; Emitting code for C1LET-CAN-MOVE-VARIABLE-VALUE-P. ;;; Emitting code for #:G63. ;;; Emitting code for READ-ONLY-VARIABLE-P. ;;; Emitting code for ENV-GROWS. ;;; Emitting code for REPLACEABLE. ;;; Emitting code for ABORT-ON-SIDE-EFFECTS. ;;; Emitting code for C2LET*. ;;; Emitting code for DISCARDED. ;;; Emitting code for LAST-FORM. ;;; Emitting code for NSUBST-VAR. ;;; Emitting code for MEMBER-VAR. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmplet.c -o cmp/cmplet.o ;;; Finished compiling SRC:CMP;CMPLET.LSP. ;;; (compile-file "src:cmp;cmploc.lsp" :output-file #P"BUILD:CMP;CMPLOC.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPLOC.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN TMP-DESTINATION ...). ;;; Compiling (DEFUN PRECISE-LOC-TYPE ...). ;;; Compiling (DEFUN LOC-IN-C1FORM-MOVABLE-P ...). ;;; Compiling (DEFUN USES-VALUES ...). ;;; Compiling (DEFUN LOC-IMMEDIATE-VALUE-P ...). ;;; Compiling (DEFUN LOC-IMMEDIATE-VALUE ...). ;;; Compiling (DEFUN UNKNOWN-LOCATION ...). ;;; Compiling (DEFUN WT-LOC ...). ;;; Compiling (DEFUN LAST-CALL-P ...). ;;; Compiling (DEFUN WT-LCL ...). ;;; Compiling (DEFUN WT-LCL-LOC ...). ;;; Style warning: ;;; in file CMPLOC.LSP, position 5533 ;;; at (DEFUN WT-LCL-LOC ...) ;;; ! The variable TYPE is not used. ;;; Compiling (DEFUN WT-TEMP ...). ;;; Compiling (DEFUN WT-NUMBER ...). ;;; Style warning: ;;; in file CMPLOC.LSP, position 5673 ;;; at (DEFUN WT-NUMBER ...) ;;; ! The variable VV is not used. ;;; Compiling (DEFUN WT-CHARACTER ...). ;;; Style warning: ;;; in file CMPLOC.LSP, position 5726 ;;; at (DEFUN WT-CHARACTER ...) ;;; ! The variable VV is not used. ;;; Compiling (DEFUN WT-VALUE ...). ;;; Compiling (DEFUN WT-KEYVARS ...). ;;; Compiling (DEFUN WT-THE ...). ;;; Compiling (DEFUN LOC-REFERS-TO-SPECIAL ...). ;;; Compiling (DEFUN VALUES-LOC ...). ;;; Compiling (DEFUN SET-UNKNOWN-LOC ...). ;;; Style warning: ;;; in file CMPLOC.LSP, position 6490 ;;; at (DEFUN SET-UNKNOWN-LOC ...) ;;; ! The variable LOC is not used. ;;; Compiling (DEFUN SET-LOC ...). ;;; Compiling (DEFUN SET-THE-LOC ...). ;;; Compiling (DEFUN SET-VALUES-LOC ...). ;;; Compiling (DEFUN SET-VALUE0-LOC ...). ;;; Compiling (DEFUN SET-RETURN-LOC ...). ;;; Compiling (DEFUN LOC-WITH-SIDE-EFFECTS-P ...). ;;; Compiling (DEFUN SET-TRASH-LOC ...). ;;; End of Pass 1. ;;; Emitting code for TMP-DESTINATION. ;;; Emitting code for PRECISE-LOC-TYPE. ;;; Emitting code for LOC-IN-C1FORM-MOVABLE-P. ;;; Emitting code for USES-VALUES. ;;; Emitting code for LOC-IMMEDIATE-VALUE-P. ;;; Emitting code for LOC-IMMEDIATE-VALUE. ;;; Emitting code for UNKNOWN-LOCATION. ;;; Emitting code for WT-LOC. ;;; Emitting code for LAST-CALL-P. ;;; Emitting code for WT-LCL. ;;; Emitting code for WT-LCL-LOC. ;;; Emitting code for WT-TEMP. ;;; Emitting code for WT-NUMBER. ;;; Emitting code for WT-CHARACTER. ;;; Emitting code for WT-VALUE. ;;; Emitting code for WT-KEYVARS. ;;; Emitting code for WT-THE. ;;; Emitting code for LOC-REFERS-TO-SPECIAL. ;;; Emitting code for VALUES-LOC. ;;; Emitting code for SET-UNKNOWN-LOC. ;;; Emitting code for SET-LOC. ;;; Emitting code for SET-THE-LOC. ;;; Emitting code for SET-VALUES-LOC. ;;; Emitting code for SET-VALUE0-LOC. ;;; Emitting code for SET-RETURN-LOC. ;;; Emitting code for LOC-WITH-SIDE-EFFECTS-P. ;;; Emitting code for SET-TRASH-LOC. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmploc.c -o cmp/cmploc.o ;;; Finished compiling SRC:CMP;CMPLOC.LSP. ;;; (compile-file "src:cmp;cmpmap.lsp" :output-file #P"BUILD:CMP;CMPMAP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPMAP.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN EXPAND-MAPCAR ...). ;;; Note: ;;; in file CMPMAP.LSP, position 644 ;;; at (DEFUN EXPAND-MAPCAR ...) ;;; Checking type of #:LET16 to be LIST ;;; Note: ;;; in file CMPMAP.LSP, position 644 ;;; at (DEFUN EXPAND-MAPCAR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST14) to be LIST ;;; End of Pass 1. ;;; Emitting code for EXPAND-MAPCAR. ;;; Emitting code for MAPCAR. ;;; Emitting code for MAPC. ;;; Emitting code for MAPCAN. ;;; Emitting code for MAPLIST. ;;; Emitting code for MAPL. ;;; Emitting code for MAPCON. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpmap.c -o cmp/cmpmap.o ;;; Finished compiling SRC:CMP;CMPMAP.LSP. ;;; (compile-file "src:cmp;cmpstack.lsp" :output-file #P"BUILD:CMP;CMPSTACK.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPSTACK.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1WITH-STACK ...). ;;; Compiling (DEFUN C2WITH-STACK ...). ;;; Compiling (DEFUN C1INNERMOST-STACK-FRAME ...). ;;; Style warning: ;;; in file CMPSTACK.LSP, position 1900 ;;; at (DEFUN C1INNERMOST-STACK-FRAME ...) ;;; ! The variable ARGS is not used. ;;; Compiling (DEFUN C1STACK-PUSH ...). ;;; Compiling (DEFUN C1STACK-PUSH-VALUES ...). ;;; Compiling (DEFUN C2STACK-PUSH-VALUES ...). ;;; Compiling (DEFUN C1STACK-POP ...). ;;; Compiling (DEFUN C1APPLY-FROM-STACK-FRAME ...). ;;; End of Pass 1. ;;; Emitting code for C1WITH-STACK. ;;; Emitting code for C2WITH-STACK. ;;; Emitting code for C1INNERMOST-STACK-FRAME. ;;; Emitting code for C1STACK-PUSH. ;;; Emitting code for C1STACK-PUSH-VALUES. ;;; Emitting code for C2STACK-PUSH-VALUES. ;;; Emitting code for C1STACK-POP. ;;; Emitting code for C1APPLY-FROM-STACK-FRAME. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpstack.c -o cmp/cmpstack.o ;;; Finished compiling SRC:CMP;CMPSTACK.LSP. ;;; (compile-file "src:cmp;cmpmulti.lsp" :output-file #P"BUILD:CMP;CMPMULTI.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPMULTI.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1MULTIPLE-VALUE-CALL ...). ;;; Note: ;;; in file CMPMULTI.LSP, position 749 ;;; at (DEFUN C1MULTIPLE-VALUE-CALL ...) ;;; Checking type of #:LET6 to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 749 ;;; at (DEFUN C1MULTIPLE-VALUE-CALL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2) to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 749 ;;; at (DEFUN C1MULTIPLE-VALUE-CALL ...) ;;; Checking type of #:LOOP-LIST-TAIL4 to be CONS ;;; Compiling (DEFUN C1MULTIPLE-VALUE-PROG1 ...). ;;; Compiling (DEFUN C1VALUES ...). ;;; Compiling (DEFUN C2VALUES ...). ;;; Note: ;;; in file CMPMULTI.LSP, position 2135 ;;; at (DEFUN C2VALUES ...) ;;; Checking type of #:LET12 to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 2135 ;;; at (DEFUN C2VALUES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST10) to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 2135 ;;; at (DEFUN C2VALUES ...) ;;; Checking type of #:LET15 to be FIXNUM ;;; Note: ;;; in file CMPMULTI.LSP, position 2135 ;;; at (DEFUN C2VALUES ...) ;;; Checking type of (1- I) to be FIXNUM ;;; Compiling (DEFUN C1MULTIPLE-VALUE-SETQ ...). ;;; Note: ;;; in file CMPMULTI.LSP, position 4575 ;;; at (DEFUN C1MULTIPLE-VALUE-SETQ ...) ;;; Checking type of #:LET32 to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 4575 ;;; at (DEFUN C1MULTIPLE-VALUE-SETQ ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST28) to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 4575 ;;; at (DEFUN C1MULTIPLE-VALUE-SETQ ...) ;;; Checking type of #:LOOP-LIST-TAIL30 to be CONS ;;; Compiling (DEFUN BIND-OR-SET ...). ;;; Compiling (DEFUN VALUES-LOC-OR-VALUE0 ...). ;;; Compiling (DEFUN DO-M-V-SETQ ...). ;;; Note: ;;; in file CMPMULTI.LSP, position 6298 ;;; at (DEFUN DO-M-V-SETQ ...) ;;; Checking type of #:LET50 to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 6298 ;;; at (DEFUN DO-M-V-SETQ ...) ;;; Checking type of MIN-VALUES to be REAL ;;; Note: ;;; in file CMPMULTI.LSP, position 6298 ;;; at (DEFUN DO-M-V-SETQ ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 6298 ;;; at (DEFUN DO-M-V-SETQ ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST ;;; Style warning: ;;; in file CMPMULTI.LSP, position 6298 ;;; at (DEFUN DO-M-V-SETQ ...) ;;; ! The variable MAX-VALUES is not used. ;;; Compiling (DEFUN C2MULTIPLE-VALUE-SETQ ...). ;;; Compiling (DEFUN C1MULTIPLE-VALUE-BIND ...). ;;; Note: ;;; in file CMPMULTI.LSP, position 8207 ;;; at (DEFUN C1MULTIPLE-VALUE-BIND ...) ;;; Checking type of #:LET59 to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 8207 ;;; at (DEFUN C1MULTIPLE-VALUE-BIND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST55) to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 8207 ;;; at (DEFUN C1MULTIPLE-VALUE-BIND ...) ;;; Checking type of #:LOOP-LIST-TAIL57 to be CONS ;;; Note: ;;; in file CMPMULTI.LSP, position 8207 ;;; at (DEFUN C1MULTIPLE-VALUE-BIND ...) ;;; Checking type of #:LET65 to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 8207 ;;; at (DEFUN C1MULTIPLE-VALUE-BIND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST63) to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 8207 ;;; at (DEFUN C1MULTIPLE-VALUE-BIND ...) ;;; Checking type of #:LET71 to be LIST ;;; Note: ;;; in file CMPMULTI.LSP, position 8207 ;;; at (DEFUN C1MULTIPLE-VALUE-BIND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST69) to be LIST ;;; Compiling (DEFUN C2MULTIPLE-VALUE-BIND ...). ;;; Note: ;;; in file CMPMULTI.LSP, position 9115 ;;; at (DEFUN C2MULTIPLE-VALUE-BIND ...) ;;; Checking type of (FIRST (TRULY-THE CONS #:G72)) to be VAR ;;; Style warning: ;;; in file CMPMULTI.LSP, position 9115 ;;; at (DEFUN C2MULTIPLE-VALUE-BIND ...) ;;; ! The variable NR is not used. ;;; End of Pass 1. ;;; Emitting code for C1MULTIPLE-VALUE-CALL. ;;; Emitting code for C1MULTIPLE-VALUE-PROG1. ;;; Emitting code for C1VALUES. ;;; Emitting code for C2VALUES. ;;; Emitting code for C1MULTIPLE-VALUE-SETQ. ;;; Emitting code for BIND-OR-SET. ;;; Emitting code for VALUES-LOC-OR-VALUE0. ;;; Emitting code for DO-M-V-SETQ. ;;; Emitting code for C2MULTIPLE-VALUE-SETQ. ;;; Emitting code for C1MULTIPLE-VALUE-BIND. ;;; Emitting code for C2MULTIPLE-VALUE-BIND. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpmulti.c -o cmp/cmpmulti.o ;;; Finished compiling SRC:CMP;CMPMULTI.LSP. ;;; (compile-file "src:cmp;cmpspecial.lsp" :output-file #P"BUILD:CMP;CMPSPECIAL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPSPECIAL.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1QUOTE ...). ;;; Compiling (DEFUN C1DECLARE ...). ;;; Compiling (DEFUN C1THE ...). ;;; Compiling (DEFUN C1TRULY-THE ...). ;;; Compiling (DEFUN C1COMPILER-LET ...). ;;; Compiling (DEFUN C2COMPILER-LET ...). ;;; Compiling (DEFUN C1FUNCTION ...). ;;; Compiling (DEFUN C2FUNCTION ...). ;;; Style warning: ;;; in file CMPSPECIAL.LSP, position 3649 ;;; at (DEFUN C2FUNCTION ...) ;;; ! The variable FUNOB is not used. ;;; Compiling (DEFUN NEW-LOCAL ...). ;;; Style warning: ;;; in file CMPSPECIAL.LSP, position 3915 ;;; at (DEFUN NEW-LOCAL ...) ;;; ! The variable PARENT is not used. ;;; Compiling (DEFUN WT-FDEFINITION ...). ;;; Compiling (DEFUN ENVIRONMENT-ACCESSOR ...). ;;; Compiling (DEFUN WT-MAKE-CLOSURE ...). ;;; End of Pass 1. ;;; Emitting code for C1QUOTE. ;;; Emitting code for C1DECLARE. ;;; Emitting code for C1THE. ;;; Emitting code for C1TRULY-THE. ;;; Emitting code for C1COMPILER-LET. ;;; Emitting code for C2COMPILER-LET. ;;; Emitting code for C1FUNCTION. ;;; Emitting code for C2FUNCTION. ;;; Emitting code for NEW-LOCAL. ;;; Emitting code for WT-FDEFINITION. ;;; Emitting code for ENVIRONMENT-ACCESSOR. ;;; Emitting code for WT-MAKE-CLOSURE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpspecial.c -o cmp/cmpspecial.o ;;; Finished compiling SRC:CMP;CMPSPECIAL.LSP. ;;; (compile-file "src:cmp;cmptag.lsp" :output-file #P"BUILD:CMP;CMPTAG.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPTAG.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *REG-AMOUNT* ...). ;;; Compiling (DEFUN ADD-LOOP-REGISTERS ...). ;;; Compiling (DEFUN C1TAGBODY ...). ;;; Note: ;;; in file CMPTAG.LSP, position 2844 ;;; at (DEFUN C1TAGBODY ...) ;;; Checking type of #:LET23 to be LIST ;;; Note: ;;; in file CMPTAG.LSP, position 2844 ;;; at (DEFUN C1TAGBODY ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST19) to be LIST ;;; Note: ;;; in file CMPTAG.LSP, position 2844 ;;; at (DEFUN C1TAGBODY ...) ;;; Checking type of #:LOOP-LIST-TAIL21 to be CONS ;;; Note: ;;; in file CMPTAG.LSP, position 2844 ;;; at (DEFUN C1TAGBODY ...) ;;; Checking type of #:LET28 to be LIST ;;; Note: ;;; in file CMPTAG.LSP, position 2844 ;;; at (DEFUN C1TAGBODY ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST ;;; Style warning: ;;; in file CMPTAG.LSP, position 2844 ;;; at (DEFUN C1TAGBODY ...) ;;; ! The variable THIS-TAG is not used. ;;; Note: ;;; in file CMPTAG.LSP, position 2844 ;;; at (DEFUN C1TAGBODY ...) ;;; Checking type of #:LET36 to be LIST ;;; Note: ;;; in file CMPTAG.LSP, position 2844 ;;; at (DEFUN C1TAGBODY ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST34) to be LIST ;;; Compiling (DEFUN C2TAGBODY ...). ;;; Compiling (DEFUN C2TAGBODY-BODY ...). ;;; Compiling (DEFUN C1GO ...). ;;; Compiling (DEFUN C2GO ...). ;;; End of Pass 1. ;;; Emitting code for ADD-LOOP-REGISTERS. ;;; Emitting code for JUMPS-TO-P. ;;; Emitting code for ADD-REG1. ;;; Emitting code for C1TAGBODY. ;;; Emitting code for C2TAGBODY. ;;; Emitting code for C2TAGBODY-BODY. ;;; Emitting code for C1GO. ;;; Emitting code for C2GO. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmptag.c -o cmp/cmptag.o ;;; Finished compiling SRC:CMP;CMPTAG.LSP. ;;; (compile-file "src:cmp;cmptop.lsp" :output-file #P"BUILD:CMP;CMPTOP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPTOP.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN T1EXPR ...). ;;; Compiling (DEFVAR *TOPLEVEL-FORMS-TO-PRINT* ...). ;;; Compiling (DEFUN T1EXPR* ...). ;;; Compiling (DEFUN T1/C1EXPR ...). ;;; Compiling (DEFUN T2EXPR ...). ;;; Compiling (DEFVAR *EMITTED-LOCAL-FUNS* ...). ;;; Compiling (DEFUN EMIT-LOCAL-FUNS ...). ;;; Compiling (DEFUN CTOP-WRITE ...). ;;; Note: ;;; in file CMPTOP.LSP, position 3809 ;;; at (DEFUN CTOP-WRITE ...) ;;; Checking type of #:LET24 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 3809 ;;; at (DEFUN CTOP-WRITE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST22) to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 3809 ;;; at (DEFUN CTOP-WRITE ...) ;;; Checking type of #:LET38 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 3809 ;;; at (DEFUN CTOP-WRITE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST34) to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 3809 ;;; at (DEFUN CTOP-WRITE ...) ;;; Checking type of #:LET44 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 3809 ;;; at (DEFUN CTOP-WRITE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST40) to be LIST ;;; Compiling (DEFUN EMIT-TOPLEVEL-FORM ...). ;;; Compiling (DEFUN C1EVAL-WHEN ...). ;;; Compiling (DEFUN T2COMPILER-LET ...). ;;; Compiling (DEFUN T2PROGN ...). ;;; Note: ;;; in file CMPTOP.LSP, position 11135 ;;; at (DEFUN T2PROGN ...) ;;; Checking type of #:LET76 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 11135 ;;; at (DEFUN T2PROGN ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST74) to be LIST ;;; Compiling (DEFUN EXPORTED-FNAME ...). ;;; Compiling (DEFUN NEW-DEFUN ...). ;;; Style warning: ;;; in file CMPTOP.LSP, position 11474 ;;; at (DEFUN NEW-DEFUN ...) ;;; ! The variable NO-ENTRY is not used. ;;; Compiling (DEFUN PRINT-FUNCTION ...). ;;; Compiling (DEFMACRO AND! ...). ;;; Compiling (DEFUN WT-FUNCTION-LOCALS ...). ;;; Note: ;;; in file CMPTOP.LSP, position 15538 ;;; at (DEFUN WT-FUNCTION-LOCALS ...) ;;; Checking type of #:LET92 to be REAL ;;; Compiling (DEFUN WT-GLOBAL-ENTRY ...). ;;; Note: ;;; in file CMPTOP.LSP, position 16781 ;;; at (DEFUN WT-GLOBAL-ENTRY ...) ;;; Checking type of #:LET94 to be FIXNUM ;;; Note: ;;; in file CMPTOP.LSP, position 16781 ;;; at (DEFUN WT-GLOBAL-ENTRY ...) ;;; Checking type of (1+ LCL) to be FIXNUM ;;; Note: ;;; in file CMPTOP.LSP, position 16781 ;;; at (DEFUN WT-GLOBAL-ENTRY ...) ;;; Checking type of (1+ N) to be FIXNUM ;;; Compiling (DEFUN REP-TYPE ...). ;;; Compiling (DEFUN T1ORDINARY ...). ;;; Compiling (DEFUN P1ORDINARY ...). ;;; Style warning: ;;; in file CMPTOP.LSP, position 18825 ;;; at (DEFUN P1ORDINARY ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN T2ORDINARY ...). ;;; Compiling (DEFUN ADD-LOAD-TIME-VALUES ...). ;;; Compiling (DEFUN T1DEFMACRO ...). ;;; Style warning: ;;; in file CMPTOP.LSP, position 19488 ;;; at (DEFUN T1DEFMACRO ...) ;;; ! The variable PPRINT is not used. ;;; Style warning: ;;; in file CMPTOP.LSP, position 19488 ;;; at (DEFUN T1DEFMACRO ...) ;;; ! The variable DOC-STRING is not used. ;;; Compiling (DEFUN C1LOAD-TIME-VALUE ...). ;;; Compiling (DEFUN T2LOAD-TIME-VALUE ...). ;;; Compiling (DEFUN T2MAKE-FORM ...). ;;; Compiling (DEFUN T2INIT-FORM ...). ;;; Style warning: ;;; in file CMPTOP.LSP, position 21048 ;;; at (DEFUN T2INIT-FORM ...) ;;; ! The variable VV-LOC is not used. ;;; Compiling (DEFUN PARSE-CVSPECS ...). ;;; Compiling (DEFUN LOCATIVE-TYPE-FROM-VAR-KIND ...). ;;; Compiling (DEFUN BUILD-DEBUG-LEXICAL-ENV ...). ;;; Note: ;;; in file CMPTOP.LSP, position 22631 ;;; at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...) ;;; Checking type of #:LET129 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 22631 ;;; at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST127) to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 22631 ;;; at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...) ;;; Checking type of #:LET136 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 22631 ;;; at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST133) to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 22631 ;;; at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST133) to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 22631 ;;; at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...) ;;; Checking type of #:LET139 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 22631 ;;; at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST137) to be LIST ;;; Compiling (DEFUN POP-DEBUG-LEXICAL-ENV ...). ;;; Compiling (DEFUN T3LOCAL-FUN ...). ;;; Compiling (DEFUN T3LOCAL-FUN-BODY ...). ;;; Compiling (DEFUN T3LOCAL-FUN-DECLARATION ...). ;;; Note: ;;; in file CMPTOP.LSP, position 26613 ;;; at (DEFUN T3LOCAL-FUN-DECLARATION ...) ;;; Checking type of #:LET148 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 26613 ;;; at (DEFUN T3LOCAL-FUN-DECLARATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST143) to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 26613 ;;; at (DEFUN T3LOCAL-FUN-DECLARATION ...) ;;; Checking type of #:LOOP-LIST-TAIL145 to be CONS ;;; Note: ;;; in file CMPTOP.LSP, position 26613 ;;; at (DEFUN T3LOCAL-FUN-DECLARATION ...) ;;; Checking type of #:LET159 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 26613 ;;; at (DEFUN T3LOCAL-FUN-DECLARATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST157) to be LIST ;;; Compiling (DEFUN FUN-CLOSURE-VARIABLES ...). ;;; Compiling (DEFUN FUN-LEXICAL-LEVELS ...). ;;; Compiling (DEFUN T3LOCAL-FUN-CLOSURE-SCAN ...). ;;; Compiling (DEFUN T1FSET ...). ;;; Compiling (DEFUN C1FSET ...). ;;; Style warning: ;;; in file CMPTOP.LSP, position 30926 ;;; at (DEFUN C1FSET ...) ;;; ! The variable LABELS is not used. ;;; Compiling (DEFUN P1FSET ...). ;;; Style warning: ;;; in file CMPTOP.LSP, position 33148 ;;; at (DEFUN P1FSET ...) ;;; ! The variable C1FORMS is not used. ;;; Style warning: ;;; in file CMPTOP.LSP, position 33148 ;;; at (DEFUN P1FSET ...) ;;; ! The variable PPRINT is not used. ;;; Style warning: ;;; in file CMPTOP.LSP, position 33148 ;;; at (DEFUN P1FSET ...) ;;; ! The variable MACRO is not used. ;;; Style warning: ;;; in file CMPTOP.LSP, position 33148 ;;; at (DEFUN P1FSET ...) ;;; ! The variable FNAME is not used. ;;; Style warning: ;;; in file CMPTOP.LSP, position 33148 ;;; at (DEFUN P1FSET ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN T2FSET ...). ;;; Style warning: ;;; in file CMPTOP.LSP, position 33261 ;;; at (DEFUN T2FSET ...) ;;; ! The variable ARGS is not used. ;;; Compiling (DEFUN C2FSET ...). ;;; Style warning: ;;; in file CMPTOP.LSP, position 33323 ;;; at (DEFUN C2FSET ...) ;;; ! The variable PPRINT is not used. ;;; Compiling (DEFUN OUTPUT-CFUNS ...). ;;; Note: ;;; in file CMPTOP.LSP, position 34063 ;;; at (DEFUN OUTPUT-CFUNS ...) ;;; Checking type of #:LET191 to be LIST ;;; Note: ;;; in file CMPTOP.LSP, position 34063 ;;; at (DEFUN OUTPUT-CFUNS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST187) to be LIST ;;; End of Pass 1. ;;; Emitting code for T1EXPR. ;;; Emitting code for T1EXPR*. ;;; Emitting code for T1/C1EXPR. ;;; Emitting code for T2EXPR. ;;; Emitting code for EMIT-LOCAL-FUNS. ;;; Emitting code for CTOP-WRITE. ;;; Emitting code for EMIT-TOPLEVEL-FORM. ;;; Emitting code for C1EVAL-WHEN. ;;; Emitting code for T2COMPILER-LET. ;;; Emitting code for T2PROGN. ;;; Emitting code for EXPORTED-FNAME. ;;; Emitting code for NEW-DEFUN. ;;; Emitting code for PRINT-FUNCTION. ;;; Emitting code for AND!. ;;; Emitting code for WT-FUNCTION-LOCALS. ;;; Emitting code for WT-GLOBAL-ENTRY. ;;; Emitting code for REP-TYPE. ;;; Emitting code for T1ORDINARY. ;;; Emitting code for P1ORDINARY. ;;; Emitting code for T2ORDINARY. ;;; Emitting code for ADD-LOAD-TIME-VALUES. ;;; Emitting code for T1DEFMACRO. ;;; Emitting code for C1LOAD-TIME-VALUE. ;;; Emitting code for T2LOAD-TIME-VALUE. ;;; Emitting code for T2MAKE-FORM. ;;; Emitting code for T2INIT-FORM. ;;; Emitting code for PARSE-CVSPECS. ;;; Emitting code for LOCATIVE-TYPE-FROM-VAR-KIND. ;;; Emitting code for BUILD-DEBUG-LEXICAL-ENV. ;;; Emitting code for POP-DEBUG-LEXICAL-ENV. ;;; Emitting code for T3LOCAL-FUN. ;;; Emitting code for T3LOCAL-FUN-BODY. ;;; Emitting code for T3LOCAL-FUN-DECLARATION. ;;; Emitting code for #:G146. ;;; Emitting code for FUN-CLOSURE-VARIABLES. ;;; Emitting code for #:G163. ;;; Emitting code for FUN-LEXICAL-LEVELS. ;;; Emitting code for T3LOCAL-FUN-CLOSURE-SCAN. ;;; Emitting code for T1FSET. ;;; Emitting code for C1FSET. ;;; Emitting code for P1FSET. ;;; Emitting code for T2FSET. ;;; Emitting code for C2FSET. ;;; Emitting code for OUTPUT-CFUNS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmptop.c -o cmp/cmptop.o ;;; Finished compiling SRC:CMP;CMPTOP.LSP. ;;; (compile-file "src:cmp;cmpvar.lsp" :output-file #P"BUILD:CMP;CMPVAR.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPVAR.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-VAR ...). ;;; Compiling (DEFUN VAR-REFERENCED-IN-FORM-LIST ...). ;;; Note: ;;; in file CMPVAR.LSP, position 862 ;;; at (DEFUN VAR-REFERENCED-IN-FORM-LIST ...) ;;; Checking type of #:LET7 to be LIST ;;; Note: ;;; in file CMPVAR.LSP, position 862 ;;; at (DEFUN VAR-REFERENCED-IN-FORM-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4) to be LIST ;;; Compiling (DEFUN VAR-CHANGED-IN-FORM-LIST ...). ;;; Note: ;;; in file CMPVAR.LSP, position 987 ;;; at (DEFUN VAR-CHANGED-IN-FORM-LIST ...) ;;; Checking type of #:LET11 to be LIST ;;; Note: ;;; in file CMPVAR.LSP, position 987 ;;; at (DEFUN VAR-CHANGED-IN-FORM-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST8) to be LIST ;;; Compiling (DEFUN VAR-REFERENCED-IN-FORM ...). ;;; Compiling (DEFUN VAR-CHANGED-IN-FORM ...). ;;; Compiling (DEFUN UPDATE-VARIABLE-TYPE ...). ;;; Note: ;;; in file CMPVAR.LSP, position 1983 ;;; at (DEFUN UPDATE-VARIABLE-TYPE ...) ;;; Checking type of #:LET14 to be LIST ;;; Note: ;;; in file CMPVAR.LSP, position 1983 ;;; at (DEFUN UPDATE-VARIABLE-TYPE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST12) to be LIST ;;; Compiling (DEFUN VAR-READ-FORMS ...). ;;; Note: ;;; in file CMPVAR.LSP, position 2740 ;;; at (DEFUN VAR-READ-FORMS ...) ;;; Checking type of #:LET25 to be LIST ;;; Note: ;;; in file CMPVAR.LSP, position 2740 ;;; at (DEFUN VAR-READ-FORMS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST21) to be LIST ;;; Note: ;;; in file CMPVAR.LSP, position 2740 ;;; at (DEFUN VAR-READ-FORMS ...) ;;; Checking type of #:LOOP-LIST-TAIL23 to be CONS ;;; Compiling (DEFUN ASSERT-VAR-REF-VALUE ...). ;;; Style warning: ;;; in file CMPVAR.LSP, position 2810 ;;; at (DEFUN ASSERT-VAR-REF-VALUE ...) ;;; ! The variable VAR is not used. ;;; Compiling (DEFUN ASSERT-VAR-NOT-IGNORED ...). ;;; Compiling (DEFUN DELETE-FROM-READ-NODES ...). ;;; Compiling (DEFUN ADD-TO-READ-NODES ...). ;;; Compiling (DEFUN ADD-TO-SET-NODES ...). ;;; Compiling (DEFUN ADD-TO-SET-NODES-OF-VAR-LIST ...). ;;; Compiling (DEFUN CHECK-GLOBAL ...). ;;; Compiling (DEFUN SPECIAL-VARIABLE-P ...). ;;; Compiling (DEFUN LOCAL-VARIABLE-P ...). ;;; Compiling (DEFUN SYMBOL-MACRO-P ...). ;;; Compiling (DEFUN VARIABLE-TYPE-IN-ENV ...). ;;; Style warning: ;;; in file CMPVAR.LSP, position 5822 ;;; at (DEFUN VARIABLE-TYPE-IN-ENV ...) ;;; ! The variable CCB is not used. ;;; Style warning: ;;; in file CMPVAR.LSP, position 5822 ;;; at (DEFUN VARIABLE-TYPE-IN-ENV ...) ;;; ! The variable CLB is not used. ;;; Style warning: ;;; in file CMPVAR.LSP, position 5822 ;;; at (DEFUN VARIABLE-TYPE-IN-ENV ...) ;;; ! The variable UNW is not used. ;;; Style warning: ;;; in file CMPVAR.LSP, position 5822 ;;; at (DEFUN VARIABLE-TYPE-IN-ENV ...) ;;; ! The variable ENV is not used. ;;; Compiling (DEFUN CHK-SYMBOL-MACROLET ...). ;;; Compiling (DEFUN C1MAKE-VAR ...). ;;; Compiling (DEFUN CHECK-VREF ...). ;;; Compiling (DEFUN C1VAR ...). ;;; Compiling (DEFUN MAKE-LCL-VAR ...). ;;; Compiling (DEFUN MAKE-TEMP-VAR ...). ;;; Compiling (DEFUN C1VREF ...). ;;; Style warning: ;;; in file CMPVAR.LSP, position 8569 ;;; at (DEFUN C1VREF ...) ;;; ! The variable UNW is not used. ;;; Compiling (DEFUN PUSH-VARS ...). ;;; Compiling (DEFUN UNBOXED ...). ;;; Compiling (DEFUN LOCAL ...). ;;; Compiling (DEFUN GLOBAL-VAR-P ...). ;;; Compiling (DEFUN USEFUL-VAR-P ...). ;;; Compiling (DEFUN C2VAR/LOCATION ...). ;;; Compiling (DEFUN WT-VAR ...). ;;; Compiling (DEFUN VAR-REP-TYPE ...). ;;; Compiling (DEFUN SET-VAR ...). ;;; Compiling (DEFUN WT-LEX ...). ;;; Compiling (DEFUN WT-ENV ...). ;;; Compiling (DEFUN C1MAKE-GLOBAL-VARIABLE ...). ;;; Compiling (DEFUN C1DECLARE-SPECIALS ...). ;;; Note: ;;; in file CMPVAR.LSP, position 12106 ;;; at (DEFUN C1DECLARE-SPECIALS ...) ;;; Checking type of #:LET97 to be LIST ;;; Note: ;;; in file CMPVAR.LSP, position 12106 ;;; at (DEFUN C1DECLARE-SPECIALS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST95) to be LIST ;;; Compiling (DEFUN REGISTER-GLOBAL ...). ;;; Compiling (DEFUN C1SETQ ...). ;;; Note: ;;; in file CMPVAR.LSP, position 12265 ;;; at (DEFUN C1SETQ ...) ;;; Checking type of #:LOOP-LIST-TAIL100 to be CONS ;;; Compiling (DEFUN C1SETQ1 ...). ;;; Compiling (DEFUN C2SETQ ...). ;;; Compiling (DEFUN C1PROGV ...). ;;; Compiling (DEFUN C2PROGV ...). ;;; Compiling (DEFUN C1PSETQ ...). ;;; Compiling (DEFUN C2PSETQ ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-VAR. ;;; Emitting code for VAR-REFERENCED-IN-FORM-LIST. ;;; Emitting code for VAR-CHANGED-IN-FORM-LIST. ;;; Emitting code for VAR-REFERENCED-IN-FORM. ;;; Emitting code for VAR-CHANGED-IN-FORM. ;;; Emitting code for UPDATE-VARIABLE-TYPE. ;;; Emitting code for VAR-READ-FORMS. ;;; Emitting code for ASSERT-VAR-REF-VALUE. ;;; Emitting code for ASSERT-VAR-NOT-IGNORED. ;;; Emitting code for DELETE-FROM-READ-NODES. ;;; Emitting code for ADD-TO-READ-NODES. ;;; Emitting code for ADD-TO-SET-NODES. ;;; Emitting code for ADD-TO-SET-NODES-OF-VAR-LIST. ;;; Emitting code for CHECK-GLOBAL. ;;; Emitting code for SPECIAL-VARIABLE-P. ;;; Emitting code for LOCAL-VARIABLE-P. ;;; Emitting code for SYMBOL-MACRO-P. ;;; Emitting code for VARIABLE-TYPE-IN-ENV. ;;; Emitting code for CHK-SYMBOL-MACROLET. ;;; Emitting code for C1MAKE-VAR. ;;; Emitting code for CHECK-VREF. ;;; Emitting code for C1VAR. ;;; Emitting code for MAKE-LCL-VAR. ;;; Emitting code for MAKE-TEMP-VAR. ;;; Emitting code for C1VREF. ;;; Emitting code for PUSH-VARS. ;;; Emitting code for UNBOXED. ;;; Emitting code for LOCAL. ;;; Emitting code for GLOBAL-VAR-P. ;;; Emitting code for USEFUL-VAR-P. ;;; Emitting code for C2VAR/LOCATION. ;;; Emitting code for WT-VAR. ;;; Emitting code for VAR-REP-TYPE. ;;; Emitting code for SET-VAR. ;;; Emitting code for WT-LEX. ;;; Emitting code for WT-ENV. ;;; Emitting code for C1MAKE-GLOBAL-VARIABLE. ;;; Emitting code for C1DECLARE-SPECIALS. ;;; Emitting code for REGISTER-GLOBAL. ;;; Emitting code for C1SETQ. ;;; Emitting code for C1SETQ1. ;;; Emitting code for C2SETQ. ;;; Emitting code for C1PROGV. ;;; Emitting code for C2PROGV. ;;; Emitting code for C1PSETQ. ;;; Emitting code for C2PSETQ. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpvar.c -o cmp/cmpvar.o ;;; Finished compiling SRC:CMP;CMPVAR.LSP. ;;; (compile-file "src:cmp;cmpwt.lsp" :output-file #P"BUILD:CMP;CMPWT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPWT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN DATA-PERMANENT-STORAGE-SIZE ...). ;;; Compiling (DEFUN DATA-TEMPORARY-STORAGE-SIZE ...). ;;; Compiling (DEFUN DATA-SIZE ...). ;;; Compiling (DEFUN DATA-INIT ...). ;;; Compiling (DEFUN DATA-GET-ALL-OBJECTS ...). ;;; Note: ;;; in file CMPWT.LSP, position 1741 ;;; at (DEFUN DATA-GET-ALL-OBJECTS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5) to be LIST ;;; Note: ;;; in file CMPWT.LSP, position 1741 ;;; at (DEFUN DATA-GET-ALL-OBJECTS ...) ;;; Checking type of #:LET20 to be VECTOR ;;; Note: ;;; in file CMPWT.LSP, position 1741 ;;; at (DEFUN DATA-GET-ALL-OBJECTS ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-11) to be FIXNUM ;;; Note: ;;; in file CMPWT.LSP, position 1741 ;;; at (DEFUN DATA-GET-ALL-OBJECTS ...) ;;; Checking type of #:LOOP-LIST-TAIL14 to be CONS ;;; Note: ;;; in file CMPWT.LSP, position 1741 ;;; at (DEFUN DATA-GET-ALL-OBJECTS ...) ;;; Checking type of #:G15 to be CONS ;;; Compiling (DEFUN DATA-DUMP-ARRAY ...). ;;; Compiling (DEFUN DATA-C-DUMP ...). ;;; Note: ;;; in file CMPWT.LSP, position 3290 ;;; at (DEFUN DATA-C-DUMP ...) ;;; Checking type of #:LET28 to be LIST ;;; Note: ;;; in file CMPWT.LSP, position 3290 ;;; at (DEFUN DATA-C-DUMP ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST24) to be LIST ;;; Note: ;;; in file CMPWT.LSP, position 3290 ;;; at (DEFUN DATA-C-DUMP ...) ;;; Checking type of #:LOOP-LIST-TAIL26 to be CONS ;;; Note: ;;; in file CMPWT.LSP, position 3290 ;;; at (DEFUN DATA-C-DUMP ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST24) to be LIST ;;; Compiling (DEFUN DATA-EMPTY-LOC ...). ;;; Compiling (DEFUN ADD-LOAD-FORM ...). ;;; Compiling (DEFUN ADD-OBJECT ...). ;;; Compiling (DEFUN ADD-SYMBOL ...). ;;; Compiling (DEFUN ADD-KEYWORDS ...). ;;; Compiling (DEFUN STATIC-BASE-STRING-BUILDER ...). ;;; Compiling (DEFUN STATIC-SINGLE-FLOAT-BUILDER ...). ;;; Compiling (DEFUN STATIC-DOUBLE-FLOAT-BUILDER ...). ;;; Compiling (DEFUN STATIC-LONG-FLOAT-BUILDER ...). ;;; Compiling (DEFUN STATIC-RATIONAL-BUILDER ...). ;;; Compiling (DEFUN STATIC-CONSTANT-DELEGATE ...). ;;; Compiling (DEFUN STATIC-COMPLEX-BUILDER ...). ;;; Compiling (DEFUN STATIC-CONSTANT-BUILDER ...). ;;; Compiling (DEFUN STATIC-CONSTANT-EXPRESSION ...). ;;; Compiling (DEFUN ADD-STATIC-CONSTANT ...). ;;; Compiling (DEFUN WT-VV-INDEX ...). ;;; Compiling (DEFUN SET-VV-INDEX ...). ;;; Compiling (DEFUN WT-VV ...). ;;; Compiling (DEFUN SET-VV ...). ;;; Compiling (DEFUN VV-TYPE ...). ;;; End of Pass 1. ;;; Emitting code for DATA-PERMANENT-STORAGE-SIZE. ;;; Emitting code for DATA-TEMPORARY-STORAGE-SIZE. ;;; Emitting code for DATA-SIZE. ;;; Emitting code for DATA-INIT. ;;; Emitting code for DATA-GET-ALL-OBJECTS. ;;; Emitting code for DATA-DUMP-ARRAY. ;;; Emitting code for DATA-C-DUMP. ;;; Emitting code for OUTPUT-C-STRINGS. ;;; Emitting code for OUTPUT-ONE-C-STRING. ;;; Emitting code for PRODUCE-STRINGS. ;;; Emitting code for DATA-EMPTY-LOC. ;;; Emitting code for ADD-LOAD-FORM. ;;; Emitting code for ADD-OBJECT. ;;; Emitting code for ADD-SYMBOL. ;;; Emitting code for ADD-KEYWORDS. ;;; Emitting code for #:G66. ;;; Emitting code for STATIC-BASE-STRING-BUILDER. ;;; Emitting code for STATIC-SINGLE-FLOAT-BUILDER. ;;; Emitting code for STATIC-DOUBLE-FLOAT-BUILDER. ;;; Emitting code for STATIC-LONG-FLOAT-BUILDER. ;;; Emitting code for STATIC-RATIONAL-BUILDER. ;;; Emitting code for STATIC-CONSTANT-DELEGATE. ;;; Emitting code for STATIC-COMPLEX-BUILDER. ;;; Emitting code for STATIC-CONSTANT-BUILDER. ;;; Emitting code for #:G73. ;;; Emitting code for STATIC-CONSTANT-EXPRESSION. ;;; Emitting code for ADD-STATIC-CONSTANT. ;;; Emitting code for WT-VV-INDEX. ;;; Emitting code for SET-VV-INDEX. ;;; Emitting code for WT-VV. ;;; Emitting code for SET-VV. ;;; Emitting code for VV-TYPE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpwt.c -o cmp/cmpwt.o ;;; Finished compiling SRC:CMP;CMPWT.LSP. ;;; (compile-file "src:cmp;cmpffi.lsp" :output-file #P"BUILD:CMP;CMPFFI.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPFFI.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN REP-TYPE-RECORD-UNSAFE ...). ;;; Compiling (DEFUN REP-TYPE-RECORD ...). ;;; Compiling (DEFUN REP-TYPE->LISP-TYPE ...). ;;; Compiling (DEFUN LISP-TYPE->REP-TYPE ...). ;;; Compiling (DEFUN C-NUMBER-REP-TYPE-P ...). ;;; Compiling (DEFUN C-INTEGER-REP-TYPE-P ...). ;;; Compiling (DEFUN C-INTEGER-REP-TYPE-BITS ...). ;;; Compiling (DEFUN C-NUMBER-TYPE-P ...). ;;; Compiling (DEFUN C-INTEGER-TYPE-P ...). ;;; Compiling (DEFUN C-INTEGER-TYPE-BITS ...). ;;; Compiling (DEFUN REP-TYPE->C-NAME ...). ;;; Compiling (DEFUN LISP-TYPE-P ...). ;;; Compiling (DEFUN WT-TO-OBJECT-CONVERSION ...). ;;; Compiling (DEFUN WT-FROM-OBJECT-CONVERSION ...). ;;; Compiling (DEFUN LOC-MOVABLE-P ...). ;;; Compiling (DEFUN LOC-TYPE ...). ;;; Compiling (DEFUN LOC-REPRESENTATION-TYPE ...). ;;; Compiling (DEFUN WT-COERCE-LOC ...). ;;; Compiling (DEFUN C1CLINES ...). ;;; Compiling (DEFUN OUTPUT-CLINES ...). ;;; Note: ;;; in file CMPFFI.LSP, position 10973 ;;; at (DEFUN OUTPUT-CLINES ...) ;;; Checking type of #:LET50 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 10973 ;;; at (DEFUN OUTPUT-CLINES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST ;;; Compiling (DEFUN C1C-INLINE ...). ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LET83 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST79) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LOOP-LIST-TAIL81 to be CONS ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LET92 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST88) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LOOP-LIST-TAIL90 to be CONS ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LET99 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST95) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LOOP-LIST-TAIL97 to be CONS ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LET108 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST104) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LOOP-LIST-TAIL106 to be CONS ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of #:LET111 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 12039 ;;; at (DEFUN C1C-INLINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST109) to be LIST ;;; Compiling (DEFUN C1C-PROGN ...). ;;; Note: ;;; in file CMPFFI.LSP, position 15226 ;;; at (DEFUN C1C-PROGN ...) ;;; Checking type of #:LET118 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 15226 ;;; at (DEFUN C1C-PROGN ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST114) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 15226 ;;; at (DEFUN C1C-PROGN ...) ;;; Checking type of #:LOOP-LIST-TAIL116 to be CONS ;;; Note: ;;; in file CMPFFI.LSP, position 15226 ;;; at (DEFUN C1C-PROGN ...) ;;; Checking type of #:LET125 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 15226 ;;; at (DEFUN C1C-PROGN ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST121) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 15226 ;;; at (DEFUN C1C-PROGN ...) ;;; Checking type of #:LOOP-LIST-TAIL123 to be CONS ;;; Compiling (DEFUN C2C-PROGN ...). ;;; Note: ;;; in file CMPFFI.LSP, position 15722 ;;; at (DEFUN C2C-PROGN ...) ;;; Checking type of #:LET128 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 15722 ;;; at (DEFUN C2C-PROGN ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST126) to be LIST ;;; Style warning: ;;; in file CMPFFI.LSP, position 15722 ;;; at (DEFUN C2C-PROGN ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN PRODUCE-INLINE-LOC ...). ;;; Note: ;;; in file CMPFFI.LSP, position 16147 ;;; at (DEFUN PRODUCE-INLINE-LOC ...) ;;; Checking type of #:LET141 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 16147 ;;; at (DEFUN PRODUCE-INLINE-LOC ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST137) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 16147 ;;; at (DEFUN PRODUCE-INLINE-LOC ...) ;;; Checking type of #:LOOP-LIST-TAIL139 to be CONS ;;; Note: ;;; in file CMPFFI.LSP, position 16147 ;;; at (DEFUN PRODUCE-INLINE-LOC ...) ;;; Checking type of #:LET144 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 16147 ;;; at (DEFUN PRODUCE-INLINE-LOC ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST142) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 16147 ;;; at (DEFUN PRODUCE-INLINE-LOC ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST142) to be LIST ;;; Compiling (DEFUN C2C-INLINE ...). ;;; Compiling (DEFUN COERCE-LOCS ...). ;;; Note: ;;; in file CMPFFI.LSP, position 19226 ;;; at (DEFUN COERCE-LOCS ...) ;;; Checking type of #:LET153 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 19226 ;;; at (DEFUN COERCE-LOCS ...) ;;; Checking type of #:LET155 to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 19226 ;;; at (DEFUN COERCE-LOCS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST147) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 19226 ;;; at (DEFUN COERCE-LOCS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST148) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 19226 ;;; at (DEFUN COERCE-LOCS ...) ;;; Checking type of #:LOOP-LIST-TAIL150 to be CONS ;;; Note: ;;; in file CMPFFI.LSP, position 19226 ;;; at (DEFUN COERCE-LOCS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST147) to be LIST ;;; Note: ;;; in file CMPFFI.LSP, position 19226 ;;; at (DEFUN COERCE-LOCS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST148) to be LIST ;;; Compiling (DEFUN WT-C-INLINE-LOC ...). ;;; Style warning: ;;; in file CMPFFI.LSP, position 20575 ;;; at (DEFUN WT-C-INLINE-LOC ...) ;;; ! The variable SIDE-EFFECTS is not used. ;;; Style warning: ;;; in file CMPFFI.LSP, position 20575 ;;; at (DEFUN WT-C-INLINE-LOC ...) ;;; ! The variable OUTPUT-REP-TYPE is not used. ;;; Compiling (DEFUN C-INLINE-SAFE-STRING ...). ;;; Note: ;;; in file CMPFFI.LSP, position 22289 ;;; at (DEFUN C-INLINE-SAFE-STRING ...) ;;; Checking type of #:LET168 to be VECTOR ;;; Note: ;;; in file CMPFFI.LSP, position 22289 ;;; at (DEFUN C-INLINE-SAFE-STRING ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-163) to be FIXNUM ;;; Note: ;;; in file CMPFFI.LSP, position 22289 ;;; at (DEFUN C-INLINE-SAFE-STRING ...) ;;; Checking type of #:LOOP-LIST-TAIL166 to be CONS ;;; Note: ;;; in file CMPFFI.LSP, position 22289 ;;; at (DEFUN C-INLINE-SAFE-STRING ...) ;;; Checking type of #:LOOP-LIST-TAIL166 to be CONS ;;; End of Pass 1. ;;; Emitting code for REP-TYPE-RECORD-UNSAFE. ;;; Emitting code for REP-TYPE-RECORD. ;;; Emitting code for REP-TYPE->LISP-TYPE. ;;; Emitting code for LISP-TYPE->REP-TYPE. ;;; Emitting code for C-NUMBER-REP-TYPE-P. ;;; Emitting code for C-INTEGER-REP-TYPE-P. ;;; Emitting code for C-INTEGER-REP-TYPE-BITS. ;;; Emitting code for C-NUMBER-TYPE-P. ;;; Emitting code for C-INTEGER-TYPE-P. ;;; Emitting code for C-INTEGER-TYPE-BITS. ;;; Emitting code for REP-TYPE->C-NAME. ;;; Emitting code for LISP-TYPE-P. ;;; Emitting code for WT-TO-OBJECT-CONVERSION. ;;; Emitting code for WT-FROM-OBJECT-CONVERSION. ;;; Emitting code for LOC-MOVABLE-P. ;;; Emitting code for LOC-TYPE. ;;; Emitting code for LOC-REPRESENTATION-TYPE. ;;; Emitting code for WT-COERCE-LOC. ;;; Emitting code for ENSURE-VALID-OBJECT-TYPE. ;;; Emitting code for COERCION-ERROR. ;;; Emitting code for C1CLINES. ;;; Emitting code for OUTPUT-CLINES. ;;; Emitting code for PARSE-ONE-STRING. ;;; Emitting code for #:G47. ;;; Emitting code for C1C-INLINE. ;;; Emitting code for PRODUCE-TYPE-PAIR. ;;; Emitting code for C1C-PROGN. ;;; Emitting code for C2C-PROGN. ;;; Emitting code for PRODUCE-INLINE-LOC. ;;; Emitting code for MAKE-OUTPUT-VAR. ;;; Emitting code for C2C-INLINE. ;;; Emitting code for COERCE-LOCS. ;;; Emitting code for WT-C-INLINE-LOC. ;;; Emitting code for C-INLINE-SAFE-STRING. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpffi.c -o cmp/cmpffi.o ;;; Finished compiling SRC:CMP;CMPFFI.LSP. ;;; (compile-file "src:cmp;cmpcbk.lsp" :output-file #P"BUILD:CMP;CMPCBK.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPCBK.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN C1-DEFCALLBACK ...). ;;; Compiling (DEFUN FOREIGN-ELT-TYPE-CODE ...). ;;; Compiling (DEFUN T3-DEFCALLBACK ...). ;;; Note: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; Checking type of #:LET29 to be LIST ;;; Note: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST ;;; Note: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; Checking type of (PROG1 (SI::LOOP-UNSAFE (1+ N)) (SI::LOOP-REALLY-DESETQ TYPE (SI:CONS-CAR #:LOOP-LIST26))) to be REAL ;;; Note: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; Checking type of #:LET37 to be LIST ;;; Note: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; Checking type of #:LET39 to be LIST ;;; Note: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST33) to be LIST ;;; Note: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST34) to be LIST ;;; Note: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; Checking type of (PROG1 (SI::LOOP-UNSAFE (1+ N)) (SI::LOOP-REALLY-DESETQ TYPE (PROG1 (SI:CONS-CAR #:LOOP-LIST33) (SI::LOOP-REALLY-DESETQ CT (SI:CONS-CAR #:LOOP-LIST34))))) to be REAL ;;; Style warning: ;;; in file CMPCBK.LSP, position 3141 ;;; at (DEFUN T3-DEFCALLBACK ...) ;;; ! The variable LISP-NAME is not used. ;;; End of Pass 1. ;;; Emitting code for C1-DEFCALLBACK. ;;; Emitting code for FOREIGN-ELT-TYPE-CODE. ;;; Emitting code for T3-DEFCALLBACK. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpcbk.c -o cmp/cmpcbk.o ;;; Finished compiling SRC:CMP;CMPCBK.LSP. ;;; (compile-file "src:cmp;cmpct.lsp" :output-file #P"BUILD:CMP;CMPCT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPCT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER +OPTIMIZABLE-CONSTANTS+ ...). ;;; Compiling (DEFUN C1CONSTANT-VALUE ...). ;;; Compiling (DEFUN MAKE-SINGLE-CONSTANT-OPTIMIZER ...). ;;; Compiling (DEFUN MAKE-OPTIMIZABLE-CONSTANTS ...). ;;; Note: ;;; in file CMPCT.LSP, position 4020 ;;; at (DEFUN MAKE-OPTIMIZABLE-CONSTANTS ...) ;;; Checking type of #:LET9 to be LIST ;;; Note: ;;; in file CMPCT.LSP, position 4020 ;;; at (DEFUN MAKE-OPTIMIZABLE-CONSTANTS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4) to be LIST ;;; Note: ;;; in file CMPCT.LSP, position 4020 ;;; at (DEFUN MAKE-OPTIMIZABLE-CONSTANTS ...) ;;; Checking type of #:LOOP-LIST-TAIL6 to be CONS ;;; Compiling (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...). ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((0.0 "cl_core.singlefloat_zero") (0.0d0 "cl_core.doublefloat_zero") (-0.0 "cl_core.singlefloat_minus_zero") (-0.0d0 "cl_core.doublefloat_minus_zero") (0.0l0 "cl_core.longfloat_zero") (-0.0l0 "cl_core.longfloat_minus_zero") (#<"CL" package> "cl_core.lisp_package") (#<"COMMON-LISP-USER" package> "cl_core.user_package") (#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((0.0d0 "cl_core.doublefloat_zero") (-0.0 "cl_core.singlefloat_minus_zero") (-0.0d0 "cl_core.doublefloat_minus_zero") (0.0l0 "cl_core.longfloat_zero") (-0.0l0 "cl_core.longfloat_minus_zero") (#<"CL" package> "cl_core.lisp_package") (#<"COMMON-LISP-USER" package> "cl_core.user_package") (#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((-0.0 "cl_core.singlefloat_minus_zero") (-0.0d0 "cl_core.doublefloat_minus_zero") (0.0l0 "cl_core.longfloat_zero") (-0.0l0 "cl_core.longfloat_minus_zero") (#<"CL" package> "cl_core.lisp_package") (#<"COMMON-LISP-USER" package> "cl_core.user_package") (#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((-0.0d0 "cl_core.doublefloat_minus_zero") (0.0l0 "cl_core.longfloat_zero") (-0.0l0 "cl_core.longfloat_minus_zero") (#<"CL" package> "cl_core.lisp_package") (#<"COMMON-LISP-USER" package> "cl_core.user_package") (#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((0.0l0 "cl_core.longfloat_zero") (-0.0l0 "cl_core.longfloat_minus_zero") (#<"CL" package> "cl_core.lisp_package") (#<"COMMON-LISP-USER" package> "cl_core.user_package") (#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((-0.0l0 "cl_core.longfloat_minus_zero") (#<"CL" package> "cl_core.lisp_package") (#<"COMMON-LISP-USER" package> "cl_core.user_package") (#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '(#<"CL" package> "cl_core.lisp_package") to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((#<"CL" package> "cl_core.lisp_package") (#<"COMMON-LISP-USER" package> "cl_core.user_package") (#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '(#<"COMMON-LISP-USER" package> "cl_core.user_package") to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((#<"COMMON-LISP-USER" package> "cl_core.user_package") (#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '(#<"KEYWORD" package> "cl_core.keyword_package") to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((#<"KEYWORD" package> "cl_core.keyword_package") (#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '(#<"CLOS" package> "cl_core.clos_package") to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '((#<"CLOS" package> "cl_core.clos_package") (#<"MP" package> "cl_core.mp_package")) to be CONS ;;; Note: ;;; in file CMPCT.LSP, position 4189 ;;; at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...) ;;; Checking type of '(#<"MP" package> "cl_core.mp_package") to be CONS ;;; End of Pass 1. ;;; Emitting code for C1CONSTANT-VALUE. ;;; Emitting code for MAKE-SINGLE-CONSTANT-OPTIMIZER. ;;; Emitting code for MAKE-OPTIMIZABLE-CONSTANTS. ;;; Emitting code for OPTIMIZABLE-CONSTANTS-LIST. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpct.c -o cmp/cmpct.o ;;; Finished compiling SRC:CMP;CMPCT.LSP. ;;; (compile-file "src:cmp;cmpnum.lsp" :output-file #P"BUILD:CMP;CMPNUM.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPNUM.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN SIMPLIFY-ARITHMETIC ...). ;;; Compiling (DEFUN MAXIMUM-NUMBER-TYPE ...). ;;; Compiling (DEFUN ENSURE-NUMBER-TYPE ...). ;;; Compiling (DEFUN ENSURE-NONRATIONAL-TYPE ...). ;;; Compiling (DEFUN ENSURE-REAL-TYPE ...). ;;; Compiling (DEFUN ARITHMETIC-PROPAGATOR ...). ;;; Note: ;;; in file CMPNUM.LSP, position 3744 ;;; at (DEFUN ARITHMETIC-PROPAGATOR ...) ;;; Checking type of #:LET29 to be LIST ;;; Note: ;;; in file CMPNUM.LSP, position 3744 ;;; at (DEFUN ARITHMETIC-PROPAGATOR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST27) to be LIST ;;; Compiling (DEFUN MOST-GENERIC-NUMBER-REP-TYPE ...). ;;; Compiling (DEFUN INLINE-BINOP ...). ;;; Compiling (DEFUN INLINE-ARITH-UNOP ...). ;;; Style warning: ;;; in file CMPNUM.LSP, position 9062 ;;; at (DEF-TYPE-PROPAGATOR ACOS ...) ;;; ! The variable OUTPUT-TYPE is not used. ;;; Style warning: ;;; in file CMPNUM.LSP, position 9232 ;;; at (DEF-TYPE-PROPAGATOR ATAN ...) ;;; ! The variable FLOAT-T1 is not used. ;;; End of Pass 1. ;;; Emitting code for SIMPLIFY-ARITHMETIC. ;;; Emitting code for *. ;;; Emitting code for +. ;;; Emitting code for /. ;;; Emitting code for -. ;;; Emitting code for MAXIMUM-NUMBER-TYPE. ;;; Emitting code for ENSURE-NUMBER-TYPE. ;;; Emitting code for ENSURE-NONRATIONAL-TYPE. ;;; Emitting code for ENSURE-REAL-TYPE. ;;; Emitting code for ARITHMETIC-PROPAGATOR. ;;; Emitting code for #:G34. ;;; Emitting code for #:G38. ;;; Emitting code for MOST-GENERIC-NUMBER-REP-TYPE. ;;; Emitting code for INLINE-BINOP. ;;; Emitting code for INLINE-ARITH-UNOP. ;;; Emitting code for #:G44. ;;; Emitting code for #:G54. ;;; Emitting code for #:G61. ;;; Emitting code for #:G71. ;;; Emitting code for #:G79. ;;; Emitting code for #:G84. ;;; Emitting code for #:G89. ;;; Emitting code for #:G94. ;;; Emitting code for #:G99. ;;; Emitting code for #:G104. ;;; Emitting code for #:G109. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpnum.c -o cmp/cmpnum.o ;;; Finished compiling SRC:CMP;CMPNUM.LSP. ;;; (compile-file "src:cmp;cmpname.lsp" :output-file #P"BUILD:CMP;CMPNAME.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPNAME.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN ENCODE-NUMBER-IN-NAME ...). ;;; Compiling (DEFUN UNIQUE-INIT-NAME ...). ;;; Compiling (DEFUN KIND->TAG ...). ;;; Compiling (DEFUN INIT-NAME-TAG ...). ;;; Compiling (DEFUN SEARCH-TAG ...). ;;; Compiling (DEFUN READ-NAME ...). ;;; Note: ;;; in file CMPNAME.LSP, position 3321 ;;; at (DEFUN READ-NAME ...) ;;; Checking type of #:LOOP-LIST-TAIL15 to be CONS ;;; Compiling (DEFUN FIND-INIT-NAME ...). ;;; Compiling (DEFUN GUESS-INIT-NAME ...). ;;; Compiling (DEFUN REMOVE-PREFIX ...). ;;; Compiling (DEFUN COMPUTE-INIT-NAME ...). ;;; Compiling (DEFUN INIT-FUNCTION-NAME ...). ;;; Style warning: ;;; in file CMPNAME.LSP, position 6506 ;;; at (DEFUN INIT-FUNCTION-NAME ...) ;;; ! The variable C is not used. ;;; End of Pass 1. ;;; Emitting code for ENCODE-NUMBER-IN-NAME. ;;; Emitting code for UNIQUE-INIT-NAME. ;;; Emitting code for KIND->TAG. ;;; Emitting code for INIT-NAME-TAG. ;;; Emitting code for SEARCH-TAG. ;;; Emitting code for READ-NAME. ;;; Emitting code for FIND-INIT-NAME. ;;; Emitting code for GUESS-INIT-NAME. ;;; Emitting code for REMOVE-PREFIX. ;;; Emitting code for COMPUTE-INIT-NAME. ;;; Emitting code for INIT-FUNCTION-NAME. ;;; Emitting code for DISAMBIGUATION. ;;; Emitting code for TRANSLATE-CHAR. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpname.c -o cmp/cmpname.o ;;; Finished compiling SRC:CMP;CMPNAME.LSP. ;;; (compile-file "src:cmp;cmpopt.lsp" :output-file #P"BUILD:CMP;CMPOPT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOPT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN EXPAND-IN-INTERVAL-P ...). ;;; Compiling (DEFUN EXPAND-TYPEP ...). ;;; Note: ;;; in file CMPOPT.LSP, position 1358 ;;; at (DEFUN EXPAND-TYPEP ...) ;;; Checking type of #:LET13 to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 1358 ;;; at (DEFUN EXPAND-TYPEP ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST10) to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 1358 ;;; at (DEFUN EXPAND-TYPEP ...) ;;; Checking type of #:LET22 to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 1358 ;;; at (DEFUN EXPAND-TYPEP ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST18) to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 1358 ;;; at (DEFUN EXPAND-TYPEP ...) ;;; Checking type of #:LOOP-LIST-TAIL20 to be CONS ;;; Style warning: ;;; in file CMPOPT.LSP, position 6266 ;;; at (DEFINE-COMPILER-MACRO TYPEP ...) ;;; ! The variable E is not used. ;;; Compiling (DEFPARAMETER +COERCION-TABLE+ ...). ;;; Compiling (DEFUN EXPAND-COERCE ...). ;;; Note: ;;; in file CMPOPT.LSP, position 7910 ;;; at (DEFUN EXPAND-COERCE ...) ;;; Checking type of #:LET47 to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 7910 ;;; at (DEFUN EXPAND-COERCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 7910 ;;; at (DEFUN EXPAND-COERCE ...) ;;; Checking type of #:LET51 to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 7910 ;;; at (DEFUN EXPAND-COERCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 7910 ;;; at (DEFUN EXPAND-COERCE ...) ;;; Checking type of #:LET58 to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 7910 ;;; at (DEFUN EXPAND-COERCE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST54) to be LIST ;;; Note: ;;; in file CMPOPT.LSP, position 7910 ;;; at (DEFUN EXPAND-COERCE ...) ;;; Checking type of #:LOOP-LIST-TAIL56 to be CONS ;;; Style warning: ;;; in file CMPOPT.LSP, position 12325 ;;; at (DEFINE-COMPILER-MACRO FLOAT ...) ;;; ! The variable AUX is not used. ;;; End of Pass 1. ;;; Emitting code for EXPAND-IN-INTERVAL-P. ;;; Emitting code for EXPAND-TYPEP. ;;; Emitting code for TYPEP. ;;; Emitting code for DOLIST. ;;; Emitting code for EXPAND-COERCE. ;;; Emitting code for COERCE. ;;; Emitting code for FLOAT. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpopt.c -o cmp/cmpopt.o ;;; Finished compiling SRC:CMP;CMPOPT.LSP. ;;; (compile-file "src:cmp;cmpopt-bits.lsp" :output-file #P"BUILD:CMP;CMPOPT-BITS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOPT-BITS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN INLINE-BYTESPEC ...). ;;; Note: ;;; in file CMPOPT-BITS.LSP, position 6791 ;;; at (DEF-TYPE-PROPAGATOR LOGAND ...) ;;; Checking type of #:LET45 to be LIST ;;; Note: ;;; in file CMPOPT-BITS.LSP, position 6791 ;;; at (DEF-TYPE-PROPAGATOR LOGAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST43) to be LIST ;;; End of Pass 1. ;;; Emitting code for INLINE-BYTESPEC. ;;; Emitting code for LDB. ;;; Emitting code for LDB-TEST. ;;; Emitting code for MASK-FIELD. ;;; Emitting code for DPB. ;;; Emitting code for DEPOSIT-FIELD. ;;; Emitting code for LDB. ;;; Emitting code for MASK-FIELD. ;;; Emitting code for ASH. ;;; Emitting code for #:G35. ;;; Emitting code for #:G39. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpopt-bits.c -o cmp/cmpopt-bits.o ;;; Finished compiling SRC:CMP;CMPOPT-BITS.LSP. ;;; (compile-file "src:cmp;cmpopt-clos.lsp" :output-file #P"BUILD:CMP;CMPOPT-CLOS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOPT-CLOS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN CLOS-COMPILER-MACRO-EXPAND ...). ;;; Compiling (DEFMETHOD GENERIC-FUNCTION-MACRO-EXPAND ...). ;;; Compiling (DEFUN OPTIMIZABLE-SLOT-READER ...). ;;; Compiling (DEFUN OPTIMIZABLE-SLOT-WRITER ...). ;;; Compiling (DEFUN OPTIMIZABLE-SLOT-ACCESSOR ...). ;;; End of Pass 1. ;;; Emitting code for CLOS-COMPILER-MACRO-EXPAND. ;;; Emitting code for #:G0. ;;; Emitting code for OPTIMIZABLE-SLOT-READER. ;;; Emitting code for OPTIMIZABLE-SLOT-WRITER. ;;; Emitting code for OPTIMIZABLE-SLOT-ACCESSOR. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpopt-clos.c -o cmp/cmpopt-clos.o ;;; Finished compiling SRC:CMP;CMPOPT-CLOS.LSP. ;;; (compile-file "src:cmp;cmpopt-constant.lsp" :output-file #P"BUILD:CMP;CMPOPT-CONSTANT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOPT-CONSTANT.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN CONSTANT-EXPRESSION-P ...). ;;; Note: ;;; in file CMPOPT-CONSTANT.LSP, position 618 ;;; at (DEFUN CONSTANT-EXPRESSION-P ...) ;;; Checking type of #:LET2 to be LIST ;;; Note: ;;; in file CMPOPT-CONSTANT.LSP, position 618 ;;; at (DEFUN CONSTANT-EXPRESSION-P ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Compiling (DEFUN EXTRACT-CONSTANT-VALUE ...). ;;; Compiling (DEFUN CONSTANT-VALUE-P ...). ;;; End of Pass 1. ;;; Emitting code for CONSTANT-EXPRESSION-P. ;;; Emitting code for EXTRACT-CONSTANT-VALUE. ;;; Emitting code for #:G6. ;;; Emitting code for CONSTANT-VALUE-P. ;;; Emitting code for #:G10. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpopt-constant.c -o cmp/cmpopt-constant.o ;;; Finished compiling SRC:CMP;CMPOPT-CONSTANT.LSP. ;;; (compile-file "src:cmp;cmpopt-cons.lsp" :output-file #P"BUILD:CMP;CMPOPT-CONS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOPT-CONS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN EXPAND-SIMPLE-OPTIMIZER ...). ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 617 ;;; at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...) ;;; Checking type of #:LET5 to be LIST ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 617 ;;; at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...) ;;; Checking type of #:LET7 to be LIST ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 617 ;;; at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 617 ;;; at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1) to be LIST ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 617 ;;; at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...) ;;; Checking type of #:LOOP-LIST-TAIL3 to be CONS ;;; Compiling (DEFUN SIMPLE-OPTIMIZER-FUNCTION ...). ;;; Compiling (DEFMACRO CONS-CAR ...). ;;; Compiling (DEFMACRO CONS-CDR ...). ;;; Compiling (DEFMACRO DEFINE-SIMPLE-OPTIMIZER ...). ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 4026 ;;; at (DEFINE-COMPILER-MACRO POP ...) ;;; Checking type of #:LET101 to be LIST ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 4026 ;;; at (DEFINE-COMPILER-MACRO POP ...) ;;; Checking type of #:LET103 to be LIST ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 4026 ;;; at (DEFINE-COMPILER-MACRO POP ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST96) to be LIST ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 4026 ;;; at (DEFINE-COMPILER-MACRO POP ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST97) to be LIST ;;; Note: ;;; in file CMPOPT-CONS.LSP, position 4026 ;;; at (DEFINE-COMPILER-MACRO POP ...) ;;; Checking type of #:LOOP-LIST-TAIL99 to be CONS ;;; End of Pass 1. ;;; Emitting code for EXPAND-SIMPLE-OPTIMIZER. ;;; Emitting code for SIMPLE-OPTIMIZER-FUNCTION. ;;; Emitting code for #:G8. ;;; Emitting code for #:G9. ;;; Emitting code for CONS-CAR. ;;; Emitting code for CONS-CDR. ;;; Emitting code for CONS. ;;; Emitting code for CONS-TO-LISTA. ;;; Emitting code for DEFINE-SIMPLE-OPTIMIZER. ;;; Emitting code for NTH. ;;; Emitting code for NTHCDR. ;;; Emitting code for FIRST. ;;; Emitting code for SECOND. ;;; Emitting code for THIRD. ;;; Emitting code for FOURTH. ;;; Emitting code for FIFTH. ;;; Emitting code for SIXTH. ;;; Emitting code for SEVENTH. ;;; Emitting code for EIGHTH. ;;; Emitting code for NINTH. ;;; Emitting code for TENTH. ;;; Emitting code for REST. ;;; Emitting code for POP. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpopt-cons.c -o cmp/cmpopt-cons.o ;;; Finished compiling SRC:CMP;CMPOPT-CONS.LSP. ;;; (compile-file "src:cmp;cmpopt-printer.lsp" :output-file #P"BUILD:CMP;CMPOPT-PRINTER.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOPT-PRINTER.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN PRINTER-DEFAULT-STREAM ...). ;;; Style warning: ;;; in file CMPOPT-PRINTER.LSP, position 2838 ;;; at (DEFINE-COMPILER-MACRO TERPRI ...) ;;; ! The variable ENV is not used. ;;; Style warning: ;;; in file CMPOPT-PRINTER.LSP, position 3033 ;;; at (DEFINE-COMPILER-MACRO PRINT ...) ;;; ! The variable ENV is not used. ;;; Style warning: ;;; in file CMPOPT-PRINTER.LSP, position 3250 ;;; at (DEFINE-COMPILER-MACRO PRIN1 ...) ;;; ! The variable ENV is not used. ;;; End of Pass 1. ;;; Emitting code for PRINTER-DEFAULT-STREAM. ;;; Emitting code for PRINC. ;;; Emitting code for TERPRI. ;;; Emitting code for PRINT. ;;; Emitting code for PRIN1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpopt-printer.c -o cmp/cmpopt-printer.o ;;; Finished compiling SRC:CMP;CMPOPT-PRINTER.LSP. ;;; (compile-file "src:cmp;cmpopt-sequence.lsp" :output-file #P"BUILD:CMP;CMPOPT-SEQUENCE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOPT-SEQUENCE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN CONSTANT-FUNCTION-EXPRESSION ...). ;;; Compiling (DEFUN SEQ-OPT-TEST-FUNCTION ...). ;;; Compiling (DEFUN SEQ-OPT-KEY-FUNCTION ...). ;;; Compiling (DEFUN SEQ-OPT-PARSE-ARGS ...). ;;; Compiling (DEFMACRO DO-IN-SEQ ...). ;;; Compiling (DEFMACRO DO-IN-LIST ...). ;;; Compiling (DEFUN EXPAND-MEMBER ...). ;;; Note: ;;; in file CMPOPT-SEQUENCE.LSP, position 6576 ;;; at (DEFUN EXPAND-MEMBER ...) ;;; Checking type of #:LOOP-LIST-TAIL60 to be CONS ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 8637 ;;; at (DEFINE-COMPILER-MACRO MEMBER ...) ;;; ! The variable VALUE is not used. ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 8637 ;;; at (DEFINE-COMPILER-MACRO MEMBER ...) ;;; ! The variable LIST is not used. ;;; Compiling (DEFUN EXPAND-ASSOC ...). ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 10561 ;;; at (DEFINE-COMPILER-MACRO ASSOC ...) ;;; ! The variable VALUE is not used. ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 10561 ;;; at (DEFINE-COMPILER-MACRO ASSOC ...) ;;; ! The variable LIST is not used. ;;; Compiling (DEFUN EXPAND-FIND ...). ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 10774 ;;; at (DEFUN EXPAND-FIND ...) ;;; ! The variable KEY-FLAG is not used. ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 10774 ;;; at (DEFUN EXPAND-FIND ...) ;;; ! The variable TEST-FLAG is not used. ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 10774 ;;; at (DEFUN EXPAND-FIND ...) ;;; ! The variable TEST is not used. ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 11323 ;;; at (DEFINE-COMPILER-MACRO FIND ...) ;;; ! The variable VALUE is not used. ;;; Style warning: ;;; in file CMPOPT-SEQUENCE.LSP, position 11323 ;;; at (DEFINE-COMPILER-MACRO FIND ...) ;;; ! The variable SEQUENCE is not used. ;;; End of Pass 1. ;;; Emitting code for CONSTANT-FUNCTION-EXPRESSION. ;;; Emitting code for SEQ-OPT-TEST-FUNCTION. ;;; Emitting code for #:G1. ;;; Emitting code for #:G2. ;;; Emitting code for #:G3. ;;; Emitting code for SEQ-OPT-KEY-FUNCTION. ;;; Emitting code for #:G4. ;;; Emitting code for #:G5. ;;; Emitting code for SEQ-OPT-PARSE-ARGS. ;;; Emitting code for DO-IN-SEQ. ;;; Emitting code for DO-IN-LIST. ;;; Emitting code for EXPAND-MEMBER. ;;; Emitting code for MEMBER. ;;; Emitting code for EXPAND-ASSOC. ;;; Emitting code for ASSOC. ;;; Emitting code for EXPAND-FIND. ;;; Emitting code for FIND. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpopt-sequence.c -o cmp/cmpopt-sequence.o ;;; Finished compiling SRC:CMP;CMPOPT-SEQUENCE.LSP. ;;; (compile-file "src:cmp;cmpopt-type.lsp" :output-file #P"BUILD:CMP;CMPOPT-TYPE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOPT-TYPE.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; End of Pass 1. ;;; Emitting code for DOTIMES. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpopt-type.c -o cmp/cmpopt-type.o ;;; Finished compiling SRC:CMP;CMPOPT-TYPE.LSP. ;;; (compile-file "src:cmp;cmpprop.lsp" :output-file #P"BUILD:CMP;CMPPROP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPPROP.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN P1PROPAGATE ...). ;;; Compiling (DEFUN P1TRIVIAL ...). ;;; Compiling (DEFUN P1VAR ...). ;;; Compiling (DEFUN P1VALUES ...). ;;; Note: ;;; in file CMPPROP.LSP, position 2797 ;;; at (DEFUN P1VALUES ...) ;;; Checking type of #:LET9 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 2797 ;;; at (DEFUN P1VALUES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5) to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 2797 ;;; at (DEFUN P1VALUES ...) ;;; Checking type of #:LOOP-LIST-TAIL7 to be CONS ;;; Style warning: ;;; in file CMPPROP.LSP, position 2797 ;;; at (DEFUN P1VALUES ...) ;;; ! The variable FORM is not used. ;;; Compiling (DEFUN P1PROPAGATE-LIST ...). ;;; Note: ;;; in file CMPPROP.LSP, position 3153 ;;; at (DEFUN P1PROPAGATE-LIST ...) ;;; Checking type of #:LET13 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 3153 ;;; at (DEFUN P1PROPAGATE-LIST ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST11) to be LIST ;;; Compiling (DEFUN P1MERGE-BRANCHES ...). ;;; Compiling (DEFUN REVISE-VAR-TYPE ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 3843 ;;; at (DEFUN REVISE-VAR-TYPE ...) ;;; ! The variable VARIABLE is not used. ;;; Compiling (DEFUN P1BLOCK ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 4045 ;;; at (DEFUN P1BLOCK ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1RETURN-FROM ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 4350 ;;; at (DEFUN P1RETURN-FROM ...) ;;; ! The variable VARIABLE-OR-NIL is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 4350 ;;; at (DEFUN P1RETURN-FROM ...) ;;; ! The variable RETURN-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 4350 ;;; at (DEFUN P1RETURN-FROM ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1CALL-GLOBAL ...). ;;; Note: ;;; in file CMPPROP.LSP, position 4709 ;;; at (DEFUN P1CALL-GLOBAL ...) ;;; Checking type of #:LET20 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 4709 ;;; at (DEFUN P1CALL-GLOBAL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST18) to be LIST ;;; Style warning: ;;; in file CMPPROP.LSP, position 4709 ;;; at (DEFUN P1CALL-GLOBAL ...) ;;; ! The variable ARG-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 4709 ;;; at (DEFUN P1CALL-GLOBAL ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1CALL-LOCAL ...). ;;; Note: ;;; in file CMPPROP.LSP, position 5263 ;;; at (DEFUN P1CALL-LOCAL ...) ;;; Checking type of #:LET24 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 5263 ;;; at (DEFUN P1CALL-LOCAL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST22) to be LIST ;;; Style warning: ;;; in file CMPPROP.LSP, position 5263 ;;; at (DEFUN P1CALL-LOCAL ...) ;;; ! The variable ARG-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 5263 ;;; at (DEFUN P1CALL-LOCAL ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1CATCH ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 5562 ;;; at (DEFUN P1CATCH ...) ;;; ! The variable TAG-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 5562 ;;; at (DEFUN P1CATCH ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1THROW ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 5752 ;;; at (DEFUN P1THROW ...) ;;; ! The variable TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 5752 ;;; at (DEFUN P1THROW ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1IF ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 5978 ;;; at (DEFUN P1IF ...) ;;; ! The variable FMLA-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 5978 ;;; at (DEFUN P1IF ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1FMLA-NOT ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 6413 ;;; at (DEFUN P1FMLA-NOT ...) ;;; ! The variable TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 6413 ;;; at (DEFUN P1FMLA-NOT ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1FMLA-AND ...). ;;; Note: ;;; in file CMPPROP.LSP, position 6580 ;;; at (DEFUN P1FMLA-AND ...) ;;; Checking type of #:LET30 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 6580 ;;; at (DEFUN P1FMLA-AND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 6580 ;;; at (DEFUN P1FMLA-AND ...) ;;; Checking type of #:LOOP-LIST-TAIL28 to be CONS ;;; Style warning: ;;; in file CMPPROP.LSP, position 6580 ;;; at (DEFUN P1FMLA-AND ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1FMLA-OR ...). ;;; Note: ;;; in file CMPPROP.LSP, position 7136 ;;; at (DEFUN P1FMLA-OR ...) ;;; Checking type of #:LET35 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 7136 ;;; at (DEFUN P1FMLA-OR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST31) to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 7136 ;;; at (DEFUN P1FMLA-OR ...) ;;; Checking type of #:LOOP-LIST-TAIL33 to be CONS ;;; Style warning: ;;; in file CMPPROP.LSP, position 7136 ;;; at (DEFUN P1FMLA-OR ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1LAMBDA ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 7807 ;;; at (DEFUN P1LAMBDA ...) ;;; ! The variable NOT-USED is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 7807 ;;; at (DEFUN P1LAMBDA ...) ;;; ! The variable DOC is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 7807 ;;; at (DEFUN P1LAMBDA ...) ;;; ! The variable LAMBDA-LIST is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 7807 ;;; at (DEFUN P1LAMBDA ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1PROPAGATE-FUNCTION ...). ;;; Compiling (DEFUN P1LET* ...). ;;; Note: ;;; in file CMPPROP.LSP, position 8241 ;;; at (DEFUN P1LET* ...) ;;; Checking type of #:LET42 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 8241 ;;; at (DEFUN P1LET* ...) ;;; Checking type of #:LET44 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 8241 ;;; at (DEFUN P1LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST39) to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 8241 ;;; at (DEFUN P1LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST40) to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 8241 ;;; at (DEFUN P1LET* ...) ;;; Checking type of #:LET49 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 8241 ;;; at (DEFUN P1LET* ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST47) to be LIST ;;; Style warning: ;;; in file CMPPROP.LSP, position 8241 ;;; at (DEFUN P1LET* ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1LOCALS ...). ;;; Note: ;;; in file CMPPROP.LSP, position 9006 ;;; at (DEFUN P1LOCALS ...) ;;; Checking type of #:LET52 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 9006 ;;; at (DEFUN P1LOCALS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST50) to be LIST ;;; Style warning: ;;; in file CMPPROP.LSP, position 9006 ;;; at (DEFUN P1LOCALS ...) ;;; ! The variable LABELS is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 9006 ;;; at (DEFUN P1LOCALS ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1MULTIPLE-VALUE-BIND ...). ;;; Note: ;;; in file CMPPROP.LSP, position 9163 ;;; at (DEFUN P1MULTIPLE-VALUE-BIND ...) ;;; Checking type of #:LET56 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 9163 ;;; at (DEFUN P1MULTIPLE-VALUE-BIND ...) ;;; Checking type of #:LET58 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 9163 ;;; at (DEFUN P1MULTIPLE-VALUE-BIND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST53) to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 9163 ;;; at (DEFUN P1MULTIPLE-VALUE-BIND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST54) to be LIST ;;; Style warning: ;;; in file CMPPROP.LSP, position 9163 ;;; at (DEFUN P1MULTIPLE-VALUE-BIND ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1MULTIPLE-VALUE-SETQ ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 9731 ;;; at (DEFUN P1MULTIPLE-VALUE-SETQ ...) ;;; ! The variable VARS-LIST is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 9731 ;;; at (DEFUN P1MULTIPLE-VALUE-SETQ ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1PROGN ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 9944 ;;; at (DEFUN P1PROGN ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1COMPILER-TYPECASE ...). ;;; Note: ;;; in file CMPPROP.LSP, position 10027 ;;; at (DEFUN P1COMPILER-TYPECASE ...) ;;; Checking type of #:LET64 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 10027 ;;; at (DEFUN P1COMPILER-TYPECASE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST61) to be LIST ;;; Style warning: ;;; in file CMPPROP.LSP, position 10027 ;;; at (DEFUN P1COMPILER-TYPECASE ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1CHECKED-VALUE ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 10460 ;;; at (DEFUN P1CHECKED-VALUE ...) ;;; ! The variable ALT-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 10460 ;;; at (DEFUN P1CHECKED-VALUE ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1PROGV ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 10705 ;;; at (DEFUN P1PROGV ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1SETQ ...). ;;; Compiling (DEFUN P1PSETQ ...). ;;; Note: ;;; in file CMPPROP.LSP, position 11263 ;;; at (DEFUN P1PSETQ ...) ;;; Checking type of #:LET69 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 11263 ;;; at (DEFUN P1PSETQ ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST67) to be LIST ;;; Style warning: ;;; in file CMPPROP.LSP, position 11263 ;;; at (DEFUN P1PSETQ ...) ;;; ! The variable NEW-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 11263 ;;; at (DEFUN P1PSETQ ...) ;;; ! The variable ASSUMPTIONS is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 11263 ;;; at (DEFUN P1PSETQ ...) ;;; ! The variable VARS is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 11263 ;;; at (DEFUN P1PSETQ ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1WITH-STACK ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 11466 ;;; at (DEFUN P1WITH-STACK ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1STACK-PUSH-VALUES ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 11547 ;;; at (DEFUN P1STACK-PUSH-VALUES ...) ;;; ! The variable FORM-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 11547 ;;; at (DEFUN P1STACK-PUSH-VALUES ...) ;;; ! The variable INLINE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 11547 ;;; at (DEFUN P1STACK-PUSH-VALUES ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFVAR *TAGBODY-DEPTH* ...). ;;; Compiling (DEFUN P1GO ...). ;;; Style warning: ;;; in file CMPPROP.LSP, position 11934 ;;; at (DEFUN P1GO ...) ;;; ! The variable RETURN-TYPE is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 11934 ;;; at (DEFUN P1GO ...) ;;; ! The variable TAG-VAR is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 11934 ;;; at (DEFUN P1GO ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN FILTER-ONLY-DECLARATIONS ...). ;;; Compiling (DEFUN P1TAGBODY ...). ;;; Compiling (DEFUN P1TAGBODY-ONE-PASS ...). ;;; Note: ;;; in file CMPPROP.LSP, position 12502 ;;; at (DEFUN P1TAGBODY-ONE-PASS ...) ;;; Checking type of #:LET72 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 12502 ;;; at (DEFUN P1TAGBODY-ONE-PASS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST70) to be LIST ;;; Style warning: ;;; in file CMPPROP.LSP, position 12502 ;;; at (DEFUN P1TAGBODY-ONE-PASS ...) ;;; ! The variable C1FORM is not used. ;;; Compiling (DEFUN P1UNWIND-PROTECT ...). ;;; Compiling (DEFUN TYPE-FROM-ARRAY-ELT ...). ;;; Note: ;;; in file CMPPROP.LSP, position 13514 ;;; at (DEFUN TYPE-FROM-ARRAY-ELT ...) ;;; Checking type of #:LET85 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 13514 ;;; at (DEFUN TYPE-FROM-ARRAY-ELT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST81) to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 13514 ;;; at (DEFUN TYPE-FROM-ARRAY-ELT ...) ;;; Checking type of #:LOOP-LIST-TAIL83 to be CONS ;;; Note: ;;; in file CMPPROP.LSP, position 13514 ;;; at (DEFUN TYPE-FROM-ARRAY-ELT ...) ;;; Checking type of #:LET93 to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 13514 ;;; at (DEFUN TYPE-FROM-ARRAY-ELT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST89) to be LIST ;;; Note: ;;; in file CMPPROP.LSP, position 13514 ;;; at (DEFUN TYPE-FROM-ARRAY-ELT ...) ;;; Checking type of #:LOOP-LIST-TAIL91 to be CONS ;;; Style warning: ;;; in file CMPPROP.LSP, position 15397 ;;; at (DEF-TYPE-PROPAGATOR ROW-MAJOR-ASET ...) ;;; ! The variable OBJ is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 15397 ;;; at (DEF-TYPE-PROPAGATOR ROW-MAJOR-ASET ...) ;;; ! The variable INDEX is not used. ;;; Style warning: ;;; in file CMPPROP.LSP, position 15625 ;;; at (DEF-TYPE-PROPAGATOR ROW-MAJOR-AREF ...) ;;; ! The variable INDEX is not used. ;;; End of Pass 1. ;;; Emitting code for P1PROPAGATE. ;;; Emitting code for P1TRIVIAL. ;;; Emitting code for P1VAR. ;;; Emitting code for P1VALUES. ;;; Emitting code for P1PROPAGATE-LIST. ;;; Emitting code for P1MERGE-BRANCHES. ;;; Emitting code for REVISE-VAR-TYPE. ;;; Emitting code for P1BLOCK. ;;; Emitting code for P1RETURN-FROM. ;;; Emitting code for P1CALL-GLOBAL. ;;; Emitting code for P1CALL-LOCAL. ;;; Emitting code for P1CATCH. ;;; Emitting code for P1THROW. ;;; Emitting code for P1IF. ;;; Emitting code for P1FMLA-NOT. ;;; Emitting code for P1FMLA-AND. ;;; Emitting code for P1FMLA-OR. ;;; Emitting code for P1LAMBDA. ;;; Emitting code for P1PROPAGATE-FUNCTION. ;;; Emitting code for P1LET*. ;;; Emitting code for P1LOCALS. ;;; Emitting code for P1MULTIPLE-VALUE-BIND. ;;; Emitting code for P1MULTIPLE-VALUE-SETQ. ;;; Emitting code for P1PROGN. ;;; Emitting code for P1COMPILER-TYPECASE. ;;; Emitting code for P1CHECKED-VALUE. ;;; Emitting code for P1PROGV. ;;; Emitting code for P1SETQ. ;;; Emitting code for P1PSETQ. ;;; Emitting code for P1WITH-STACK. ;;; Emitting code for P1STACK-PUSH-VALUES. ;;; Emitting code for P1GO. ;;; Emitting code for FILTER-ONLY-DECLARATIONS. ;;; Emitting code for P1TAGBODY. ;;; Emitting code for P1TAGBODY-ONE-PASS. ;;; Emitting code for P1UNWIND-PROTECT. ;;; Emitting code for TYPE-FROM-ARRAY-ELT. ;;; Emitting code for #:G99. ;;; Emitting code for #:G103. ;;; Emitting code for #:G108. ;;; Emitting code for #:G113. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpprop.c -o cmp/cmpprop.o ;;; Finished compiling SRC:CMP;CMPPROP.LSP. ;;; (compile-file "src:cmp;cmpclos.lsp" :output-file #P"BUILD:CMP;CMPCLOS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPCLOS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAYBE-OPTIMIZE-GENERIC-FUNCTION ...). ;;; Compiling (DEFUN PRECOMPUTE-APPLICABLE-METHODS ...). ;;; Note: ;;; in file CMPCLOS.LSP, position 1233 ;;; at (DEFUN PRECOMPUTE-APPLICABLE-METHODS ...) ;;; Checking type of #:LET3 to be LIST ;;; Note: ;;; in file CMPCLOS.LSP, position 1233 ;;; at (DEFUN PRECOMPUTE-APPLICABLE-METHODS ...) ;;; Checking type of #:LET5 to be LIST ;;; Note: ;;; in file CMPCLOS.LSP, position 1233 ;;; at (DEFUN PRECOMPUTE-APPLICABLE-METHODS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Note: ;;; in file CMPCLOS.LSP, position 1233 ;;; at (DEFUN PRECOMPUTE-APPLICABLE-METHODS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1) to be LIST ;;; Compiling (DEFUN FIND-SLOT-ACCESSORS ...). ;;; Note: ;;; in file CMPCLOS.LSP, position 2305 ;;; at (DEFUN FIND-SLOT-ACCESSORS ...) ;;; Checking type of #:LET8 to be LIST ;;; Note: ;;; in file CMPCLOS.LSP, position 2305 ;;; at (DEFUN FIND-SLOT-ACCESSORS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST6) to be LIST ;;; Compiling (DEFUN MAYBE-OPTIMIZE-SLOT-ACCESSOR ...). ;;; Compiling (DEFUN TRY-OPTIMIZE-SLOT-READER ...). ;;; Compiling (DEFUN TRY-OPTIMIZE-SLOT-WRITER ...). ;;; Note: ;;; in file CMPCLOS.LSP, position 4262 ;;; at (DEFUN TRY-OPTIMIZE-SLOT-WRITER ...) ;;; Checking type of #:LET17 to be LIST ;;; Note: ;;; in file CMPCLOS.LSP, position 4262 ;;; at (DEFUN TRY-OPTIMIZE-SLOT-WRITER ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST13) to be LIST ;;; Note: ;;; in file CMPCLOS.LSP, position 4262 ;;; at (DEFUN TRY-OPTIMIZE-SLOT-WRITER ...) ;;; Checking type of #:LOOP-LIST-TAIL15 to be CONS ;;; End of Pass 1. ;;; Emitting code for MAYBE-OPTIMIZE-GENERIC-FUNCTION. ;;; Emitting code for PRECOMPUTE-APPLICABLE-METHODS. ;;; Emitting code for APPLICABLE-METHOD-P. ;;; Emitting code for FIND-SLOT-ACCESSORS. ;;; Emitting code for MAYBE-OPTIMIZE-SLOT-ACCESSOR. ;;; Emitting code for TRY-OPTIMIZE-SLOT-READER. ;;; Emitting code for TRY-OPTIMIZE-SLOT-WRITER. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpclos.c -o cmp/cmpclos.o ;;; Finished compiling SRC:CMP;CMPCLOS.LSP. ;;; (compile-file "src:cmp;cmpstructures.lsp" :output-file #P"BUILD:CMP;CMPSTRUCTURES.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPSTRUCTURES.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN GET-SLOT-TYPE ...). ;;; Compiling (DEFUN MAYBE-OPTIMIZE-STRUCTURE-ACCESS ...). ;;; End of Pass 1. ;;; Emitting code for GET-SLOT-TYPE. ;;; Emitting code for MAYBE-OPTIMIZE-STRUCTURE-ACCESS. ;;; Emitting code for SI:STRUCTURE-REF. ;;; Emitting code for SI:STRUCTURE-SET. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpstructures.c -o cmp/cmpstructures.o ;;; Finished compiling SRC:CMP;CMPSTRUCTURES.LSP. ;;; (compile-file "src:cmp;cmparray.lsp" :output-file #P"BUILD:CMP;CMPARRAY.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPARRAY.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN VALID-ARRAY-INDEX-P ...). ;;; Compiling (DEFUN GUESS-ARRAY-ELEMENT-TYPE ...). ;;; Compiling (DEFUN GUESS-ARRAY-DIMENSIONS-TYPE ...). ;;; Style warning: ;;; in file CMPARRAY.LSP, position 1858 ;;; at (DEFINE-COMPILER-MACRO MAKE-ARRAY ...) ;;; ! The variable ENV is not used. ;;; Compiling (DEFUN EXPAND-VECTOR-PUSH ...). ;;; Style warning: ;;; in file CMPARRAY.LSP, position 3957 ;;; at (DEFUN EXPAND-VECTOR-PUSH ...) ;;; ! The variable ENV is not used. ;;; Compiling (DEFUN EXPAND-AREF ...). ;;; Compiling (DEFUN EXPAND-ASET ...). ;;; Compiling (DEFUN EXPAND-ZERO-DIM-INDEX-CHECK ...). ;;; Compiling (DEFUN EXPAND-VECTOR-INDEX-CHECK ...). ;;; Compiling (DEFUN EXPAND-ROW-MAJOR-INDEX ...). ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LET40 to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST36) to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LOOP-LIST-TAIL38 to be CONS ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LET47 to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST43) to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LOOP-LIST-TAIL45 to be CONS ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LET54 to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LET56 to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LET58 to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST49) to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST50) to be LIST ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LOOP-LIST-TAIL52 to be CONS ;;; Note: ;;; in file CMPARRAY.LSP, position 7615 ;;; at (DEFUN EXPAND-ROW-MAJOR-INDEX ...) ;;; Checking type of #:LOOP-LIST-TAIL52 to be CONS ;;; Compiling (DEFMACRO CHECK-EXPECTED-RANK ...). ;;; Compiling (DEFMACRO CHECK-INDEX-IN-BOUNDS ...). ;;; Compiling (DEFMACRO CHECK-VECTOR-IN-BOUNDS ...). ;;; Compiling (DEFUN ARRAY-DIMENSION-ACCESSOR ...). ;;; Compiling (DEFMACRO ARRAY-DIMENSION-FAST ...). ;;; End of Pass 1. ;;; Emitting code for VALID-ARRAY-INDEX-P. ;;; Emitting code for GUESS-ARRAY-ELEMENT-TYPE. ;;; Emitting code for GUESS-ARRAY-DIMENSIONS-TYPE. ;;; Emitting code for MAKE-ARRAY. ;;; Emitting code for EXPAND-VECTOR-PUSH. ;;; Emitting code for VECTOR-PUSH. ;;; Emitting code for VECTOR-PUSH-EXTEND. ;;; Emitting code for AREF. ;;; Emitting code for EXPAND-AREF. ;;; Emitting code for SI:ASET. ;;; Emitting code for EXPAND-ASET. ;;; Emitting code for ARRAY-ROW-MAJOR-INDEX. ;;; Emitting code for EXPAND-ZERO-DIM-INDEX-CHECK. ;;; Emitting code for EXPAND-VECTOR-INDEX-CHECK. ;;; Emitting code for EXPANSION. ;;; Emitting code for EXPAND-ROW-MAJOR-INDEX. ;;; Emitting code for CHECK-EXPECTED-RANK. ;;; Emitting code for CHECK-INDEX-IN-BOUNDS. ;;; Emitting code for CHECK-VECTOR-IN-BOUNDS. ;;; Emitting code for ARRAY-DIMENSION-ACCESSOR. ;;; Emitting code for ARRAY-DIMENSION-FAST. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmparray.c -o cmp/cmparray.o ;;; Finished compiling SRC:CMP;CMPARRAY.LSP. ;;; (compile-file "src:cmp;cmpos-run.lsp" :output-file #P"BUILD:CMP;CMPOS-RUN.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOS-RUN.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN SAFE-SYSTEM ...). ;;; Compiling (DEFUN SAVE-DIRECTORY ...). ;;; Compiling (DEFMACRO WITH-CURRENT-DIRECTORY ...). ;;; Compiling (DEFUN SAFE-RUN-PROGRAM ...). ;;; Style warning: ;;; in file CMPOS-RUN.LSP, position 1854 ;;; at (DEFUN SAFE-RUN-PROGRAM ...) ;;; ! The variable STREAM is not used. ;;; Style warning: ;;; in file CMPOS-RUN.LSP, position 1854 ;;; at (DEFUN SAFE-RUN-PROGRAM ...) ;;; ! The variable PROCESS is not used. ;;; Compiling (DEFUN SPLIT-PROGRAM-OPTIONS ...). ;;; End of Pass 1. ;;; Emitting code for SAFE-SYSTEM. ;;; Emitting code for SAVE-DIRECTORY. ;;; Emitting code for WITH-CURRENT-DIRECTORY. ;;; Emitting code for SAFE-RUN-PROGRAM. ;;; Emitting code for #:G8. ;;; Emitting code for SPLIT-PROGRAM-OPTIONS. ;;; Emitting code for PUSH-CHAR. ;;; Emitting code for NEW-STRING. ;;; Emitting code for MAYBE-PUSH. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpos-run.c -o cmp/cmpos-run.o ;;; Finished compiling SRC:CMP;CMPOS-RUN.LSP. ;;; (compile-file "src:cmp;cmpos-features.lsp" :output-file #P"BUILD:CMP;CMPOS-FEATURES.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPOS-FEATURES.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN RUN-AND-COLLECT ...). ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 631 ;;; at (DEFUN RUN-AND-COLLECT ...) ;;; Checking type of #:LOOP-LIST-TAIL1 to be CONS ;;; Style warning: ;;; in file CMPOS-FEATURES.LSP, position 631 ;;; at (DEFUN RUN-AND-COLLECT ...) ;;; ! The variable PROCESS is not used. ;;; Compiling (DEFUN SPLIT-WORDS ...). ;;; Compiling (DEFUN KNOWN-KEYWORD ...). ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2044 ;;; at (DEFUN KNOWN-KEYWORD ...) ;;; Checking type of #:LET17 to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2044 ;;; at (DEFUN KNOWN-KEYWORD ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST14) to be LIST ;;; Compiling (DEFUN GATHER-KEYWORDS ...). ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2347 ;;; at (DEFUN GATHER-KEYWORDS ...) ;;; Checking type of #:LET24 to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2347 ;;; at (DEFUN GATHER-KEYWORDS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST20) to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2347 ;;; at (DEFUN GATHER-KEYWORDS ...) ;;; Checking type of #:LOOP-LIST-TAIL22 to be CONS ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2347 ;;; at (DEFUN GATHER-KEYWORDS ...) ;;; Checking type of #:LET32 to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2347 ;;; at (DEFUN GATHER-KEYWORDS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST27) to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2347 ;;; at (DEFUN GATHER-KEYWORDS ...) ;;; Checking type of #:LOOP-LIST-TAIL29 to be CONS ;;; Style warning: ;;; in file CMPOS-FEATURES.LSP, position 2347 ;;; at (DEFUN GATHER-KEYWORDS ...) ;;; ! The variable PATTERNS is not used. ;;; Compiling (DEFUN COMPILER-DEFINES ...). ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of #:LET37 to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST34) to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of #:LET52 to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of #:LOOP-LIST-TAIL50 to be CONS ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of #:LET45 to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST41) to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of #:LOOP-LIST-TAIL43 to be CONS ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of #:LET54 to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 2603 ;;; at (DEFUN COMPILER-DEFINES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST38) to be LIST ;;; Compiling (DEFUN RUN-AND-COLLECT-KEYWORDS ...). ;;; Compiling (DEFUN GATHER-SYSTEM-FEATURES ...). ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 4849 ;;; at (DEFUN GATHER-SYSTEM-FEATURES ...) ;;; Checking type of #:LET64 to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 4849 ;;; at (DEFUN GATHER-SYSTEM-FEATURES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST60) to be LIST ;;; Note: ;;; in file CMPOS-FEATURES.LSP, position 4849 ;;; at (DEFUN GATHER-SYSTEM-FEATURES ...) ;;; Checking type of #:LOOP-LIST-TAIL62 to be CONS ;;; Compiling (DEFUN UPDATE-COMPILER-FEATURES ...). ;;; End of Pass 1. ;;; Emitting code for RUN-AND-COLLECT. ;;; Emitting code for COLLECT-LINES. ;;; Emitting code for #:G5. ;;; Emitting code for SPLIT-WORDS. ;;; Emitting code for KNOWN-KEYWORD. ;;; Emitting code for GATHER-KEYWORDS. ;;; Emitting code for #:G30. ;;; Emitting code for COMPILER-DEFINES. ;;; Emitting code for RUN-AND-COLLECT-KEYWORDS. ;;; Emitting code for GATHER-SYSTEM-FEATURES. ;;; Emitting code for UPDATE-COMPILER-FEATURES. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpos-features.c -o cmp/cmpos-features.o ;;; Finished compiling SRC:CMP;CMPOS-FEATURES.LSP. ;;; (compile-file "src:cmp;cmpmain.lsp" :output-file #P"BUILD:CMP;CMPMAIN.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;CMPMAIN.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN SAFE-MKSTEMP ...). ;;; Compiling (DEFUN COMPILE-FILE-PATHNAME ...). ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable SOURCE-OFFSET is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable SOURCE-TRUENAME is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable EXTERNAL-FORMAT is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable LOAD is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable DATA-FILE is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable H-FILE is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable C-FILE is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable PRINT is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 2022 ;;; at (DEFUN COMPILE-FILE-PATHNAME ...) ;;; ! The variable VERBOSE is not used. ;;; Compiling (DEFUN CMP-DELETE-FILE ...). ;;; Note: ;;; in file CMPMAIN.LSP, position 4754 ;;; at (PUSH #'(LAMBDA NIL ...) ...) ;;; Checking type of #:LET28 to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 4754 ;;; at (PUSH #'(LAMBDA NIL ...) ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST ;;; Compiling (DEFMACRO FIX-FOR-MINGW ...). ;;; Compiling (DEFUN LINKER-CC ...). ;;; Style warning: ;;; in file CMPMAIN.LSP, position 5537 ;;; at (DEFUN LINKER-CC ...) ;;; ! The variable TYPE is not used. ;;; Compiling (DEFUN LINKER-AR ...). ;;; Compiling (DEFUN STATIC-LIB-AR ...). ;;; Note: ;;; in file CMPMAIN.LSP, position 6562 ;;; at (DEFUN STATIC-LIB-AR ...) ;;; Checking type of #:LET42 to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 6562 ;;; at (DEFUN STATIC-LIB-AR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST38) to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 6562 ;;; at (DEFUN STATIC-LIB-AR ...) ;;; Checking type of #:LOOP-LIST-TAIL40 to be CONS ;;; Compiling (DEFUN SHARED-CC ...). ;;; Compiling (DEFUN BUNDLE-CC ...). ;;; Style warning: ;;; in file CMPMAIN.LSP, position 7621 ;;; at (DEFUN BUNDLE-CC ...) ;;; ! The variable INIT-NAME is not used. ;;; Compiling (DEFUN GUESS-KIND ...). ;;; Compiling (DEFUN GUESS-LD-FLAGS ...). ;;; Compiling (DEFUN SYSTEM-LD-FLAG ...). ;;; Compiling (DEFUN BUILDER ...). ;;; Note: ;;; in file CMPMAIN.LSP, position 14343 ;;; at (DEFUN BUILDER ...) ;;; Checking type of #:LET78 to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 14343 ;;; at (DEFUN BUILDER ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST76) to be LIST ;;; Compiling (DEFUN BUILD-FASL ...). ;;; Compiling (DEFUN BUILD-PROGRAM ...). ;;; Compiling (DEFUN BUILD-STATIC-LIBRARY ...). ;;; Compiling (DEFUN BUILD-SHARED-LIBRARY ...). ;;; Compiling (DEFUN COMPILE-FILE ...). ;;; Note: ;;; in file CMPMAIN.LSP, position 21163 ;;; at (DEFUN COMPILE-FILE ...) ;;; Checking type of (LOCK-COUNT #:LOCK87) to be FIXNUM ;;; Note: ;;; in file CMPMAIN.LSP, position 21163 ;;; at (DEFUN COMPILE-FILE ...) ;;; Checking type of #:G138 to be CONS ;;; Note: ;;; in file CMPMAIN.LSP, position 21163 ;;; at (DEFUN COMPILE-FILE ...) ;;; Checking type of #:G142 to be CONS ;;; Note: ;;; in file CMPMAIN.LSP, position 21163 ;;; at (DEFUN COMPILE-FILE ...) ;;; Checking type of #:LET152 to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 21163 ;;; at (DEFUN COMPILE-FILE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST150) to be LIST ;;; Style warning: ;;; in file CMPMAIN.LSP, position 21163 ;;; at (DEFUN COMPILE-FILE ...) ;;; ! The variable OUTPUT-FILE is not used. ;;; Compiling (DEFUN COMPILER-OUTPUT-VALUES ...). ;;; Note: ;;; in file CMPMAIN.LSP, position 26984 ;;; at (DEFUN COMPILER-OUTPUT-VALUES ...) ;;; Checking type of #:LET157 to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 26984 ;;; at (DEFUN COMPILER-OUTPUT-VALUES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST155) to be LIST ;;; Compiling (DEFVAR *GAZONK-COUNTER* ...). ;;; Compiling (DEFUN COMPILE ...). ;;; Note: ;;; in file CMPMAIN.LSP, position 27606 ;;; at (DEFUN COMPILE ...) ;;; Checking type of (LOCK-COUNT #:LOCK171) to be FIXNUM ;;; Note: ;;; in file CMPMAIN.LSP, position 27606 ;;; at (DEFUN COMPILE ...) ;;; Checking type of #:LET226 to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 27606 ;;; at (DEFUN COMPILE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST224) to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 27606 ;;; at (DEFUN COMPILE ...) ;;; Checking type of #:LET235 to be LIST ;;; Note: ;;; in file CMPMAIN.LSP, position 27606 ;;; at (DEFUN COMPILE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST233) to be LIST ;;; Compiling (DEFUN DISASSEMBLE ...). ;;; Note: ;;; in file CMPMAIN.LSP, position 32163 ;;; at (DEFUN DISASSEMBLE ...) ;;; Checking type of (LOCK-COUNT #:LOCK242) to be FIXNUM ;;; Compiling (DEFUN COMPILER-PASS2 ...). ;;; Compiling (DEFUN ECL-INCLUDE-DIRECTORY ...). ;;; Compiling (DEFUN ECL-LIBRARY-DIRECTORY ...). ;;; Compiling (DEFUN COMPILER-CC ...). ;;; Compiling (DEFUN PRINT-COMPILER-INFO ...). ;;; Compiling (DEFMACRO WITH-COMPILATION-UNIT ...). ;;; Style warning: ;;; in file CMPMAIN.LSP, position 38294 ;;; at (FSET 'WITH-COMPILATION-UNIT ...) ;;; ! The variable OPTIONS is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 38446 ;;; at (LET* (# # ...) ...) ;;; ! The variable COMPILE-FILE is not used. ;;; Style warning: ;;; in file CMPMAIN.LSP, position 38446 ;;; at (LET* (# # ...) ...) ;;; ! The variable COMPILE-FILE-PATHNAME is not used. ;;; End of Pass 1. ;;; Emitting code for SAFE-MKSTEMP. ;;; Emitting code for COMPILE-FILE-PATHNAME. ;;; Emitting code for CMP-DELETE-FILE. ;;; Emitting code for #:G22. ;;; Emitting code for FIX-FOR-MINGW. ;;; Emitting code for LINKER-CC. ;;; Emitting code for LINKER-AR. ;;; Emitting code for STATIC-LIB-AR. ;;; Emitting code for SHARED-CC. ;;; Emitting code for BUNDLE-CC. ;;; Emitting code for GUESS-KIND. ;;; Emitting code for GUESS-LD-FLAGS. ;;; Emitting code for SYSTEM-LD-FLAG. ;;; Emitting code for FALLBACK. ;;; Emitting code for FIND-ARCHIVE. ;;; Emitting code for EXISTING-SYSTEM-OUTPUT. ;;; Emitting code for SYSTEM-OUTPUT. ;;; Emitting code for ASDFCALL. ;;; Emitting code for ASDFSYM. ;;; Emitting code for BUILDER. ;;; Emitting code for BUILD-FASL. ;;; Emitting code for BUILD-PROGRAM. ;;; Emitting code for BUILD-STATIC-LIBRARY. ;;; Emitting code for BUILD-SHARED-LIBRARY. ;;; Emitting code for COMPILE-FILE. ;;; Emitting code for #:G86. ;;; Emitting code for #:G136. ;;; Emitting code for COMPILER-OUTPUT-VALUES. ;;; Emitting code for COMPILE. ;;; Emitting code for #:G170. ;;; Emitting code for #:G220. ;;; Emitting code for DISASSEMBLE. ;;; Emitting code for #:G241. ;;; Emitting code for #:G291. ;;; Emitting code for #:G294. ;;; Emitting code for COMPILER-PASS2. ;;; Emitting code for ECL-INCLUDE-DIRECTORY. ;;; Emitting code for ECL-LIBRARY-DIRECTORY. ;;; Emitting code for COMPILER-CC. ;;; Emitting code for PRINT-COMPILER-INFO. ;;; Emitting code for WITH-COMPILATION-UNIT. ;;; Emitting code for INSTALL-C-COMPILER. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/cmpmain.c -o cmp/cmpmain.o ;;; Finished compiling SRC:CMP;CMPMAIN.LSP. ;;; (compile-file "src:cmp;proclamations.lsp" :output-file #P"BUILD:CMP;PROCLAMATIONS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;PROCLAMATIONS.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN PARSE-FUNCTION-PROCLAMATION ...). ;;; Note: ;;; in file PROCLAMATIONS.LSP, position 2113 ;;; at (DEFUN PARSE-FUNCTION-PROCLAMATION ...) ;;; Checking type of #:LET2 to be LIST ;;; Note: ;;; in file PROCLAMATIONS.LSP, position 2113 ;;; at (DEFUN PARSE-FUNCTION-PROCLAMATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Note: ;;; in file PROCLAMATIONS.LSP, position 63822 ;;; at (LOOP FOR ...) ;;; Checking type of #:LET84 to be LIST ;;; Note: ;;; in file PROCLAMATIONS.LSP, position 63822 ;;; at (LOOP FOR ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST82) to be LIST ;;; End of Pass 1. ;;; Emitting code for PARSE-FUNCTION-PROCLAMATION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/proclamations.c -o cmp/proclamations.o ;;; Finished compiling SRC:CMP;PROCLAMATIONS.LSP. ;;; (compile-file "src:cmp;sysfun.lsp" :output-file #P"BUILD:CMP;SYSFUN.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CMP;SYSFUN.LSP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-INLINE-INFORMATION ...). ;;; Note: ;;; in file SYSFUN.LSP, position 35295 ;;; at (DEFUN MAKE-INLINE-INFORMATION ...) ;;; Checking type of #:LET2 to be LIST ;;; Note: ;;; in file SYSFUN.LSP, position 35295 ;;; at (DEFUN MAKE-INLINE-INFORMATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST ;;; Compiling (DEFUN INLINE-INFORMATION ...). ;;; Compiling (DEFUN (SETF INLINE-INFORMATION) ...). ;;; Compiling (DEFUN DEF-INLINE ...). ;;; Note: ;;; in file SYSFUN.LSP, position 35739 ;;; at (DEFUN DEF-INLINE ...) ;;; Checking type of #:LET10 to be LIST ;;; Note: ;;; in file SYSFUN.LSP, position 35739 ;;; at (DEFUN DEF-INLINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST8) to be LIST ;;; Note: ;;; in file SYSFUN.LSP, position 35739 ;;; at (DEFUN DEF-INLINE ...) ;;; Checking type of #:LET19 to be LIST ;;; Note: ;;; in file SYSFUN.LSP, position 35739 ;;; at (DEFUN DEF-INLINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST14) to be LIST ;;; Note: ;;; in file SYSFUN.LSP, position 35739 ;;; at (DEFUN DEF-INLINE ...) ;;; Checking type of #:LOOP-LIST-TAIL16 to be CONS ;;; Compiling (DEFVAR C::*IN-ALL-SYMBOLS-FUNCTIONS* ...). ;;; End of Pass 1. ;;; Emitting code for C::MAKE-INLINE-INFORMATION. ;;; Emitting code for C::INLINE-INFORMATION. ;;; Emitting code for (SETF C::INLINE-INFORMATION). ;;; Emitting code for C::DEF-INLINE. ;;; Emitting code for #:G17. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c cmp/sysfun.c -o cmp/sysfun.o ;;; Finished compiling SRC:CMP;SYSFUN.LSP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitmTmRSB.c -o eclinitmTmRSB.o ;;; Note: ;;; Invoking external command: ;;; ar cr libcmp.a eclinitmTmRSB.o cmp/cmppackage.o cmp/cmptypes.o cmp/cmpglobals.o cmp/cmpdefs.o cmp/cmpmac.o cmp/cmpform.o cmp/cmptables.o cmp/cmpinline.o cmp/cmputil.o cmp/cmptype-arith.o cmp/cmptype-prop.o cmp/cmptype.o cmp/cmptype-assert.o cmp/cmpenv-api.o cmp/cmpenv-fun.o cmp/cmpenv-declare.o cmp/cmpenv-proclaim.o cmp/cmpenv-declaim.o cmp/cmpc-machine.o cmp/cmpc-wt.o cmp/cmpc-inliner.o cmp/cmpbind.o cmp/cmpblock.o cmp/cmpcall.o cmp/cmpcatch.o cmp/cmppolicy.o cmp/cmpeval.o cmp/cmpexit.o cmp/cmpflet.o cmp/cmpfun.o cmp/cmpif.o cmp/cmplam.o cmp/cmplet.o cmp/cmploc.o cmp/cmpmap.o cmp/cmpstack.o cmp/cmpmulti.o cmp/cmpspecial.o cmp/cmptag.o cmp/cmptop.o cmp/cmpvar.o cmp/cmpwt.o cmp/cmpffi.o cmp/cmpcbk.o cmp/cmpct.o cmp/cmpnum.o cmp/cmpname.o cmp/cmpopt.o cmp/cmpopt-bits.o cmp/cmpopt-clos.o cmp/cmpopt-constant.o cmp/cmpopt-cons.o cmp/cmpopt-printer.o cmp/cmpopt-sequence.o cmp/cmpopt-type.o cmp/cmpprop.o cmp/cmpclos.o cmp/cmpstructures.o cmp/cmparray.o cmp/cmpos-run.o cmp/cmpos-features.o cmp/cmpmain.o cmp/proclamations.o cmp/sysfun.o ;;; Note: ;;; Invoking external command: ;;; ranlib libcmp.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitty20B9.c -o eclinitty20B9.o ;;; Note: ;;; Invoking external command: ;;; gcc -o cmp.fas -L/<>/build/ /<>/build/eclinitty20B9.o cmp/cmppackage.o cmp/cmptypes.o cmp/cmpglobals.o cmp/cmpdefs.o cmp/cmpmac.o cmp/cmpform.o cmp/cmptables.o cmp/cmpinline.o cmp/cmputil.o cmp/cmptype-arith.o cmp/cmptype-prop.o cmp/cmptype.o cmp/cmptype-assert.o cmp/cmpenv-api.o cmp/cmpenv-fun.o cmp/cmpenv-declare.o cmp/cmpenv-proclaim.o cmp/cmpenv-declaim.o cmp/cmpc-machine.o cmp/cmpc-wt.o cmp/cmpc-inliner.o cmp/cmpbind.o cmp/cmpblock.o cmp/cmpcall.o cmp/cmpcatch.o cmp/cmppolicy.o cmp/cmpeval.o cmp/cmpexit.o cmp/cmpflet.o cmp/cmpfun.o cmp/cmpif.o cmp/cmplam.o cmp/cmplet.o cmp/cmploc.o cmp/cmpmap.o cmp/cmpstack.o cmp/cmpmulti.o cmp/cmpspecial.o cmp/cmptag.o cmp/cmptop.o cmp/cmpvar.o cmp/cmpwt.o cmp/cmpffi.o cmp/cmpcbk.o cmp/cmpct.o cmp/cmpnum.o cmp/cmpname.o cmp/cmpopt.o cmp/cmpopt-bits.o cmp/cmpopt-clos.o cmp/cmpopt-constant.o cmp/cmpopt-cons.o cmp/cmpopt-printer.o cmp/cmpopt-sequence.o cmp/cmpopt-type.o cmp/cmpprop.o cmp/cmpclos.o cmp/cmpstructures.o cmp/cmparray.o cmp/cmpos-run.o cmp/cmpos-features.o cmp/cmpmain.o cmp/proclamations.o cmp/sysfun.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:ecl-cdb;ecl-cdb.lisp" :output-file #P"BUILD:EXT;ECL-CDB.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:ECL-CDB;ECL-CDB.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFSTRUCT CDB ...). ;;; Compiling (DEFUN READ-WORD ...). ;;; Compiling (DEFUN WRITE-WORD ...). ;;; Compiling (DEFUN WRITE-VECTOR ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 3132 ;;; at (DEFUN WRITE-VECTOR ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-1) to be FIXNUM ;;; Compiling (DEFUN TO-CDB-HASH ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32). Assuming it is T. ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Checking type of #:LET10 to be (UNSIGNED-BYTE 8) ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Checking type of (AREF #:LOOP-ACROSS-VECTOR-7 #:LOOP-ACROSS-INDEX-8) to be (UNSIGNED-BYTE 8) ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-8) to be FIXNUM ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32). Assuming it is T. ;;; Note: ;;; in file ECL-CDB.LISP, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32). Assuming it is T. ;;; Compiling (DEFUN %MAKE-CDB ...). ;;; Compiling (DEFMACRO WITH-OUTPUT-TO-CDB ...). ;;; Compiling (DEFUN ADD-RECORD ...). ;;; Compiling (DEFUN DUMP-TABLE ...). ;;; Compiling (DEFUN DUMP-CDB ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 6148 ;;; at (DEFUN DUMP-CDB ...) ;;; Checking type of #:LET61 to be VECTOR ;;; Note: ;;; in file ECL-CDB.LISP, position 6148 ;;; at (DEFUN DUMP-CDB ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-58) to be FIXNUM ;;; Note: ;;; in file ECL-CDB.LISP, position 6148 ;;; at (DEFUN DUMP-CDB ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-58) to be FIXNUM ;;; Compiling (DEFUN CLOSE-CDB ...). ;;; Compiling (DEFUN CDB-ERROR ...). ;;; Compiling (DEFUN VALUES-COINCIDE ...). ;;; Compiling (DEFUN LOOKUP-CDB ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 7705 ;;; at (DEFUN LOOKUP-CDB ...) ;;; Checking type of #:LET74 to be REAL ;;; Compiling (DEFUN MAP-CDB ...). ;;; Note: ;;; in file ECL-CDB.LISP, position 9147 ;;; at (DEFUN MAP-CDB ...) ;;; Checking type of #:LET83 to be REAL ;;; Note: ;;; in file ECL-CDB.LISP, position 9147 ;;; at (DEFUN MAP-CDB ...) ;;; Checking type of TABLE-POSITION to be REAL ;;; End of Pass 1. ;;; Note: ;;; in file ecl-cdb.lisp, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32). Assuming it is T. ;;; Note: ;;; in file ecl-cdb.lisp, position 3285 ;;; at (DEFUN TO-CDB-HASH ...) ;;; Unknown type (UNSIGNED-INTEGER 32) ;;; Emitting code for MAKE-CDB. ;;; Emitting code for READ-WORD. ;;; Emitting code for WRITE-WORD. ;;; Emitting code for WRITE-VECTOR. ;;; Emitting code for TO-CDB-HASH. ;;; Emitting code for %MAKE-CDB. ;;; Emitting code for WITH-OUTPUT-TO-CDB. ;;; Emitting code for ADD-RECORD. ;;; Emitting code for DUMP-TABLE. ;;; Emitting code for DUMP-CDB. ;;; Emitting code for CLOSE-CDB. ;;; Emitting code for CDB-ERROR. ;;; Emitting code for VALUES-COINCIDE. ;;; Emitting code for LOOKUP-CDB. ;;; Emitting code for MAP-CDB. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/ecl-cdb.c -o ext/ecl-cdb.o ;;; Finished compiling EXT:ECL-CDB;ECL-CDB.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitowkbkI.c -o eclinitowkbkI.o ;;; Note: ;;; Invoking external command: ;;; ar cr libecl-cdb.a eclinitowkbkI.o ext/ecl-cdb.o ;;; Note: ;;; Invoking external command: ;;; ranlib libecl-cdb.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinituzfg6g.c -o eclinituzfg6g.o ;;; Note: ;;; Invoking external command: ;;; gcc -o ecl-cdb.fas -L/<>/build/ /<>/build/eclinituzfg6g.o ext/ecl-cdb.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:ecl-cdb;ecl-help.lisp" :output-file #P"BUILD:EXT;ECL-HELP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:ECL-CDB;ECL-HELP.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN TO-CDB-VECTOR ...). ;;; Compiling (DEFUN FROM-CDB-VECTOR ...). ;;; Compiling (DEFUN SEARCH-HELP-FILE ...). ;;; Compiling (DEFUN DUMP-HELP-FILE ...). ;;; End of Pass 1. ;;; Emitting code for TO-CDB-VECTOR. ;;; Emitting code for FROM-CDB-VECTOR. ;;; Emitting code for SEARCH-HELP-FILE. ;;; Emitting code for DUMP-HELP-FILE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/ecl-help.c -o ext/ecl-help.o ;;; Finished compiling EXT:ECL-CDB;ECL-HELP.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitRyEw4P.c -o eclinitRyEw4P.o ;;; Note: ;;; Invoking external command: ;;; ar cr libecl-help.a eclinitRyEw4P.o ext/ecl-cdb.o ext/ecl-help.o ;;; Note: ;;; Invoking external command: ;;; ranlib libecl-help.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitoIBz6o.c -o eclinitoIBz6o.o ;;; Note: ;;; Invoking external command: ;;; gcc -o ecl-help.fas -L/<>/build/ /<>/build/eclinitoIBz6o.o ext/ecl-cdb.o ext/ecl-help.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:defsystem;defsystem.lisp" :output-file #P"BUILD:EXT;DEFSYSTEM.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:DEFSYSTEM;DEFSYSTEM.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *SPECIAL-EXPORTS* ...). ;;; Compiling (DEFVAR *EXPORTS* ...). ;;; Compiling (DEFVAR *OTHER-EXPORTS* ...). ;;; Compiling (DEFPARAMETER *DEFSYSTEM-VERSION* ...). ;;; Compiling (DEFVAR *DONT-REDEFINE-REQUIRE* ...). ;;; Compiling (DEFVAR *MULTIPLE-LISP-SUPPORT* ...). ;;; Compiling (DEFUN HOME-SUBDIRECTORY ...). ;;; Compiling (DEFVAR *CENTRAL-REGISTRY* ...). ;;; Compiling (DEFUN ADD-REGISTRY-LOCATION ...). ;;; Compiling (DEFUN REGISTRY-PATHNAME ...). ;;; Compiling (DEFUN PRINT-CENTRAL-REGISTRY-DIRECTORIES ...). ;;; Compiling (DEFUN LIST-CENTRAL-REGISTRY-DIRECTORIES ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 67744 ;;; at (DEFUN LIST-CENTRAL-REGISTRY-DIRECTORIES ...) ;;; Checking type of #:LET12 to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 67744 ;;; at (DEFUN LIST-CENTRAL-REGISTRY-DIRECTORIES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST8) to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 67744 ;;; at (DEFUN LIST-CENTRAL-REGISTRY-DIRECTORIES ...) ;;; Checking type of #:LOOP-LIST-TAIL10 to be CONS ;;; Compiling (DEFVAR *BIN-SUBDIR* ...). ;;; Compiling (DEFVAR *TELL-USER-WHEN-DONE* ...). ;;; Compiling (DEFVAR *OOS-VERBOSE* ...). ;;; Compiling (DEFVAR *OOS-TEST* ...). ;;; Compiling (DEFVAR *LOAD-SOURCE-IF-NO-BINARY* ...). ;;; Compiling (DEFVAR *BOTHER-USER-IF-NO-BINARY* ...). ;;; Compiling (DEFVAR *LOAD-SOURCE-INSTEAD-OF-BINARY* ...). ;;; Compiling (DEFVAR *COMPILE-DURING-LOAD* ...). ;;; Compiling (DEFVAR *MINIMAL-LOAD* ...). ;;; Compiling (DEFVAR *FILES-MISSING-IS-AN-ERROR* ...). ;;; Compiling (DEFVAR *OPERATIONS-PROPAGATE-TO-SUBSYSTEMS* ...). ;;; Compiling (DEFVAR *COMPILE-ERROR-FILE-TYPE* ...). ;;; Compiling (DEFVAR *CMU-ERRORS-TO-TERMINAL* ...). ;;; Compiling (DEFVAR *CMU-ERRORS-TO-FILE* ...). ;;; Compiling (DEFVAR *FILENAME-EXTENSIONS* ...). ;;; Compiling (DEFVAR *SYSTEM-EXTENSION* ...). ;;; Compiling (DEFVAR *SYSTEM-DEPENDENCIES-DELAYED* ...). ;;; Compiling (DEFUN NON-EMPTY-LISTP ...). ;;; Compiling (DEFVAR *VERSION-DIR* ...). ;;; Compiling (DEFVAR *VERSION-REPLACE* ...). ;;; Compiling (DEFVAR *VERSION* ...). ;;; Compiling (DEFVAR *COMPONENT-OPERATIONS* ...). ;;; Compiling (DEFUN COMPONENT-OPERATION ...). ;;; Compiling (DEFVAR *FIND-IRIX-VERSION-SCRIPT* ...). ;;; Compiling (DEFUN OPERATING-SYSTEM-VERSION ...). ;;; Compiling (DEFUN COMPILER-VERSION ...). ;;; Compiling (DEFUN AFS-BINARY-DIRECTORY ...). ;;; Compiling (DEFUN AFS-SOURCE-DIRECTORY ...). ;;; Compiling (DEFUN NULL-STRING ...). ;;; Compiling (DEFUN ENSURE-TRAILING-SLASH ...). ;;; Compiling (DEFUN AFS-COMPONENT ...). ;;; Compiling (DEFVAR *MACHINE-TYPE-ALIST* ...). ;;; Compiling (DEFUN MACHINE-TYPE-TRANSLATION ...). ;;; Compiling (DEFVAR *SOFTWARE-TYPE-ALIST* ...). ;;; Compiling (DEFUN SOFTWARE-TYPE-TRANSLATION ...). ;;; Compiling (DEFVAR *COMPILER-TYPE-ALIST* ...). ;;; Compiling (DEFUN COMPILER-TYPE-TRANSLATION ...). ;;; Compiling (DEFUN CANONICALIZE-SYSTEM-NAME ...). ;;; Compiling (DEFVAR *DEFINED-SYSTEMS* ...). ;;; Compiling (DEFUN GET-SYSTEM ...). ;;; Compiling (DEFUN UNDEFSYSTEM ...). ;;; Compiling (DEFUN DEFINED-SYSTEMS ...). ;;; Compiling (DEFUN DEFINED-NAMES-AND-SYSTEMS ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 87691 ;;; at (DEFUN DEFINED-NAMES-AND-SYSTEMS ...) ;;; Checking type of #:LOOP-LIST-TAIL44 to be CONS ;;; Compiling (DEFUN NEW-APPEND-DIRECTORIES ...). ;;; Compiling (DEFUN DIRECTORY-TO-LIST ...). ;;; Compiling (DEFPARAMETER *APPEND-DIRS-TESTS* ...). ;;; Compiling (DEFUN TEST-NEW-APPEND-DIRECTORIES ...). ;;; Compiling (DEFUN APPEND-DIRECTORIES ...). ;;; Compiling (DEFUN PATHNAME-LOGICAL-P ...). ;;; Compiling (DEFUN NAMESTRING-PROBABLY-LOGICAL ...). ;;; Compiling (DEFUN APPEND-LOGICAL-PNAMES ...). ;;; Compiling (DEFUN NEW-FILE-TYPE ...). ;;; Compiling (DEFVAR *SOURCE-PATHNAME-DEFAULT* ...). ;;; Compiling (DEFVAR *BINARY-PATHNAME-DEFAULT* ...). ;;; Compiling (DEFSTRUCT (TOPOLOGICAL-SORT-NODE #) ...). ;;; Compiling (DEFPARAMETER *COMPONENT-EVALUATED-SLOTS* ...). ;;; Compiling (DEFPARAMETER *COMPONENT-FORM-SLOTS* ...). ;;; Compiling (DEFSTRUCT (COMPONENT # ...) ...). ;;; Compiling (DEFSTRUCT (FOREIGN-SYSTEM #) ...). ;;; Compiling (DEFUN REGISTER-FOREIGN-SYSTEM ...). ;;; Compiling (DEFINE-CONDITION MISSING-COMPONENT ...). ;;; Compiling (DEFINE-CONDITION MISSING-MODULE ...). ;;; Compiling (DEFINE-CONDITION MISSING-SYSTEM ...). ;;; Compiling (DEFVAR *FILE-LOAD-TIME-TABLE* ...). ;;; Compiling (DEFUN COMPONENT-LOAD-TIME ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 115550 ;;; at (DEFUN COMPONENT-LOAD-TIME ...) ;;; Checking type of (WHEN NAME (COMPUTE-SYSTEM-PATH NAME NIL)) to be (OR STRING PATHNAME NULL) ;;; Compiling (DEFUN COMPUTE-SYSTEM-PATH ...). ;;; Compiling (DEFUN SYSTEM-DEFINITION-PATHNAME ...). ;;; Compiling (DEFVAR *RELOAD-SYSTEMS-FROM-DISK* ...). ;;; Compiling (DEFUN FIND-SYSTEM ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 122480 ;;; at (DEFUN FIND-SYSTEM ...) ;;; Checking type of #:G165 to be PATHNAME ;;; Note: ;;; in file DEFSYSTEM.LISP, position 122480 ;;; at (DEFUN FIND-SYSTEM ...) ;;; Checking type of (WHEN NAME (COMPUTE-SYSTEM-PATH NAME NIL)) to be (OR STRING PATHNAME NULL) ;;; Compiling (DEFUN PRINT-COMPONENT ...). ;;; Compiling (DEFUN DESCRIBE-SYSTEM ...). ;;; Compiling (DEFUN CANONICALIZE-COMPONENT-NAME ...). ;;; Compiling (DEFUN COMPONENT-PATHNAME ...). ;;; Compiling (DEFUN COMPONENT-ERROR-PATHNAME ...). ;;; Compiling (DEFUN COMPONENT-ROOT-DIR ...). ;;; Compiling (DEFVAR *SOURCE-PATHNAMES-TABLE* ...). ;;; Compiling (DEFVAR *BINARY-PATHNAMES-TABLE* ...). ;;; Compiling (DEFPARAMETER *RESET-FULL-PATHNAME-TABLE* ...). ;;; Compiling (DEFUN CLEAR-FULL-PATHNAME-TABLES ...). ;;; Compiling (DEFUN COMPONENT-FULL-PATHNAME ...). ;;; Compiling (DEFUN COMPONENT-FULL-PATHNAME-I ...). ;;; Compiling (DEFUN TRANSLATE-VERSION ...). ;;; Compiling (DEFUN COMPONENT-EXTENSION ...). ;;; Compiling (DEFUN CREATE-COMPONENT ...). ;;; Compiling (DEFUN PREPROCESS-COMPONENT-DEFINITION ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 140285 ;;; at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...) ;;; Checking type of #:LET254 to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 140285 ;;; at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST250) to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 140285 ;;; at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...) ;;; Checking type of #:G257 to be CONS ;;; Note: ;;; in file DEFSYSTEM.LISP, position 140285 ;;; at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...) ;;; Checking type of #:LET263 to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 140285 ;;; at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST259) to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 140285 ;;; at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...) ;;; Checking type of #:G266 to be CONS ;;; Compiling (DEFMACRO DEFSYSTEM ...). ;;; Compiling (DEFUN CREATE-COMPONENT-PATHNAMES ...). ;;; Compiling (DEFUN GENERATE-COMPONENT-PATHNAME ...). ;;; Compiling (DEFUN EXPAND-COMPONENT-COMPONENTS ...). ;;; Compiling (DEFUN EXPAND-COMPONENT-DEFINITIONS ...). ;;; Compiling (DEFUN EXPAND-SERIAL-COMPONENT-CHAIN ...). ;;; Compiling (DEFPARAMETER *ENABLE-STRAZ-ABSOLUTE-STRING-HACK* ...). ;;; Compiling (DEFUN ABSOLUTE-FILE-NAMESTRING-P ...). ;;; Compiling (DEFUN EXPAND-COMPONENT-DEFINITION ...). ;;; Compiling (DEFUN LINK-COMPONENT-DEPENDS-ON ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 154003 ;;; at (DEFUN LINK-COMPONENT-DEPENDS-ON ...) ;;; Checking type of #:LET486 to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 154003 ;;; at (DEFUN LINK-COMPONENT-DEPENDS-ON ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST473) to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 154003 ;;; at (DEFUN LINK-COMPONENT-DEPENDS-ON ...) ;;; Checking type of #:LOOP-LIST-TAIL475 to be CONS ;;; Compiling (DEFUN TOPOLOGICAL-SORT ...). ;;; Compiling (DEFUN SPLIT-STRING ...). ;;; Compiling (DEFUN PROMPT-STRING ...). ;;; Compiling (DEFUN FORMAT-JUSTIFIED-STRING ...). ;;; Compiling (DEFUN TELL-USER ...). ;;; Compiling (DEFUN TELL-USER-DONE ...). ;;; Compiling (DEFMACRO WITH-TELL-USER ...). ;;; Compiling (DEFUN TELL-USER-NO-FILES ...). ;;; Compiling (DEFUN TELL-USER-REQUIRE-SYSTEM ...). ;;; Compiling (DEFUN TELL-USER-GENERIC ...). ;;; Compiling (DEFPARAMETER *USE-TIMEOUTS* ...). ;;; Compiling (DEFPARAMETER *CLEAR-INPUT-BEFORE-QUERY* ...). ;;; Compiling (DEFPARAMETER *SLEEP-AMOUNT* ...). ;;; Compiling (DEFUN INTERNAL-REAL-TIME-IN-SECONDS ...). ;;; Compiling (DEFUN READ-CHAR-WAIT ...). ;;; Compiling (DEFUN Y-OR-N-P-WAIT ...). ;;; Compiling (DEFVAR %%COMPONENT%% ...). ;;; Compiling (DEFMACRO WITH-SPECIAL-COMPONENT-VARS ...). ;;; Compiling (DEFUN OPERATE-ON-SYSTEM ...). ;;; Warning: ;;; in file DEFSYSTEM.LISP, position 167805 ;;; at (DEFUN OPERATE-ON-SYSTEM ...) ;;; ! IGNORE declaration was found for not bound variable *COMPILE-FILE-VERBOSE*. ;;; Warning: ;;; in file DEFSYSTEM.LISP, position 167805 ;;; at (DEFUN OPERATE-ON-SYSTEM ...) ;;; ! Illegal or unknown OPTIMIZE proclamation (INHIBIT-WARNINGS 3) ;;; Style warning: ;;; in file DEFSYSTEM.LISP, position 167805 ;;; at (DEFUN OPERATE-ON-SYSTEM ...) ;;; ! The variable OVERRIDE-COMPILATION-UNIT is not used. ;;; Compiling (DEFUN COMPILE-SYSTEM ...). ;;; Compiling (DEFUN LOAD-SYSTEM ...). ;;; Compiling (DEFUN CLEAN-SYSTEM ...). ;;; Compiling (DEFUN EDIT-SYSTEM ...). ;;; Compiling (DEFUN HARDCOPY-SYSTEM ...). ;;; Compiling (DEFUN ENSURE-EXTERNAL-SYSTEM-DEF-LOADED ...). ;;; Compiling (DEFUN OPERATE-ON-COMPONENT ...). ;;; Compiling (DEFVAR *FORCE* ...). ;;; Compiling (DEFVAR *PROVIDING-BLOCKS-LOAD-PROPAGATION* ...). ;;; Compiling (DEFUN OPERATE-ON-SYSTEM-DEPENDENCIES ...). ;;; Compiling (DEFUN MODULE-DEPENDS-ON-CHANGED ...). ;;; Compiling (DEFUN OPERATE-ON-COMPONENTS ...). ;;; Compiling (DEFVAR *OLD-REQUIRE* ...). ;;; Compiling (DEFUN NEW-REQUIRE ...). ;;; Compiling (DEFUN CMUCL-MK-DEFSYSTEM-MODULE-PROVIDER ...). ;;; Compiling (DEFVAR *LANGUAGE-TABLE* ...). ;;; Compiling (DEFUN FIND-LANGUAGE ...). ;;; Compiling (DEFSTRUCT (LANGUAGE #) ...). ;;; Compiling (DEFUN PRINT-LANGUAGE ...). ;;; Compiling (DEFUN COMPILE-FUNCTION ...). ;;; Compiling (DEFUN LOAD-FUNCTION ...). ;;; Compiling (DEFUN DEFAULT-SOURCE-EXTENSION ...). ;;; Compiling (DEFUN DEFAULT-BINARY-EXTENSION ...). ;;; Compiling (DEFMACRO DEFINE-LANGUAGE ...). ;;; Compiling (DEFUN SCHEME-COMPILE-FILE ...). ;;; Compiling (DEFPARAMETER *C-COMPILER* ...). ;;; Compiling (DEFUN RUN-UNIX-PROGRAM ...). ;;; Compiling (DEFVAR *DEFAULT-SHELL* ...). ;;; Compiling (DEFUN RUN-SHELL-COMMAND ...). ;;; Style warning: ;;; in file DEFSYSTEM.LISP, position 202174 ;;; at (DEFUN RUN-SHELL-COMMAND ...) ;;; ! The variable COMMAND is not used. ;;; Style warning: ;;; in file DEFSYSTEM.LISP, position 202174 ;;; at (DEFUN RUN-SHELL-COMMAND ...) ;;; ! The variable OUTPUT is not used. ;;; Compiling (DEFUN DEFAULT-OUTPUT-PATHNAME ...). ;;; Compiling (DEFUN RUN-COMPILER ...). ;;; Compiling (DEFUN C-COMPILE-FILE ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 208216 ;;; at (DEFUN C-COMPILE-FILE ...) ;;; Checking type of #:LET703 to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 208216 ;;; at (DEFUN C-COMPILE-FILE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST698) to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 208216 ;;; at (DEFUN C-COMPILE-FILE ...) ;;; Checking type of #:LOOP-LIST-TAIL700 to be CONS ;;; Compiling (DEFPARAMETER *FORTRAN-COMPILER* ...). ;;; Compiling (DEFPARAMETER *FORTRAN-OPTIONS* ...). ;;; Compiling (DEFUN FORTRAN-COMPILE-FILE ...). ;;; Compiling (DEFPARAMETER *AR-PROGRAM* ...). ;;; Compiling (DEFUN BUILD-LIB ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 212244 ;;; at (DEFUN BUILD-LIB ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST713) to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 212244 ;;; at (DEFUN BUILD-LIB ...) ;;; Checking type of #:LOOP-LIST-TAIL715 to be CONS ;;; Compiling (DEFUN COMPILE-AND-LOAD-OPERATION ...). ;;; Compiling (DEFUN UNMUNGE-LUCID ...). ;;; Compiling (DEFUN COMPILE-FILE-OPERATION ...). ;;; Compiling (DEFUN NEEDS-COMPILATION ...). ;;; Compiling (DEFUN NEEDS-LOADING ...). ;;; Compiling (DEFUN LOAD-FILE-OPERATION ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 219750 ;;; at (DEFUN LOAD-FILE-OPERATION ...) ;;; Checking type of #:G767 to be PATHNAME ;;; Note: ;;; in file DEFSYSTEM.LISP, position 219750 ;;; at (DEFUN LOAD-FILE-OPERATION ...) ;;; Checking type of (WHEN NAME (COMPUTE-SYSTEM-PATH NAME NIL)) to be (OR STRING PATHNAME NULL) ;;; Note: ;;; in file DEFSYSTEM.LISP, position 219750 ;;; at (DEFUN LOAD-FILE-OPERATION ...) ;;; Checking type of #:G786 to be PATHNAME ;;; Note: ;;; in file DEFSYSTEM.LISP, position 219750 ;;; at (DEFUN LOAD-FILE-OPERATION ...) ;;; Checking type of (WHEN NAME (COMPUTE-SYSTEM-PATH NAME NIL)) to be (OR STRING PATHNAME NULL) ;;; Note: ;;; in file DEFSYSTEM.LISP, position 219750 ;;; at (DEFUN LOAD-FILE-OPERATION ...) ;;; Checking type of #:G805 to be PATHNAME ;;; Note: ;;; in file DEFSYSTEM.LISP, position 219750 ;;; at (DEFUN LOAD-FILE-OPERATION ...) ;;; Checking type of (WHEN NAME (COMPUTE-SYSTEM-PATH NAME NIL)) to be (OR STRING PATHNAME NULL) ;;; Compiling (DEFUN DELETE-BINARIES-OPERATION ...). ;;; Compiling (DEFUN BINARY-EXISTS ...). ;;; Compiling (DEFUN COMPILE-AND-LOAD-SOURCE-IF-NO-BINARY ...). ;;; Compiling (DEFUN LOAD-SOURCE-IF-NO-BINARY ...). ;;; Compiling (DEFUN FILES-WHICH-NEED-COMPILATION ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 231047 ;;; at (DEFUN FILES-WHICH-NEED-COMPILATION ...) ;;; Checking type of #:LET840 to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 231047 ;;; at (DEFUN FILES-WHICH-NEED-COMPILATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST835) to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 231047 ;;; at (DEFUN FILES-WHICH-NEED-COMPILATION ...) ;;; Checking type of #:LOOP-LIST-TAIL837 to be CONS ;;; Compiling (DEFUN FILES-IN-SYSTEM-AND-DEPENDENTS ...). ;;; Compiling (DEFUN FILES-IN-SYSTEM ...). ;;; Compiling (DEFUN FILE-PATHNAMES-IN-COMPONENT ...). ;;; Note: ;;; in file DEFSYSTEM.LISP, position 232581 ;;; at (DEFUN FILE-PATHNAMES-IN-COMPONENT ...) ;;; Checking type of #:LET852 to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 232581 ;;; at (DEFUN FILE-PATHNAMES-IN-COMPONENT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST847) to be LIST ;;; Note: ;;; in file DEFSYSTEM.LISP, position 232581 ;;; at (DEFUN FILE-PATHNAMES-IN-COMPONENT ...) ;;; Checking type of #:LOOP-LIST-TAIL849 to be CONS ;;; Compiling (DEFUN FILE-COMPONENTS-IN-COMPONENT ...). ;;; Compiling (DEFPARAMETER *PRINT-COMMAND* ...). ;;; Compiling (DEFUN SYSTEM-SOURCE-SIZE ...). ;;; Compiling (DEFUN FILE-LIST-SIZE ...). ;;; End of Pass 1. ;;; Emitting code for HOME-SUBDIRECTORY. ;;; Emitting code for ADD-REGISTRY-LOCATION. ;;; Emitting code for REGISTRY-PATHNAME. ;;; Emitting code for PRINT-CENTRAL-REGISTRY-DIRECTORIES. ;;; Emitting code for LIST-CENTRAL-REGISTRY-DIRECTORIES. ;;; Emitting code for NON-EMPTY-LISTP. ;;; Emitting code for COMPONENT-OPERATION. ;;; Emitting code for #:G22. ;;; Emitting code for OPERATING-SYSTEM-VERSION. ;;; Emitting code for COMPILER-VERSION. ;;; Emitting code for AFS-BINARY-DIRECTORY. ;;; Emitting code for AFS-SOURCE-DIRECTORY. ;;; Emitting code for NULL-STRING. ;;; Emitting code for ENSURE-TRAILING-SLASH. ;;; Emitting code for AFS-COMPONENT. ;;; Emitting code for MACHINE-TYPE-TRANSLATION. ;;; Emitting code for SOFTWARE-TYPE-TRANSLATION. ;;; Emitting code for COMPILER-TYPE-TRANSLATION. ;;; Emitting code for CANONICALIZE-SYSTEM-NAME. ;;; Emitting code for GET-SYSTEM. ;;; Emitting code for GET-SYSTEM. ;;; Emitting code for UNDEFSYSTEM. ;;; Emitting code for DEFINED-SYSTEMS. ;;; Emitting code for #:G35. ;;; Emitting code for DEFINED-NAMES-AND-SYSTEMS. ;;; Emitting code for NEW-APPEND-DIRECTORIES. ;;; Emitting code for #:G59. ;;; Emitting code for DIRECTORY-TO-LIST. ;;; Emitting code for TEST-NEW-APPEND-DIRECTORIES. ;;; Emitting code for APPEND-DIRECTORIES. ;;; Emitting code for PATHNAME-LOGICAL-P. ;;; Emitting code for #:G82. ;;; Emitting code for NAMESTRING-PROBABLY-LOGICAL. ;;; Emitting code for APPEND-LOGICAL-PNAMES. ;;; Emitting code for NEW-FILE-TYPE. ;;; Emitting code for MAKE-TOPOLOGICAL-SORT-NODE. ;;; Emitting code for MAKE-COMPONENT. ;;; Emitting code for #:G96. ;;; Emitting code for #:G97. ;;; Emitting code for #:G98. ;;; Emitting code for #:G99. ;;; Emitting code for MAKE-FOREIGN-SYSTEM. ;;; Emitting code for #:G117. ;;; Emitting code for #:G118. ;;; Emitting code for #:G119. ;;; Emitting code for #:G120. ;;; Emitting code for REGISTER-FOREIGN-SYSTEM. ;;; Emitting code for #:G143. ;;; Emitting code for #:G144. ;;; Emitting code for #:G145. ;;; Emitting code for #:G146. ;;; Emitting code for #:G147. ;;; Emitting code for #:G148. ;;; Emitting code for COMPONENT-LOAD-TIME. ;;; Emitting code for COMPONENT-LOAD-TIME. ;;; Emitting code for COMPUTE-SYSTEM-PATH. ;;; Emitting code for SYSTEM-DEFINITION-PATHNAME. ;;; Emitting code for #:G161. ;;; Emitting code for FIND-SYSTEM. ;;; Emitting code for PRINT-COMPONENT. ;;; Emitting code for DESCRIBE-SYSTEM. ;;; Emitting code for CANONICALIZE-COMPONENT-NAME. ;;; Emitting code for COMPONENT-PATHNAME. ;;; Emitting code for COMPONENT-ERROR-PATHNAME. ;;; Emitting code for COMPONENT-PATHNAME. ;;; Emitting code for COMPONENT-ROOT-DIR. ;;; Emitting code for COMPONENT-ROOT-DIR. ;;; Emitting code for CLEAR-FULL-PATHNAME-TABLES. ;;; Emitting code for COMPONENT-FULL-PATHNAME. ;;; Emitting code for COMPONENT-FULL-PATHNAME-I. ;;; Emitting code for TRANSLATE-VERSION. ;;; Emitting code for COMPONENT-EXTENSION. ;;; Emitting code for COMPONENT-EXTENSION. ;;; Emitting code for CREATE-COMPONENT. ;;; Emitting code for PREPROCESS-COMPONENT-DEFINITION. ;;; Emitting code for DEFSYSTEM. ;;; Emitting code for CREATE-COMPONENT-PATHNAMES. ;;; Emitting code for GENERATE-COMPONENT-PATHNAME. ;;; Emitting code for EXPAND-COMPONENT-COMPONENTS. ;;; Emitting code for EXPAND-COMPONENT-DEFINITIONS. ;;; Emitting code for EXPAND-SERIAL-COMPONENT-CHAIN. ;;; Emitting code for ABSOLUTE-FILE-NAMESTRING-P. ;;; Emitting code for EXPAND-COMPONENT-DEFINITION. ;;; Emitting code for LINK-COMPONENT-DEPENDS-ON. ;;; Emitting code for #:G476. ;;; Emitting code for TOPOLOGICAL-SORT. ;;; Emitting code for DFS-VISIT. ;;; Emitting code for SPLIT-STRING. ;;; Emitting code for PROMPT-STRING. ;;; Emitting code for FORMAT-JUSTIFIED-STRING. ;;; Emitting code for TELL-USER. ;;; Emitting code for TELL-USER-DONE. ;;; Emitting code for WITH-TELL-USER. ;;; Emitting code for TELL-USER-NO-FILES. ;;; Emitting code for TELL-USER-REQUIRE-SYSTEM. ;;; Emitting code for TELL-USER-GENERIC. ;;; Emitting code for INTERNAL-REAL-TIME-IN-SECONDS. ;;; Emitting code for READ-CHAR-WAIT. ;;; Emitting code for Y-OR-N-P-WAIT. ;;; Emitting code for WITH-SPECIAL-COMPONENT-VARS. ;;; Emitting code for OPERATE-ON-SYSTEM. ;;; Emitting code for COMPILE-SYSTEM. ;;; Emitting code for LOAD-SYSTEM. ;;; Emitting code for CLEAN-SYSTEM. ;;; Emitting code for EDIT-SYSTEM. ;;; Emitting code for HARDCOPY-SYSTEM. ;;; Emitting code for ENSURE-EXTERNAL-SYSTEM-DEF-LOADED. ;;; Emitting code for OPERATE-ON-COMPONENT. ;;; Emitting code for OPERATE-ON-SYSTEM-DEPENDENCIES. ;;; Emitting code for MODULE-DEPENDS-ON-CHANGED. ;;; Emitting code for OPERATE-ON-COMPONENTS. ;;; Emitting code for NEW-REQUIRE. ;;; Emitting code for #:G660. ;;; Emitting code for #:G661. ;;; Emitting code for CMUCL-MK-DEFSYSTEM-MODULE-PROVIDER. ;;; Emitting code for FIND-LANGUAGE. ;;; Emitting code for MAKE-LANGUAGE. ;;; Emitting code for PRINT-LANGUAGE. ;;; Emitting code for COMPILE-FUNCTION. ;;; Emitting code for LOAD-FUNCTION. ;;; Emitting code for DEFAULT-SOURCE-EXTENSION. ;;; Emitting code for DEFAULT-BINARY-EXTENSION. ;;; Emitting code for DEFINE-LANGUAGE. ;;; Emitting code for SCHEME-COMPILE-FILE. ;;; Emitting code for RUN-UNIX-PROGRAM. ;;; Emitting code for RUN-SHELL-COMMAND. ;;; Emitting code for DEFAULT-OUTPUT-PATHNAME. ;;; Emitting code for RUN-COMPILER. ;;; Emitting code for MAKE-USEABLE-STREAM. ;;; Emitting code for C-COMPILE-FILE. ;;; Emitting code for MAP-OPTIONS. ;;; Emitting code for #:G704. ;;; Emitting code for #:G701. ;;; Emitting code for FORTRAN-COMPILE-FILE. ;;; Emitting code for BUILD-LIB. ;;; Emitting code for COMPILE-AND-LOAD-OPERATION. ;;; Emitting code for UNMUNGE-LUCID. ;;; Emitting code for COMPILE-FILE-OPERATION. ;;; Emitting code for COMPILED-FILE-P. ;;; Emitting code for NEEDS-COMPILATION. ;;; Emitting code for NEEDS-LOADING. ;;; Emitting code for LOAD-FILE-OPERATION. ;;; Emitting code for DELETE-BINARIES-OPERATION. ;;; Emitting code for BINARY-EXISTS. ;;; Emitting code for COMPILE-AND-LOAD-SOURCE-IF-NO-BINARY. ;;; Emitting code for LOAD-SOURCE-IF-NO-BINARY. ;;; Emitting code for FILES-WHICH-NEED-COMPILATION. ;;; Emitting code for #:G838. ;;; Emitting code for FILES-IN-SYSTEM-AND-DEPENDENTS. ;;; Emitting code for FILES-IN-SYSTEM. ;;; Emitting code for FILE-PATHNAMES-IN-COMPONENT. ;;; Emitting code for #:G850. ;;; Emitting code for FILE-COMPONENTS-IN-COMPONENT. ;;; Emitting code for #:G867. ;;; Emitting code for SYSTEM-SOURCE-SIZE. ;;; Emitting code for FILE-LIST-SIZE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/defsystem.c -o ext/defsystem.o ;;; Finished compiling EXT:DEFSYSTEM;DEFSYSTEM.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitqojRQ1.c -o eclinitqojRQ1.o ;;; Note: ;;; Invoking external command: ;;; ar cr libdefsystem.a eclinitqojRQ1.o ext/defsystem.o ;;; Note: ;;; Invoking external command: ;;; ranlib libdefsystem.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinit80G1HE.c -o eclinit80G1HE.o ;;; Note: ;;; Invoking external command: ;;; gcc -o defsystem.fas -L/<>/build/ /<>/build/eclinit80G1HE.o ext/defsystem.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:asdf;asdf.lisp" :output-file #P"BUILD:EXT;ASDF.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:ASDF;ASDF.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN FIND-PACKAGE* ...). ;;; Compiling (DEFUN FIND-SYMBOL* ...). ;;; Compiling (DEFUN SYMBOL-CALL ...). ;;; Compiling (DEFUN INTERN* ...). ;;; Compiling (DEFUN EXPORT* ...). ;;; Compiling (DEFUN IMPORT* ...). ;;; Compiling (DEFUN SHADOWING-IMPORT* ...). ;;; Compiling (DEFUN SHADOW* ...). ;;; Compiling (DEFUN MAKE-SYMBOL* ...). ;;; Compiling (DEFUN UNINTERN* ...). ;;; Compiling (DEFUN SYMBOL-SHADOWING-P ...). ;;; Compiling (DEFUN HOME-PACKAGE-P ...). ;;; Compiling (DEFUN SYMBOL-PACKAGE-NAME ...). ;;; Compiling (DEFUN STANDARD-COMMON-LISP-SYMBOL-P ...). ;;; Compiling (DEFUN REIFY-PACKAGE ...). ;;; Compiling (DEFUN UNREIFY-PACKAGE ...). ;;; Compiling (DEFUN REIFY-SYMBOL ...). ;;; Compiling (DEFUN UNREIFY-SYMBOL ...). ;;; Compiling (DEFVAR *ALL-PACKAGE-HAPPINESS* ...). ;;; Compiling (DEFVAR *ALL-PACKAGE-FISHINESS* ...). ;;; Compiling (DEFUN RECORD-FISHY ...). ;;; Compiling (DEFMACRO WHEN-PACKAGE-FISHINESS ...). ;;; Compiling (DEFMACRO NOTE-PACKAGE-FISHINESS ...). ;;; Compiling (DEFUN SET-DUMMY-SYMBOL ...). ;;; Compiling (DEFUN MAKE-DUMMY-SYMBOL ...). ;;; Compiling (DEFUN DUMMY-SYMBOL ...). ;;; Compiling (DEFUN GET-DUMMY-SYMBOL ...). ;;; Compiling (DEFUN NUKE-SYMBOL-IN-PACKAGE ...). ;;; Compiling (DEFUN NUKE-SYMBOL ...). ;;; Note: ;;; in file ASDF.LISP, position 10476 ;;; at (DEFUN NUKE-SYMBOL ...) ;;; Checking type of #:LET50 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 10476 ;;; at (DEFUN NUKE-SYMBOL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST ;;; Compiling (DEFUN REHOME-SYMBOL ...). ;;; Compiling (DEFUN ENSURE-PACKAGE-UNUSED ...). ;;; Note: ;;; in file ASDF.LISP, position 10476 ;;; at (DEFUN ENSURE-PACKAGE-UNUSED ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST55) to be LIST ;;; Compiling (DEFUN DELETE-PACKAGE* ...). ;;; Compiling (DEFUN PACKAGE-NAMES ...). ;;; Compiling (DEFUN PACKAGES-FROM-NAMES ...). ;;; Note: ;;; in file ASDF.LISP, position 10476 ;;; at (DEFUN PACKAGES-FROM-NAMES ...) ;;; Checking type of #:LET72 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 10476 ;;; at (DEFUN PACKAGES-FROM-NAMES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST68) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 10476 ;;; at (DEFUN PACKAGES-FROM-NAMES ...) ;;; Checking type of #:LOOP-LIST-TAIL70 to be CONS ;;; Compiling (DEFUN FRESH-PACKAGE-NAME ...). ;;; Note: ;;; in file ASDF.LISP, position 10476 ;;; at (DEFUN FRESH-PACKAGE-NAME ...) ;;; Checking type of INDEX to be REAL ;;; Compiling (DEFUN RENAME-PACKAGE-AWAY ...). ;;; Compiling (DEFUN PACKAGE-DEFINITION-FORM ...). ;;; Note: ;;; in file ASDF.LISP, position 17523 ;;; at (DEFUN PACKAGE-DEFINITION-FORM ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST141) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 17523 ;;; at (DEFUN PACKAGE-DEFINITION-FORM ...) ;;; Checking type of #:LOOP-LIST-TAIL143 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 17523 ;;; at (DEFUN PACKAGE-DEFINITION-FORM ...) ;;; Checking type of #:LOOP-LIST-TAIL181 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 17523 ;;; at (DEFUN PACKAGE-DEFINITION-FORM ...) ;;; Checking type of #:LET193 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 17523 ;;; at (DEFUN PACKAGE-DEFINITION-FORM ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST189) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 17523 ;;; at (DEFUN PACKAGE-DEFINITION-FORM ...) ;;; Checking type of #:LOOP-LIST-TAIL191 to be CONS ;;; Compiling (DEFUN ENSURE-SHADOWING-IMPORT ...). ;;; Compiling (DEFUN ENSURE-IMPORTED ...). ;;; Compiling (DEFUN ENSURE-IMPORT ...). ;;; Compiling (DEFUN ENSURE-INHERITED ...). ;;; Compiling (DEFUN ENSURE-MIX ...). ;;; Compiling (DEFUN RECYCLE-SYMBOL ...). ;;; Compiling (DEFUN SYMBOL-RECYCLED-P ...). ;;; Compiling (DEFUN ENSURE-SYMBOL ...). ;;; Compiling (DEFUN ENSURE-EXPORTED-TO-USER ...). ;;; Compiling (DEFUN ENSURE-EXPORTED ...). ;;; Compiling (DEFUN ENSURE-EXPORT ...). ;;; Compiling (DEFUN ENSURE-PACKAGE ...). ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET642 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST638) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL640 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET649 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST645) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL647 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET656 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST652) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL654 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET663 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST659) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL661 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET670 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST666) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL668 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET677 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST673) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL675 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET684 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST680) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL682 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET691 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST687) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LOOP-LIST-TAIL689 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST695) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET700 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST698) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET738 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST735) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET744 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST742) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of #:LET752 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 20535 ;;; at (DEFUN ENSURE-PACKAGE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST749) to be LIST ;;; Compiling (DEFUN PARSE-DEFINE-PACKAGE-FORM ...). ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:LET917 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST892) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G918 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G921 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G924 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:LOOP-LIST-TAIL900 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:LOOP-LIST-TAIL902 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G926 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G928 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G930 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G933 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G935 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G937 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G939 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G942 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G944 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 37598 ;;; at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...) ;;; Checking type of #:G947 to be CONS ;;; Compiling (DEFMACRO DEFINE-PACKAGE ...). ;;; Compiling (DEFUN USE-ECL-BYTE-COMPILER-P ...). ;;; Compiling (DEFMACRO LOOP* ...). ;;; Compiling (DEFUN FROB-SUBSTRINGS ...). ;;; Compiling (DEFMACRO COMPATFMT ...). ;;; Compiling (DEFUN UNDEFINE-FUNCTION ...). ;;; Compiling (DEFUN UNDEFINE-FUNCTIONS ...). ;;; Compiling (DEFDEF DEFGENERIC* ...). ;;; Compiling (DEFDEF DEFUN* ...). ;;; Compiling (DEFMACRO WITH-UPGRADABILITY ...). ;;; Note: ;;; in file ASDF.LISP, position 53775 ;;; at (FSET 'WITH-UPGRADABILITY ...) ;;; Checking type of #:LET1067 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 53775 ;;; at (FSET 'WITH-UPGRADABILITY ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1063) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 53775 ;;; at (FSET 'WITH-UPGRADABILITY ...) ;;; Checking type of #:LOOP-LIST-TAIL1065 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 57567 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1116 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 57567 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1112) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 57567 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1114 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1137 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1132) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1134 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1144 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1140) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1142 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1153 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1155 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1148) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1149) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1151 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1165 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1167 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1159) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1160) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1162 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1175 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1170) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1172 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 58291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of N to be REAL ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 59706 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1211 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 59706 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (CDDR #:G1208) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 59706 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G1214 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 59706 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1229 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 59706 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (CDDR #:G1226) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 59706 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G1232 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 62078 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1295 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 62078 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1291) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 62078 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1293 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 62078 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1300 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 62078 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1297) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 62078 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1302 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 62078 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1296) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 68857 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1371 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 68857 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1369) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 68857 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1369) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 75111 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1457 to be VECTOR ;;; Note: ;;; in file ASDF.LISP, position 75111 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-1454) to be FIXNUM ;;; Note: ;;; in file ASDF.LISP, position 75111 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1466 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 75111 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1462) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 75111 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1464 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 77715 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1501 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 77715 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1498) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 80605 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1528 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 80605 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1525) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 80605 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1545 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 80605 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1542) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 93826 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1565 to be REAL ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 113714 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1721 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 113714 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1719) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 136933 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1805 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 136933 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1801) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 136933 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1803 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 159740 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET1935 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 159740 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1931) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 159740 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL1933 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 185508 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL2179 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 185508 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL2192 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 205853 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2345 to be REAL ;;; Note: ;;; in file ASDF.LISP, position 205853 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL2343 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 205853 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2349 to be REAL ;;; Note: ;;; in file ASDF.LISP, position 205853 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2351 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 205853 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2347) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 212859 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL2388 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 226987 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of N to be REAL ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 226987 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2537 to be VECTOR ;;; Note: ;;; in file ASDF.LISP, position 226987 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-2534) to be FIXNUM ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 226987 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2564 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 226987 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2562) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 240888 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2785 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 240888 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (CDDR #:G2784) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 275480 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2868 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 275480 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2870 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 275480 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2863) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 275480 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2864) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 275480 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL2866 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 275480 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2902 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 275480 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2898) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 275480 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL2900 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 285564 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2939 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 285564 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2935) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 285564 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL2937 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 285564 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET2950 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 285564 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2946) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 285564 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL2948 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3058 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3056) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3098 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3094) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3105 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3101) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3103 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G3099 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3129 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:G3125) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3158 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3154) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3156 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3151 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3146) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3148 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3173 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3169) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3171 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3166 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3161) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 314848 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3163 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 335556 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3190 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 335556 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3185) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 335556 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3187 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 352093 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3246 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 358005 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3271 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 358005 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3269) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 372269 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3434 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 379583 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G3713 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 408887 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3865 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 408887 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3861) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 408887 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3863 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3909 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3905) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3907 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3916 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3912) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL3914 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET3948 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST3944) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 416189 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G3949 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 425574 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4091 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 425574 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4087) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 425574 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4089 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 425574 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4122 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 425574 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4118) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 425574 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G4123 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 437258 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4277 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 437258 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4273) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 437258 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4275 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 437258 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4289 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 437258 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4285) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 437258 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4287 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4310 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4307) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4313 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4311) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4358 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4354) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4356 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4364 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4366 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4359) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4360) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4362 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4373 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4369) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4371 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4379 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4381 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4374) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4375) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 440668 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4377 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 453845 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4703 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 453845 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4700) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 453845 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4720 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 453845 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4716) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 453845 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4718 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 455673 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4815 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 455673 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4812) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 455673 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4861 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 455673 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4856) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 455673 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4858 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 455673 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4869 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 455673 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4865) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 455673 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4867 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 463308 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET4925 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 463308 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST4920) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 463308 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4922 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 469483 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL4970 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 471155 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5059 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 471155 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5056) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 486281 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5079 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 486281 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5077) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 486281 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5125 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 486281 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5121) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 486281 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5123 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 486281 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5123 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 506643 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5368 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 506643 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (CDDR #:G5367) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 506643 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5383 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5400 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5396) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5398 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5509 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5505) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5507 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5522 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5518) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5520 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of REGISTERED to be CONS ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5546 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5541) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 508126 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5544 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 529321 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5670 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 529321 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5668) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 529321 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5693 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 529321 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5689) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 529321 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5691 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 534147 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5728 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 534147 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5724) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 534147 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5726 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 542926 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5810 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 542926 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5806) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 542926 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G5813 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 542926 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G5811 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 542926 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5825 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 542926 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5820) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 542926 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5822 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 547763 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5886 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 547763 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5883) to be LIST ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 547763 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5926 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 547763 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5922) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 547763 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5924 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 558291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5970 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 558291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5966) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 558291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5968 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 558291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET5975 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 558291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5971) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 558291 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL5973 to be CONS ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Compiling (WITH-UPGRADABILITY NIL ...). ;;; Note: ;;; in file ASDF.LISP, position 562282 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:G6019 to be CONS ;;; Note: ;;; in file ASDF.LISP, position 570735 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LET6034 to be LIST ;;; Note: ;;; in file ASDF.LISP, position 570735 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST6030) to be LIST ;;; Note: ;;; in file ASDF.LISP, position 570735 ;;; at (WITH-UPGRADABILITY NIL ...) ;;; Checking type of #:LOOP-LIST-TAIL6032 to be CONS ;;; End of Pass 1. ;;; Emitting code for FIND-PACKAGE*. ;;; Emitting code for FIND-SYMBOL*. ;;; Emitting code for SYMBOL-CALL. ;;; Emitting code for INTERN*. ;;; Emitting code for EXPORT*. ;;; Emitting code for IMPORT*. ;;; Emitting code for SHADOWING-IMPORT*. ;;; Emitting code for SHADOW*. ;;; Emitting code for MAKE-SYMBOL*. ;;; Emitting code for UNINTERN*. ;;; Emitting code for SYMBOL-SHADOWING-P. ;;; Emitting code for HOME-PACKAGE-P. ;;; Emitting code for SYMBOL-PACKAGE-NAME. ;;; Emitting code for STANDARD-COMMON-LISP-SYMBOL-P. ;;; Emitting code for REIFY-PACKAGE. ;;; Emitting code for UNREIFY-PACKAGE. ;;; Emitting code for REIFY-SYMBOL. ;;; Emitting code for UNREIFY-SYMBOL. ;;; Emitting code for UIOP/PACKAGE::RECORD-FISHY. ;;; Emitting code for UIOP/PACKAGE::WHEN-PACKAGE-FISHINESS. ;;; Emitting code for UIOP/PACKAGE::NOTE-PACKAGE-FISHINESS. ;;; Emitting code for UIOP/PACKAGE::SET-DUMMY-SYMBOL. ;;; Emitting code for UIOP/PACKAGE::MAKE-DUMMY-SYMBOL. ;;; Emitting code for UIOP/PACKAGE::DUMMY-SYMBOL. ;;; Emitting code for UIOP/PACKAGE::GET-DUMMY-SYMBOL. ;;; Emitting code for NUKE-SYMBOL-IN-PACKAGE. ;;; Emitting code for NUKE-SYMBOL. ;;; Emitting code for REHOME-SYMBOL. ;;; Emitting code for ENSURE-PACKAGE-UNUSED. ;;; Emitting code for DELETE-PACKAGE*. ;;; Emitting code for PACKAGE-NAMES. ;;; Emitting code for PACKAGES-FROM-NAMES. ;;; Emitting code for FRESH-PACKAGE-NAME. ;;; Emitting code for RENAME-PACKAGE-AWAY. ;;; Emitting code for PACKAGE-DEFINITION-FORM. ;;; Emitting code for UIOP/PACKAGE::IMPORT-OPTIONS. ;;; Emitting code for UIOP/PACKAGE::WHEN-RELEVANT. ;;; Emitting code for UIOP/PACKAGE::TABLE-KEYS. ;;; Emitting code for UIOP/PACKAGE::SORT-NAMES. ;;; Emitting code for UIOP/PACKAGE::ENSURE-SHADOWING-IMPORT. ;;; Emitting code for UIOP/PACKAGE::ENSURE-IMPORTED. ;;; Emitting code for UIOP/PACKAGE::ENSURE-IMPORT. ;;; Emitting code for UIOP/PACKAGE::ENSURE-INHERITED. ;;; Emitting code for UIOP/PACKAGE::ENSURE-MIX. ;;; Emitting code for UIOP/PACKAGE::RECYCLE-SYMBOL. ;;; Emitting code for UIOP/PACKAGE::SYMBOL-RECYCLED-P. ;;; Emitting code for UIOP/PACKAGE::ENSURE-SYMBOL. ;;; Emitting code for UIOP/PACKAGE::ENSURE-EXPORTED-TO-USER. ;;; Emitting code for UIOP/PACKAGE::ENSURE-EXPORTED. ;;; Emitting code for UIOP/PACKAGE::ENSURE-EXPORT. ;;; Emitting code for ENSURE-PACKAGE. ;;; Emitting code for #:G701. ;;; Emitting code for PARSE-DEFINE-PACKAGE-FORM. ;;; Emitting code for DEFINE-PACKAGE. ;;; Emitting code for USE-ECL-BYTE-COMPILER-P. ;;; Emitting code for LOOP*. ;;; Emitting code for FROB-SUBSTRINGS. ;;; Emitting code for COMPATFMT. ;;; Emitting code for UIOP/COMMON-LISP::RECURSE. ;;; Emitting code for UIOP/COMMON-LISP::EMIT-SUBSTRING. ;;; Emitting code for UIOP/COMMON-LISP::EMIT-STRING. ;;; Emitting code for UNDEFINE-FUNCTION. ;;; Emitting code for UNDEFINE-FUNCTIONS. ;;; Emitting code for DEFGENERIC*. ;;; Emitting code for DEFUN*. ;;; Emitting code for WITH-UPGRADABILITY. ;;; Emitting code for UIOP-DEBUG. ;;; Emitting code for LOAD-UIOP-DEBUG-UTILITY. ;;; Emitting code for #:G1089. ;;; Emitting code for NEST. ;;; Emitting code for IF-LET. ;;; Emitting code for #:G1096. ;;; Emitting code for WHILE-COLLECTING. ;;; Emitting code for APPENDF. ;;; Emitting code for LENGTH=N-P. ;;; Emitting code for ENSURE-LIST. ;;; Emitting code for #:G1135. ;;; Emitting code for #:G1163. ;;; Emitting code for #:G1173. ;;; Emitting code for #:G1181. ;;; Emitting code for REMOVE-PLIST-KEY. ;;; Emitting code for REMOVE-PLIST-KEYS. ;;; Emitting code for EMPTYP. ;;; Emitting code for CHARACTER-TYPE-INDEX. ;;; Emitting code for BASE-STRING-P. ;;; Emitting code for STRINGS-COMMON-ELEMENT-TYPE. ;;; Emitting code for REDUCE/STRCAT. ;;; Emitting code for STRCAT. ;;; Emitting code for FIRST-CHAR. ;;; Emitting code for LAST-CHAR. ;;; Emitting code for SPLIT-STRING. ;;; Emitting code for STRING-PREFIX-P. ;;; Emitting code for STRING-SUFFIX-P. ;;; Emitting code for STRING-ENCLOSED-P. ;;; Emitting code for STRIPLN. ;;; Emitting code for STANDARD-CASE-SYMBOL-NAME. ;;; Emitting code for FIND-STANDARD-CASE-SYMBOL. ;;; Emitting code for UIOP/UTILITY::CONSIDER. ;;; Emitting code for UIOP/UTILITY::DONE. ;;; Emitting code for UIOP/UTILITY::SEPARATORP. ;;; Emitting code for UIOP/UTILITY::C. ;;; Emitting code for STAMP<. ;;; Emitting code for STAMPS<. ;;; Emitting code for STAMP*<. ;;; Emitting code for STAMP<=. ;;; Emitting code for EARLIER-STAMP. ;;; Emitting code for STAMPS-EARLIEST. ;;; Emitting code for EARLIEST-STAMP. ;;; Emitting code for LATER-STAMP. ;;; Emitting code for STAMPS-LATEST. ;;; Emitting code for LATEST-STAMP. ;;; Emitting code for LATEST-STAMP-F. ;;; Emitting code for #:G1377. ;;; Emitting code for ENSURE-FUNCTION. ;;; Emitting code for ACCESS-AT. ;;; Emitting code for ACCESS-AT-COUNT. ;;; Emitting code for CALL-FUNCTION. ;;; Emitting code for CALL-FUNCTIONS. ;;; Emitting code for REGISTER-HOOK-FUNCTION. ;;; Emitting code for #:G1388. ;;; Emitting code for #:G1389. ;;; Emitting code for UIOP/UTILITY::ACCESS. ;;; Emitting code for COERCE-CLASS. ;;; Emitting code for ENSURE-GETHASH. ;;; Emitting code for LIST-TO-HASH-SET. ;;; Emitting code for UNPARSE-VERSION. ;;; Emitting code for PARSE-VERSION. ;;; Emitting code for LEXICOGRAPHIC<. ;;; Emitting code for LEXICOGRAPHIC<=. ;;; Emitting code for VERSION<. ;;; Emitting code for VERSION<=. ;;; Emitting code for VERSION-COMPATIBLE-P. ;;; Emitting code for MATCH-CONDITION-P. ;;; Emitting code for MATCH-ANY-CONDITION-P. ;;; Emitting code for CALL-WITH-MUFFLED-CONDITIONS. ;;; Emitting code for WITH-MUFFLED-CONDITIONS. ;;; Emitting code for #:G1489. ;;; Emitting code for #:G1493. ;;; Emitting code for #:G1502. ;;; Emitting code for FEATUREP. ;;; Emitting code for OS-MACOSX-P. ;;; Emitting code for OS-UNIX-P. ;;; Emitting code for OS-WINDOWS-P. ;;; Emitting code for OS-GENERA-P. ;;; Emitting code for UIOP/OS::OS-OLDMAC-P. ;;; Emitting code for DETECT-OS. ;;; Emitting code for OS-COND. ;;; Emitting code for GETENV. ;;; Emitting code for GETENV. ;;; Emitting code for GETENVP. ;;; Emitting code for UIOP/OS::FIRST-FEATURE. ;;; Emitting code for IMPLEMENTATION-TYPE. ;;; Emitting code for OPERATING-SYSTEM. ;;; Emitting code for ARCHITECTURE. ;;; Emitting code for LISP-VERSION-STRING. ;;; Emitting code for IMPLEMENTATION-IDENTIFIER. ;;; Emitting code for #:G1549. ;;; Emitting code for HOSTNAME. ;;; Emitting code for GETCWD. ;;; Emitting code for CHDIR. ;;; Emitting code for READ-NULL-TERMINATED-STRING. ;;; Emitting code for READ-LITTLE-ENDIAN. ;;; Emitting code for PARSE-FILE-LOCATION-INFO. ;;; Emitting code for PARSE-WINDOWS-SHORTCUT. ;;; Emitting code for #:G1584. ;;; Emitting code for NORMALIZE-PATHNAME-DIRECTORY-COMPONENT. ;;; Emitting code for DENORMALIZE-PATHNAME-DIRECTORY-COMPONENT. ;;; Emitting code for MERGE-PATHNAME-DIRECTORY-COMPONENTS. ;;; Emitting code for MAKE-PATHNAME*. ;;; Emitting code for MAKE-PATHNAME-COMPONENT-LOGICAL. ;;; Emitting code for MAKE-PATHNAME-LOGICAL. ;;; Emitting code for MERGE-PATHNAMES*. ;;; Emitting code for LOGICAL-PATHNAME-P. ;;; Emitting code for PHYSICAL-PATHNAME-P. ;;; Emitting code for PHYSICALIZE-PATHNAME. ;;; Emitting code for NIL-PATHNAME. ;;; Emitting code for WITH-PATHNAME-DEFAULTS. ;;; Emitting code for UIOP/PATHNAME::UNSPECIFIC-HANDLER. ;;; Emitting code for PATHNAME-EQUAL. ;;; Emitting code for ABSOLUTE-PATHNAME-P. ;;; Emitting code for RELATIVE-PATHNAME-P. ;;; Emitting code for HIDDEN-PATHNAME-P. ;;; Emitting code for FILE-PATHNAME-P. ;;; Emitting code for UIOP/PATHNAME::NORMALIZE-COMPONENT. ;;; Emitting code for PATHNAME-DIRECTORY-PATHNAME. ;;; Emitting code for PATHNAME-PARENT-DIRECTORY-PATHNAME. ;;; Emitting code for DIRECTORY-PATHNAME-P. ;;; Emitting code for ENSURE-DIRECTORY-PATHNAME. ;;; Emitting code for UIOP/PATHNAME::CHECK-ONE. ;;; Emitting code for SPLIT-UNIX-NAMESTRING-DIRECTORY-COMPONENTS. ;;; Emitting code for SPLIT-NAME-TYPE. ;;; Emitting code for PARSE-UNIX-NAMESTRING. ;;; Emitting code for UNIX-NAMESTRING. ;;; Emitting code for #:G1667. ;;; Emitting code for UIOP/PATHNAME::ERR. ;;; Emitting code for SUBPATHNAME. ;;; Emitting code for SUBPATHNAME*. ;;; Emitting code for PATHNAME-ROOT. ;;; Emitting code for PATHNAME-HOST-PATHNAME. ;;; Emitting code for ENSURE-ABSOLUTE-PATHNAME. ;;; Emitting code for SUBPATHP. ;;; Emitting code for ENOUGH-PATHNAME. ;;; Emitting code for CALL-WITH-ENOUGH-PATHNAME. ;;; Emitting code for WITH-ENOUGH-PATHNAME. ;;; Emitting code for WILDEN. ;;; Emitting code for RELATIVIZE-DIRECTORY-COMPONENT. ;;; Emitting code for RELATIVIZE-PATHNAME-DIRECTORY. ;;; Emitting code for DIRECTORY-SEPARATOR-FOR-HOST. ;;; Emitting code for DIRECTORIZE-PATHNAME-HOST-DEVICE. ;;; Emitting code for TRANSLATE-PATHNAME*. ;;; Emitting code for #:G1745. ;;; Emitting code for NATIVE-NAMESTRING. ;;; Emitting code for PARSE-NATIVE-NAMESTRING. ;;; Emitting code for TRUENAME*. ;;; Emitting code for SAFE-FILE-WRITE-DATE. ;;; Emitting code for PROBE-FILE*. ;;; Emitting code for DIRECTORY-EXISTS-P. ;;; Emitting code for FILE-EXISTS-P. ;;; Emitting code for DIRECTORY*. ;;; Emitting code for FILTER-LOGICAL-DIRECTORY-RESULTS. ;;; Emitting code for DIRECTORY-FILES. ;;; Emitting code for SUBDIRECTORIES. ;;; Emitting code for COLLECT-SUB*DIRECTORIES. ;;; Emitting code for #:G1765. ;;; Emitting code for #:G1775. ;;; Emitting code for #:G1787. ;;; Emitting code for #:G1809. ;;; Emitting code for #:G1823. ;;; Emitting code for #:G1824. ;;; Emitting code for #:G1834. ;;; Emitting code for #:G1835. ;;; Emitting code for TRUENAMIZE. ;;; Emitting code for RESOLVE-SYMLINKS. ;;; Emitting code for RESOLVE-SYMLINKS*. ;;; Emitting code for #:G1864. ;;; Emitting code for #:G1868. ;;; Emitting code for ENSURE-PATHNAME. ;;; Emitting code for UIOP/FILESYSTEM::REPORT-ERROR. ;;; Emitting code for GET-PATHNAME-DEFAULTS. ;;; Emitting code for CALL-WITH-CURRENT-DIRECTORY. ;;; Emitting code for WITH-CURRENT-DIRECTORY. ;;; Emitting code for INTER-DIRECTORY-SEPARATOR. ;;; Emitting code for SPLIT-NATIVE-PATHNAMES-STRING. ;;; Emitting code for GETENV-PATHNAME. ;;; Emitting code for GETENV-PATHNAMES. ;;; Emitting code for GETENV-ABSOLUTE-DIRECTORY. ;;; Emitting code for GETENV-ABSOLUTE-DIRECTORIES. ;;; Emitting code for LISP-IMPLEMENTATION-DIRECTORY. ;;; Emitting code for LISP-IMPLEMENTATION-PATHNAME-P. ;;; Emitting code for #:G1945. ;;; Emitting code for ENSURE-ALL-DIRECTORIES-EXIST. ;;; Emitting code for DELETE-FILE-IF-EXISTS. ;;; Emitting code for RENAME-FILE-OVERWRITING-TARGET. ;;; Emitting code for DELETE-EMPTY-DIRECTORY. ;;; Emitting code for DELETE-DIRECTORY-TREE. ;;; Emitting code for #:G1958. ;;; Emitting code for UIOP/FILESYSTEM::C. ;;; Emitting code for SETUP-STDIN. ;;; Emitting code for SETUP-STDOUT. ;;; Emitting code for SETUP-STDERR. ;;; Emitting code for ALWAYS-DEFAULT-ENCODING. ;;; Emitting code for DETECT-ENCODING. ;;; Emitting code for DEFAULT-ENCODING-EXTERNAL-FORMAT. ;;; Emitting code for ENCODING-EXTERNAL-FORMAT. ;;; Emitting code for WITH-SAFE-IO-SYNTAX. ;;; Emitting code for CALL-WITH-SAFE-IO-SYNTAX. ;;; Emitting code for SAFE-READ-FROM-STRING. ;;; Emitting code for #:G2008. ;;; Emitting code for CALL-WITH-OUTPUT-FILE. ;;; Emitting code for WITH-OUTPUT-FILE. ;;; Emitting code for UIOP/STREAM::CALL-WITH-OUTPUT. ;;; Emitting code for WITH-OUTPUT. ;;; Emitting code for OUTPUT-STRING. ;;; Emitting code for #:G2052. ;;; Emitting code for CALL-WITH-INPUT-FILE. ;;; Emitting code for WITH-INPUT-FILE. ;;; Emitting code for UIOP/STREAM::CALL-WITH-INPUT. ;;; Emitting code for WITH-INPUT. ;;; Emitting code for INPUT-STRING. ;;; Emitting code for #:G2089. ;;; Emitting code for NULL-DEVICE-PATHNAME. ;;; Emitting code for CALL-WITH-NULL-INPUT. ;;; Emitting code for WITH-NULL-INPUT. ;;; Emitting code for CALL-WITH-NULL-OUTPUT. ;;; Emitting code for WITH-NULL-OUTPUT. ;;; Emitting code for FINISH-OUTPUTS. ;;; Emitting code for FORMAT!. ;;; Emitting code for SAFE-FORMAT!. ;;; Emitting code for #:G2146. ;;; Emitting code for #:G2153. ;;; Emitting code for #:G2157. ;;; Emitting code for COPY-STREAM-TO-STREAM. ;;; Emitting code for CONCATENATE-FILES. ;;; Emitting code for COPY-FILE. ;;; Emitting code for SLURP-STREAM-STRING. ;;; Emitting code for SLURP-STREAM-LINES. ;;; Emitting code for SLURP-STREAM-LINE. ;;; Emitting code for SLURP-STREAM-FORMS. ;;; Emitting code for SLURP-STREAM-FORM. ;;; Emitting code for READ-FILE-STRING. ;;; Emitting code for READ-FILE-LINES. ;;; Emitting code for READ-FILE-LINE. ;;; Emitting code for READ-FILE-FORMS. ;;; Emitting code for READ-FILE-FORM. ;;; Emitting code for SAFE-READ-FILE-LINE. ;;; Emitting code for SAFE-READ-FILE-FORM. ;;; Emitting code for EVAL-INPUT. ;;; Emitting code for EVAL-THUNK. ;;; Emitting code for STANDARD-EVAL-THUNK. ;;; Emitting code for #:G2193. ;;; Emitting code for #:G2194. ;;; Emitting code for #:G2195. ;;; Emitting code for #:G2196. ;;; Emitting code for #:G2197. ;;; Emitting code for #:G2200. ;;; Emitting code for #:G2210. ;;; Emitting code for PRINTLN. ;;; Emitting code for WRITELN. ;;; Emitting code for DEFAULT-TEMPORARY-DIRECTORY. ;;; Emitting code for TEMPORARY-DIRECTORY. ;;; Emitting code for SETUP-TEMPORARY-DIRECTORY. ;;; Emitting code for CALL-WITH-TEMPORARY-FILE. ;;; Emitting code for WITH-TEMPORARY-FILE. ;;; Emitting code for UIOP/STREAM::GET-TEMPORARY-FILE. ;;; Emitting code for ADD-PATHNAME-SUFFIX. ;;; Emitting code for TMPIZE-PATHNAME. ;;; Emitting code for CALL-WITH-STAGING-PATHNAME. ;;; Emitting code for WITH-STAGING-PATHNAME. ;;; Emitting code for #:G2241. ;;; Emitting code for #:BEFORE2304. ;;; Emitting code for QUIT. ;;; Emitting code for DIE. ;;; Emitting code for RAW-PRINT-BACKTRACE. ;;; Emitting code for PRINT-BACKTRACE. ;;; Emitting code for PRINT-CONDITION-BACKTRACE. ;;; Emitting code for FATAL-CONDITION-P. ;;; Emitting code for HANDLE-FATAL-CONDITION. ;;; Emitting code for CALL-WITH-FATAL-CONDITION-HANDLER. ;;; Emitting code for WITH-FATAL-CONDITION-HANDLER. ;;; Emitting code for SHELL-BOOLEAN-EXIT. ;;; Emitting code for #:G2326. ;;; Emitting code for #:G2358. ;;; Emitting code for #:G2330. ;;; Emitting code for #:G2368. ;;; Emitting code for REGISTER-IMAGE-RESTORE-HOOK. ;;; Emitting code for REGISTER-IMAGE-DUMP-HOOK. ;;; Emitting code for CALL-IMAGE-RESTORE-HOOK. ;;; Emitting code for CALL-IMAGE-DUMP-HOOK. ;;; Emitting code for RAW-COMMAND-LINE-ARGUMENTS. ;;; Emitting code for COMMAND-LINE-ARGUMENTS. ;;; Emitting code for ARGV0. ;;; Emitting code for SETUP-COMMAND-LINE-ARGUMENTS. ;;; Emitting code for RESTORE-IMAGE. ;;; Emitting code for #:G2409. ;;; Emitting code for DUMP-IMAGE. ;;; Emitting code for CREATE-IMAGE. ;;; Emitting code for UIOP/RUN-PROGRAM::REQUIRES-ESCAPING-P. ;;; Emitting code for ESCAPE-TOKEN. ;;; Emitting code for UIOP/RUN-PROGRAM::ESCAPE-WINDOWS-TOKEN-WITHIN-DOUBLE-QUOTES. ;;; Emitting code for UIOP/RUN-PROGRAM::EASY-WINDOWS-CHARACTER-P. ;;; Emitting code for ESCAPE-WINDOWS-TOKEN. ;;; Emitting code for UIOP/RUN-PROGRAM::ESCAPE-SH-TOKEN-WITHIN-DOUBLE-QUOTES. ;;; Emitting code for EASY-SH-CHARACTER-P. ;;; Emitting code for ESCAPE-SH-TOKEN. ;;; Emitting code for UIOP/RUN-PROGRAM::ESCAPE-SHELL-TOKEN. ;;; Emitting code for ESCAPE-COMMAND. ;;; Emitting code for ESCAPE-WINDOWS-COMMAND. ;;; Emitting code for ESCAPE-SH-COMMAND. ;;; Emitting code for UIOP/RUN-PROGRAM::ESCAPE-SHELL-COMMAND. ;;; Emitting code for #:G2447. ;;; Emitting code for #:G2457. ;;; Emitting code for #:G2466. ;;; Emitting code for UIOP/RUN-PROGRAM::ISSUE-BACKSLASH. ;;; Emitting code for UIOP/RUN-PROGRAM::ISSUE. ;;; Emitting code for #:G2514. ;;; Emitting code for #:G2561. ;;; Emitting code for UIOP/RUN-PROGRAM::CALL-STREAM-PROCESSOR. ;;; Emitting code for #:G2565. ;;; Emitting code for #:G2566. ;;; Emitting code for #:G2567. ;;; Emitting code for #:G2568. ;;; Emitting code for #:G2569. ;;; Emitting code for #:G2570. ;;; Emitting code for #:G2571. ;;; Emitting code for #:G2572. ;;; Emitting code for #:G2573. ;;; Emitting code for #:G2574. ;;; Emitting code for #:G2575. ;;; Emitting code for #:G2576. ;;; Emitting code for #:G2578. ;;; Emitting code for #:G2577. ;;; Emitting code for #:G2579. ;;; Emitting code for #:G2580. ;;; Emitting code for #:G2581. ;;; Emitting code for #:G2582. ;;; Emitting code for #:G2583. ;;; Emitting code for #:G2584. ;;; Emitting code for #:G2585. ;;; Emitting code for #:G2587. ;;; Emitting code for #:G2586. ;;; Emitting code for #:G2588. ;;; Emitting code for UIOP/RUN-PROGRAM::%CMD-SHELL-PATHNAME. ;;; Emitting code for UIOP/RUN-PROGRAM::%NORMALIZE-COMMAND. ;;; Emitting code for UIOP/RUN-PROGRAM::%ACTIVE-IO-SPECIFIER-P. ;;; Emitting code for UIOP/RUN-PROGRAM::%NORMALIZE-IO-SPECIFIER. ;;; Emitting code for UIOP/RUN-PROGRAM::%INTERACTIVEP. ;;; Emitting code for UIOP/RUN-PROGRAM::%RUN-PROGRAM. ;;; Emitting code for UIOP/RUN-PROGRAM::%PROCESS-INFO-PID. ;;; Emitting code for UIOP/RUN-PROGRAM::%WAIT-PROCESS-RESULT. ;;; Emitting code for UIOP/RUN-PROGRAM::%CHECK-RESULT. ;;; Emitting code for UIOP/RUN-PROGRAM::%CALL-WITH-PROGRAM-IO. ;;; Emitting code for UIOP/RUN-PROGRAM::PLACE-SETTER. ;;; Emitting code for UIOP/RUN-PROGRAM::WITH-PROGRAM-INPUT. ;;; Emitting code for UIOP/RUN-PROGRAM::WITH-PROGRAM-OUTPUT. ;;; Emitting code for UIOP/RUN-PROGRAM::WITH-PROGRAM-ERROR-OUTPUT. ;;; Emitting code for UIOP/RUN-PROGRAM::%USE-RUN-PROGRAM. ;;; Emitting code for UIOP/RUN-PROGRAM::%NORMALIZE-SYSTEM-COMMAND. ;;; Emitting code for UIOP/RUN-PROGRAM::%REDIRECTED-SYSTEM-COMMAND. ;;; Emitting code for UIOP/RUN-PROGRAM::%SYSTEM. ;;; Emitting code for UIOP/RUN-PROGRAM::%USE-SYSTEM. ;;; Emitting code for RUN-PROGRAM. ;;; Emitting code for #:G2589. ;;; Emitting code for #:G2612. ;;; Emitting code for UIOP/RUN-PROGRAM::PROP. ;;; Emitting code for UIOP/RUN-PROGRAM::HARD-CASE. ;;; Emitting code for UIOP/RUN-PROGRAM::EASY-CASE. ;;; Emitting code for UIOP/RUN-PROGRAM::ACTIVITY. ;;; Emitting code for #:G2778. ;;; Emitting code for #:G2796. ;;; Emitting code for UIOP/RUN-PROGRAM::REDIRECT. ;;; Emitting code for #:G2806. ;;; Emitting code for #:G2827. ;;; Emitting code for #:G2837. ;;; Emitting code for UIOP/RUN-PROGRAM::DEFAULT. ;;; Emitting code for #:G2853. ;;; Emitting code for #:BEFORE2655. ;;; Emitting code for #:G2779. ;;; Emitting code for #:G2793. ;;; Emitting code for #:G2829. ;;; Emitting code for #:G2834. ;;; Emitting code for #:G2659. ;;; Emitting code for #:G2662. ;;; Emitting code for #:G2780. ;;; Emitting code for #:G2831. ;;; Emitting code for UIOP/RUN-PROGRAM::RUN-ACTIVITY. ;;; Emitting code for UIOP/RUN-PROGRAM::GET-STREAM. ;;; Emitting code for #:G2790. ;;; Emitting code for GET-OPTIMIZATION-SETTINGS. ;;; Emitting code for PROCLAIM-OPTIMIZATION-SETTINGS. ;;; Emitting code for WITH-OPTIMIZATION-SETTINGS. ;;; Emitting code for CALL-WITH-MUFFLED-COMPILER-CONDITIONS. ;;; Emitting code for WITH-MUFFLED-COMPILER-CONDITIONS. ;;; Emitting code for CALL-WITH-MUFFLED-LOADER-CONDITIONS. ;;; Emitting code for WITH-MUFFLED-LOADER-CONDITIONS. ;;; Emitting code for #:G2925. ;;; Emitting code for CHECK-LISP-COMPILE-WARNINGS. ;;; Emitting code for CHECK-LISP-COMPILE-RESULTS. ;;; Emitting code for #:G2926. ;;; Emitting code for REIFY-SIMPLE-SEXP. ;;; Emitting code for UNREIFY-SIMPLE-SEXP. ;;; Emitting code for REIFY-DEFERRED-WARNINGS. ;;; Emitting code for UNREIFY-DEFERRED-WARNINGS. ;;; Emitting code for RESET-DEFERRED-WARNINGS. ;;; Emitting code for SAVE-DEFERRED-WARNINGS. ;;; Emitting code for WARNINGS-FILE-TYPE. ;;; Emitting code for ENABLE-DEFERRED-WARNINGS-CHECK. ;;; Emitting code for DISABLE-DEFERRED-WARNINGS-CHECK. ;;; Emitting code for WARNINGS-FILE-P. ;;; Emitting code for CHECK-DEFERRED-WARNINGS. ;;; Emitting code for UIOP/LISP-BUILD::CALL-WITH-SAVED-DEFERRED-WARNINGS. ;;; Emitting code for WITH-SAVED-DEFERRED-WARNINGS. ;;; Emitting code for #:G2952. ;;; Emitting code for #:G2988. ;;; Emitting code for #:G2997. ;;; Emitting code for CURRENT-LISP-FILE-PATHNAME. ;;; Emitting code for LOAD-PATHNAME. ;;; Emitting code for LISPIZE-PATHNAME. ;;; Emitting code for COMPILE-FILE-TYPE. ;;; Emitting code for CALL-AROUND-HOOK. ;;; Emitting code for COMPILE-FILE-PATHNAME*. ;;; Emitting code for COMPILE-FILE*. ;;; Emitting code for LOAD*. ;;; Emitting code for LOAD-FROM-STRING. ;;; Emitting code for #:G3030. ;;; Emitting code for UIOP/LISP-BUILD::CHECK-FLAG. ;;; Emitting code for #:G3039. ;;; Emitting code for #:G3031. ;;; Emitting code for #:G3032. ;;; Emitting code for COMBINE-FASLS. ;;; Emitting code for #:G3042. ;;; Emitting code for CONFIGURATION-INHERITANCE-DIRECTIVE-P. ;;; Emitting code for REPORT-INVALID-FORM. ;;; Emitting code for VALIDATE-CONFIGURATION-FORM. ;;; Emitting code for VALIDATE-CONFIGURATION-FILE. ;;; Emitting code for VALIDATE-CONFIGURATION-DIRECTORY. ;;; Emitting code for RESOLVE-RELATIVE-LOCATION. ;;; Emitting code for RESOLVE-ABSOLUTE-LOCATION. ;;; Emitting code for RESOLVE-LOCATION. ;;; Emitting code for LOCATION-DESIGNATOR-P. ;;; Emitting code for LOCATION-FUNCTION-P. ;;; Emitting code for REGISTER-CLEAR-CONFIGURATION-HOOK. ;;; Emitting code for CLEAR-CONFIGURATION. ;;; Emitting code for UPGRADE-CONFIGURATION. ;;; Emitting code for GET-FOLDER-PATH. ;;; Emitting code for XDG-DATA-HOME. ;;; Emitting code for XDG-CONFIG-HOME. ;;; Emitting code for XDG-DATA-DIRS. ;;; Emitting code for XDG-CONFIG-DIRS. ;;; Emitting code for XDG-CACHE-HOME. ;;; Emitting code for XDG-RUNTIME-DIR. ;;; Emitting code for SYSTEM-CONFIG-PATHNAMES. ;;; Emitting code for FILTER-PATHNAME-SET. ;;; Emitting code for XDG-DATA-PATHNAMES. ;;; Emitting code for XDG-CONFIG-PATHNAMES. ;;; Emitting code for FIND-PREFERRED-FILE. ;;; Emitting code for XDG-DATA-PATHNAME. ;;; Emitting code for XDG-CONFIG-PATHNAME. ;;; Emitting code for UIOP/CONFIGURATION::COMPUTE-USER-CACHE. ;;; Emitting code for #:G3043. ;;; Emitting code for #:G3093. ;;; Emitting code for UIOP/CONFIGURATION::RELATIVE-COMPONENT-P. ;;; Emitting code for UIOP/CONFIGURATION::ABSOLUTE-COMPONENT-P. ;;; Emitting code for #:G3149. ;;; Emitting code for #:G3164. ;;; Emitting code for COERCE-PATHNAME. ;;; Emitting code for COMPONENT-NAME-TO-PATHNAME-COMPONENTS. ;;; Emitting code for COMPILE-FILE-KEEPING-OBJECT. ;;; Emitting code for USER-CONFIGURATION-DIRECTORIES. ;;; Emitting code for SYSTEM-CONFIGURATION-DIRECTORIES. ;;; Emitting code for IN-FIRST-DIRECTORY. ;;; Emitting code for IN-USER-CONFIGURATION-DIRECTORY. ;;; Emitting code for IN-SYSTEM-CONFIGURATION-DIRECTORY. ;;; Emitting code for #:G3188. ;;; Emitting code for ASDF-VERSION. ;;; Emitting code for ASDF-MESSAGE. ;;; Emitting code for UPGRADING-P. ;;; Emitting code for DEFPARAMETER*. ;;; Emitting code for WHEN-UPGRADING. ;;; Emitting code for ASDF-UPGRADE-ERROR. ;;; Emitting code for CLEANUP-UPGRADED-ASDF. ;;; Emitting code for UPGRADE-ASDF. ;;; Emitting code for #:G3230. ;;; Emitting code for #:G3231. ;;; Emitting code for #:G3232. ;;; Emitting code for #:G3233. ;;; Emitting code for ASDF/COMPONENT:COMPONENT-FIND-PATH. ;;; Emitting code for #:G3247. ;;; Emitting code for #:G3248. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for ASDF/COMPONENT:COMPUTE-CHILDREN-BY-NAME. ;;; Emitting code for #:G3275. ;;; Emitting code for #:G3288. ;;; Emitting code for #:G3292. ;;; Emitting code for #:G3293. ;;; Emitting code for #:G3294. ;;; Emitting code for #:G3299. ;;; Emitting code for #:G3301. ;;; Emitting code for #:G3302. ;;; Emitting code for #:G3303. ;;; Emitting code for #:G3304. ;;; Emitting code for #:G3305. ;;; Emitting code for ASDF/COMPONENT:SUB-COMPONENTS. ;;; Emitting code for ASDF/COMPONENT::C. ;;; Emitting code for ASDF/COMPONENT::RECURSE. ;;; Emitting code for #:G3314. ;;; Emitting code for ASDF/SYSTEM:RESET-SYSTEM. ;;; Emitting code for #:G3315. ;;; Emitting code for #:G3316. ;;; Emitting code for ASDF/SYSTEM:SYSTEM-SOURCE-DIRECTORY. ;;; Emitting code for ASDF/SYSTEM:SYSTEM-RELATIVE-PATHNAME. ;;; Emitting code for #:G3329. ;;; Emitting code for #:G3333. ;;; Emitting code for #:G3334. ;;; Emitting code for #:G3335. ;;; Emitting code for ASDF/CACHE:SET-ASDF-CACHE-ENTRY. ;;; Emitting code for ASDF/CACHE:UNSET-ASDF-CACHE-ENTRY. ;;; Emitting code for ASDF/CACHE:CONSULT-ASDF-CACHE. ;;; Emitting code for ASDF/CACHE:DO-ASDF-CACHE. ;;; Emitting code for ASDF/CACHE:CALL-WITH-ASDF-CACHE. ;;; Emitting code for ASDF/CACHE:WITH-ASDF-CACHE. ;;; Emitting code for ASDF/CACHE:NORMALIZE-NAMESTRING. ;;; Emitting code for ASDF/CACHE:COMPUTE-FILE-STAMP. ;;; Emitting code for ASDF/CACHE:REGISTER-FILE-STAMP. ;;; Emitting code for ASDF/CACHE:GET-FILE-STAMP. ;;; Emitting code for #:G3366. ;;; Emitting code for #:G3373. ;;; Emitting code for #:G3374. ;;; Emitting code for #:G3375. ;;; Emitting code for #:G3376. ;;; Emitting code for #:G3394. ;;; Emitting code for #:G3395. ;;; Emitting code for #:G3397. ;;; Emitting code for SYSDEF-ERROR. ;;; Emitting code for COERCE-NAME. ;;; Emitting code for PRIMARY-SYSTEM-NAME. ;;; Emitting code for COERCE-FILENAME. ;;; Emitting code for SYSTEM-REGISTERED-P. ;;; Emitting code for REGISTERED-SYSTEMS. ;;; Emitting code for REGISTER-SYSTEM. ;;; Emitting code for ASDF/FIND-SYSTEM::MAKE-PRELOADED-SYSTEM. ;;; Emitting code for SYSDEF-PRELOADED-SYSTEM-SEARCH. ;;; Emitting code for REGISTER-PRELOADED-SYSTEM. ;;; Emitting code for SYSDEF-IMMUTABLE-SYSTEM-SEARCH. ;;; Emitting code for REGISTER-IMMUTABLE-SYSTEM. ;;; Emitting code for CLEAR-SYSTEM. ;;; Emitting code for CLEAR-DEFINED-SYSTEMS. ;;; Emitting code for MAP-SYSTEMS. ;;; Emitting code for #:G3396. ;;; Emitting code for #:G3398. ;;; Emitting code for #:G3472. ;;; Emitting code for ASDF/FIND-SYSTEM::CLEANUP-SYSTEM-DEFINITION-SEARCH-FUNCTIONS. ;;; Emitting code for SEARCH-FOR-SYSTEM-DEFINITION. ;;; Emitting code for PROBE-ASD. ;;; Emitting code for SYSDEF-CENTRAL-REGISTRY-SEARCH. ;;; Emitting code for #:G3662. ;;; Emitting code for #:G3663. ;;; Emitting code for FIND-SYSTEM-IF-BEING-DEFINED. ;;; Emitting code for LOAD-ASD. ;;; Emitting code for ASDF/FIND-SYSTEM::CHECK-NOT-OLD-ASDF-SYSTEM. ;;; Emitting code for LOCATE-SYSTEM. ;;; Emitting code for #:G3705. ;;; Emitting code for #:G3580. ;;; Emitting code for #:G3582. ;;; Emitting code for ASDF/FIND-SYSTEM::TRY. ;;; Emitting code for #:G3583. ;;; Emitting code for #:G3644. ;;; Emitting code for #:G3645. ;;; Emitting code for #:G3646. ;;; Emitting code for #:G3647. ;;; Emitting code for #:G3648. ;;; Emitting code for #:G3664. ;;; Emitting code for #:G3671. ;;; Emitting code for #:G3706. ;;; Emitting code for #:G3670. ;;; Emitting code for #:G3715. ;;; Emitting code for #:G3716. ;;; Emitting code for #:G3717. ;;; Emitting code for #:G3718. ;;; Emitting code for #:G3719. ;;; Emitting code for #:G3720. ;;; Emitting code for #:G3721. ;;; Emitting code for #:G3722. ;;; Emitting code for #:G3723. ;;; Emitting code for #:G3724. ;;; Emitting code for ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME. ;;; Emitting code for ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-SPEC. ;;; Emitting code for #:G3744. ;;; Emitting code for #:G3745. ;;; Emitting code for #:G3746. ;;; Emitting code for #:G3740. ;;; Emitting code for #:G3741. ;;; Emitting code for #:G3742. ;;; Emitting code for #:G3755. ;;; Emitting code for #:G3782. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for #:G3786. ;;; Emitting code for ASDF/OPERATION::%COMPUTE-OPERATIONS-VALUE. ;;; Emitting code for ASDF/OPERATION:MAKE-OPERATION. ;;; Emitting code for #:G3789. ;;; Emitting code for #:G3790. ;;; Emitting code for #:G3791. ;;; Emitting code for #:G3792. ;;; Emitting code for ASDF/ACTION:ACTION-PATH. ;;; Emitting code for ASDF/ACTION:FIND-ACTION. ;;; Emitting code for ASDF/ACTION:DEFINE-CONVENIENCE-ACTION-METHODS. ;;; Emitting code for ASDF/ACTION::NEXT-METHOD. ;;; Emitting code for #:G3827. ;;; Emitting code for #:G3828. ;;; Emitting code for #:G3831. ;;; Emitting code for #:G3832. ;;; Emitting code for #:G3833. ;;; Emitting code for ASDF/ACTION::FORMAT-ACTION. ;;; Emitting code for #:G3847. ;;; Emitting code for #:G3848. ;;; Emitting code for #:G3849. ;;; Emitting code for #:G3850. ;;; Emitting code for CALL-NEXT-METHOD. ;;; Emitting code for #:G3851. ;;; Emitting code for ASDF/ACTION::DOWNWARD-OPERATION-DEPENDS-ON. ;;; Emitting code for #:G3852. ;;; Emitting code for ASDF/ACTION::UPWARD-OPERATION-DEPENDS-ON. ;;; Emitting code for #:G3853. ;;; Emitting code for ASDF/ACTION::SIDEWAY-OPERATION-DEPENDS-ON. ;;; Emitting code for #:G3854. ;;; Emitting code for ASDF/ACTION::SELFWARD-OPERATION-DEPENDS-ON. ;;; Emitting code for #:G3866. ;;; Emitting code for #:G3867. ;;; Emitting code for #:G3869. ;;; Emitting code for #:G3871. ;;; Emitting code for #:G3873. ;;; Emitting code for #:G3874. ;;; Emitting code for #:G3877. ;;; Emitting code for #:G3878. ;;; Emitting code for #:G3879. ;;; Emitting code for #:G3882. ;;; Emitting code for #:G3883. ;;; Emitting code for #:G3884. ;;; Emitting code for #:G3887. ;;; Emitting code for #:G3888. ;;; Emitting code for #:G3889. ;;; Emitting code for #:G3890. ;;; Emitting code for #:G3903. ;;; Emitting code for #:G3917. ;;; Emitting code for ASDF/ACTION:OUTPUT-FILE. ;;; Emitting code for #:G3920. ;;; Emitting code for #:G3922. ;;; Emitting code for #:G3943. ;;; Emitting code for CALL-NEXT-METHOD. ;;; Emitting code for #:G3904. ;;; Emitting code for CALL-NEXT-METHOD. ;;; Emitting code for #:G3921. ;;; Emitting code for #:G3953. ;;; Emitting code for #:G3954. ;;; Emitting code for #:G3955. ;;; Emitting code for #:G3996. ;;; Emitting code for #:G3998. ;;; Emitting code for #:G4011. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for #:G4017. ;;; Emitting code for #:G4018. ;;; Emitting code for #:G4019. ;;; Emitting code for #:G4020. ;;; Emitting code for #:G4021. ;;; Emitting code for #:G4022. ;;; Emitting code for #:G4023. ;;; Emitting code for #:G4025. ;;; Emitting code for #:G4050. ;;; Emitting code for #:G4057. ;;; Emitting code for #:G4058. ;;; Emitting code for #:G4059. ;;; Emitting code for #:G4060. ;;; Emitting code for #:G4063. ;;; Emitting code for #:G4064. ;;; Emitting code for #:G4065. ;;; Emitting code for #:G4066. ;;; Emitting code for #:G4067. ;;; Emitting code for #:G4068. ;;; Emitting code for ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION. ;;; Emitting code for ASDF/LISP-ACTION::REPORT-FILE-P. ;;; Emitting code for ASDF/LISP-ACTION::PERFORM-LISP-WARNINGS-CHECK. ;;; Emitting code for #:G4093. ;;; Emitting code for ASDF/LISP-ACTION:LISP-COMPILATION-OUTPUT-FILES. ;;; Emitting code for #:G4094. ;;; Emitting code for #:G4095. ;;; Emitting code for #:G4096. ;;; Emitting code for #:G4117. ;;; Emitting code for #:G4125. ;;; Emitting code for #:G4080. ;;; Emitting code for #:G4126. ;;; Emitting code for #:G4127. ;;; Emitting code for #:G4128. ;;; Emitting code for #:G4149. ;;; Emitting code for ASDF/LISP-ACTION:PERFORM-LISP-LOAD-FASL. ;;; Emitting code for #:G4158. ;;; Emitting code for #:G4159. ;;; Emitting code for #:G4155. ;;; Emitting code for #:G4156. ;;; Emitting code for #:G4160. ;;; Emitting code for #:G4161. ;;; Emitting code for #:G4162. ;;; Emitting code for #:G4163. ;;; Emitting code for #:G4164. ;;; Emitting code for ASDF/LISP-ACTION:PERFORM-LISP-LOAD-SOURCE. ;;; Emitting code for #:G4166. ;;; Emitting code for #:G4167. ;;; Emitting code for #:G4165. ;;; Emitting code for #:G4168. ;;; Emitting code for #:G4169. ;;; Emitting code for #:G4170. ;;; Emitting code for #:G4171. ;;; Emitting code for #:G4244. ;;; Emitting code for #:G4246. ;;; Emitting code for ASDF/PLAN:NODE-FOR. ;;; Emitting code for ASDF/PLAN:ACTION-ALREADY-DONE-P. ;;; Emitting code for #:G4247. ;;; Emitting code for #:G4260. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for ASDF/PLAN:NORMALIZE-FORCED-SYSTEMS. ;;; Emitting code for ASDF/PLAN::NORMALIZE-FORCED-NOT-SYSTEMS. ;;; Emitting code for ASDF/PLAN::ACTION-OVERRIDE-P. ;;; Emitting code for #:G4292. ;;; Emitting code for #:G4293. ;;; Emitting code for #:G4294. ;;; Emitting code for #:G4295. ;;; Emitting code for #:G4290. ;;; Emitting code for #:G4291. ;;; Emitting code for #:G4296. ;;; Emitting code for #:G4297. ;;; Emitting code for #:G4298. ;;; Emitting code for #:G4299. ;;; Emitting code for #:G4300. ;;; Emitting code for ASDF/PLAN:MAP-DIRECT-DEPENDENCIES. ;;; Emitting code for ASDF/PLAN:REDUCE-DIRECT-DEPENDENCIES. ;;; Emitting code for ASDF/PLAN:DIRECT-DEPENDENCIES. ;;; Emitting code for #:G4350. ;;; Emitting code for #:G4316. ;;; Emitting code for #:G4351. ;;; Emitting code for #:G4426. ;;; Emitting code for #:G4446. ;;; Emitting code for #:G4450. ;;; Emitting code for #:G4451. ;;; Emitting code for #:G4516. ;;; Emitting code for #:G4530. ;;; Emitting code for ASDF/PLAN:WHILE-VISITING-ACTION. ;;; Emitting code for #:G4650. ;;; Emitting code for #:G4531. ;;; Emitting code for ASDF/PLAN::VISIT-ACTION. ;;; Emitting code for #:G4665. ;;; Emitting code for #:G4651. ;;; Emitting code for #:G4666. ;;; Emitting code for #:G4667. ;;; Emitting code for #:G4668. ;;; Emitting code for #:G4681. ;;; Emitting code for #:G4687. ;;; Emitting code for #:G4688. ;;; Emitting code for #:G4689. ;;; Emitting code for #:G4690. ;;; Emitting code for #:G4691. ;;; Emitting code for #:G4694. ;;; Emitting code for #:G4699. ;;; Emitting code for #:G4706. ;;; Emitting code for #:G4707. ;;; Emitting code for #:G4795. ;;; Emitting code for #:G4806. ;;; Emitting code for #:G4811. ;;; Emitting code for #:G4818. ;;; Emitting code for #:G4819. ;;; Emitting code for #:G4820. ;;; Emitting code for #:G4821. ;;; Emitting code for #:G4854. ;;; Emitting code for #:G4862. ;;; Emitting code for #:G4872. ;;; Emitting code for #:G4873. ;;; Emitting code for #:G4874. ;;; Emitting code for #:G4879. ;;; Emitting code for #:G4899. ;;; Emitting code for #:G4903. ;;; Emitting code for OOS. ;;; Emitting code for CALL-NEXT-METHOD. ;;; Emitting code for #:G4883. ;;; Emitting code for #:G4886. ;;; Emitting code for #:G4919. ;;; Emitting code for #:G4926. ;;; Emitting code for MAKE. ;;; Emitting code for LOAD-SYSTEM. ;;; Emitting code for LOAD-SYSTEMS*. ;;; Emitting code for LOAD-SYSTEMS. ;;; Emitting code for COMPILE-SYSTEM. ;;; Emitting code for TEST-SYSTEM. ;;; Emitting code for COMPONENT-LOADED-P. ;;; Emitting code for ALREADY-LOADED-SYSTEMS. ;;; Emitting code for REQUIRE-SYSTEM. ;;; Emitting code for #:G4930. ;;; Emitting code for #:G4931. ;;; Emitting code for #:G4934. ;;; Emitting code for MODULE-PROVIDE-ASDF. ;;; Emitting code for #:G4937. ;;; Emitting code for ASDF/OPERATE::RESTART-UPGRADED-ASDF. ;;; Emitting code for #:G4981. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS::SET-OUTPUT-TRANSLATIONS. ;;; Emitting code for (SETF ASDF/OUTPUT-TRANSLATIONS:OUTPUT-TRANSLATIONS). ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:OUTPUT-TRANSLATIONS-INITIALIZED-P. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:CLEAR-OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:VALIDATE-OUTPUT-TRANSLATIONS-DIRECTIVE. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:VALIDATE-OUTPUT-TRANSLATIONS-FORM. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:VALIDATE-OUTPUT-TRANSLATIONS-FILE. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:VALIDATE-OUTPUT-TRANSLATIONS-DIRECTORY. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:PARSE-OUTPUT-TRANSLATIONS-STRING. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS::%COMPUTE-DEFAULT-OUTPUT-TRANSLATIONS-VALUE. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:WRAPPING-OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:USER-OUTPUT-TRANSLATIONS-PATHNAME. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:SYSTEM-OUTPUT-TRANSLATIONS-PATHNAME. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:USER-OUTPUT-TRANSLATIONS-DIRECTORY-PATHNAME. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:SYSTEM-OUTPUT-TRANSLATIONS-DIRECTORY-PATHNAME. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:ENVIRONMENT-OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS::INHERIT-OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS::PROCESS-OUTPUT-TRANSLATIONS-DIRECTIVE. ;;; Emitting code for #:G5028. ;;; Emitting code for #:G5029. ;;; Emitting code for #:G5030. ;;; Emitting code for #:G5031. ;;; Emitting code for #:G5032. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:COMPUTE-OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:INITIALIZE-OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:DISABLE-OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:ENSURE-OUTPUT-TRANSLATIONS. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS:APPLY-OUTPUT-TRANSLATIONS. ;;; Emitting code for #:G4987. ;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS::C. ;;; Emitting code for #:G5061. ;;; Emitting code for ASDF/SOURCE-REGISTRY:SOURCE-REGISTRY-INITIALIZED-P. ;;; Emitting code for ASDF/SOURCE-REGISTRY:CLEAR-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:DIRECTORY-ASD-FILES. ;;; Emitting code for ASDF/SOURCE-REGISTRY:COLLECT-ASDS-IN-DIRECTORY. ;;; Emitting code for ASDF/SOURCE-REGISTRY::PROCESS-SOURCE-REGISTRY-CACHE. ;;; Emitting code for ASDF/SOURCE-REGISTRY:COLLECT-SUB*DIRECTORIES-ASD-FILES. ;;; Emitting code for ASDF/SOURCE-REGISTRY:VALIDATE-SOURCE-REGISTRY-DIRECTIVE. ;;; Emitting code for ASDF/SOURCE-REGISTRY:VALIDATE-SOURCE-REGISTRY-FORM. ;;; Emitting code for ASDF/SOURCE-REGISTRY:VALIDATE-SOURCE-REGISTRY-FILE. ;;; Emitting code for ASDF/SOURCE-REGISTRY:VALIDATE-SOURCE-REGISTRY-DIRECTORY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:PARSE-SOURCE-REGISTRY-STRING. ;;; Emitting code for ASDF/SOURCE-REGISTRY:REGISTER-ASD-DIRECTORY. ;;; Emitting code for ASDF/SOURCE-REGISTRY::%COMPUTE-DEFAULT-SOURCE-REGISTRIES-VALUE. ;;; Emitting code for ASDF/SOURCE-REGISTRY:WRAPPING-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:DEFAULT-USER-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:DEFAULT-SYSTEM-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:USER-SOURCE-REGISTRY-DIRECTORY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:SYSTEM-SOURCE-REGISTRY-DIRECTORY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:ENVIRONMENT-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY::INHERIT-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY::PROCESS-SOURCE-REGISTRY-DIRECTIVE. ;;; Emitting code for #:G5175. ;;; Emitting code for #:G5176. ;;; Emitting code for #:G5177. ;;; Emitting code for #:G5178. ;;; Emitting code for #:G5179. ;;; Emitting code for ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:COMPUTE-SOURCE-REGISTRY. ;;; Emitting code for INITIALIZE-SOURCE-REGISTRY. ;;; Emitting code for ASDF/SOURCE-REGISTRY:ENSURE-SOURCE-REGISTRY. ;;; Emitting code for SYSDEF-SOURCE-REGISTRY-SEARCH. ;;; Emitting code for #:G5076. ;;; Emitting code for #:G5080. ;;; Emitting code for #:G5081. ;;; Emitting code for ASDF/SOURCE-REGISTRY::CHECK. ;;; Emitting code for ASDF/SOURCE-REGISTRY::COLLECT. ;;; Emitting code for #:G5191. ;;; Emitting code for #:G5240. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM:DETERMINE-SYSTEM-DIRECTORY. ;;; Emitting code for #:G5260. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM:CLASS-FOR-TYPE. ;;; Emitting code for #:G5264. ;;; Emitting code for #:G5266. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM:SYSDEF-ERROR-COMPONENT. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM:CHECK-COMPONENT-INPUT. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::NORMALIZE-VERSION. ;;; Emitting code for #:G5265. ;;; Emitting code for #:G5267. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::INVALID-PARSE. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::INVALID. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::%COMPUTE-+ASDF-METHODS+-VALUE. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::%REMOVE-COMPONENT-INLINE-METHODS. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::%DEFINE-COMPONENT-INLINE-METHODS. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::%REFRESH-COMPONENT-INLINE-METHODS. ;;; Emitting code for #:G5300. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::PARSE-DEPENDENCY-DEF. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM::PARSE-DEPENDENCY-DEFS. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM:PARSE-COMPONENT-FORM. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM:REGISTER-SYSTEM-DEFINITION. ;;; Emitting code for ASDF/PARSE-DEFSYSTEM:DEFSYSTEM. ;;; Emitting code for #:G5527. ;;; Emitting code for #:G5540. ;;; Emitting code for #:G5555. ;;; Emitting code for #:G5556. ;;; Emitting code for #:G5557. ;;; Emitting code for #:G5558. ;;; Emitting code for #:G5559. ;;; Emitting code for #:G5560. ;;; Emitting code for #:G5561. ;;; Emitting code for OPERATION-MONOLITHIC-P. ;;; Emitting code for #:G5562. ;;; Emitting code for BUNDLE-PATHNAME-TYPE. ;;; Emitting code for ASDF/BUNDLE::BUNDLE-OUTPUT-FILES. ;;; Emitting code for #:G5573. ;;; Emitting code for #:G5638. ;;; Emitting code for BUNDLABLE-FILE-P. ;;; Emitting code for USER-SYSTEM-P. ;;; Emitting code for DIRECT-DEPENDENCY-FILES. ;;; Emitting code for #:G5671. ;;; Emitting code for ASDF/BUNDLE::SELECT-BUNDLE-OPERATION. ;;; Emitting code for MAKE-BUILD. ;;; Emitting code for BUNDLE-SYSTEM. ;;; Emitting code for ASDF/BUNDLE::COLLECT. ;;; Emitting code for #:G5667. ;;; Emitting code for #:G5694. ;;; Emitting code for #:G5695. ;;; Emitting code for #:G5696. ;;; Emitting code for #:G5697. ;;; Emitting code for #:G5698. ;;; Emitting code for #:G5700. ;;; Emitting code for #:G5701. ;;; Emitting code for #:G5702. ;;; Emitting code for #:G5703. ;;; Emitting code for #:G5699. ;;; Emitting code for #:G5704. ;;; Emitting code for #:G5705. ;;; Emitting code for #:G5706. ;;; Emitting code for #:G5707. ;;; Emitting code for #:G5708. ;;; Emitting code for #:G5709. ;;; Emitting code for #:G5710. ;;; Emitting code for #:G5711. ;;; Emitting code for #:G5718. ;;; Emitting code for #:G5730. ;;; Emitting code for #:G5731. ;;; Emitting code for #:G5732. ;;; Emitting code for ASDF/BUNDLE::X. ;;; Emitting code for #:G5721. ;;; Emitting code for ASDF/BUNDLE::UIOP-LIBRARY-PATHNAME. ;;; Emitting code for ASDF/BUNDLE::ASDF-LIBRARY-PATHNAME. ;;; Emitting code for ASDF/BUNDLE::COMPILER-LIBRARY-PATHNAME. ;;; Emitting code for ASDF/BUNDLE::MAKE-LIBRARY-SYSTEM. ;;; Emitting code for #:G5749. ;;; Emitting code for #:G5764. ;;; Emitting code for ASDF/BUNDLE::HAS-IT-P. ;;; Emitting code for #:G5805. ;;; Emitting code for #:G5826. ;;; Emitting code for #:G5827. ;;; Emitting code for #:G5828. ;;; Emitting code for #:G5829. ;;; Emitting code for #:G5830. ;;; Emitting code for #:G5823. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::INITIAL-PACKAGE-INFERRED-SYSTEMS-TABLE. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::DEFPACKAGE-FORM-P. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::STREAM-DEFPACKAGE-FORM. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::FILE-DEFPACKAGE-FORM. ;;; Emitting code for #:G5865. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::PACKAGE-DEPENDENCIES. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::PACKAGE-DESIGNATOR-NAME. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM:REGISTER-SYSTEM-PACKAGES. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::PACKAGE-NAME-SYSTEM. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::PACKAGE-INFERRED-SYSTEM-FILE-DEPENDENCIES. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::SAME-PACKAGE-INFERRED-SYSTEM-P. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM:SYSDEF-PACKAGE-INFERRED-SYSTEM-SEARCH. ;;; Emitting code for #:G5864. ;;; Emitting code for #:G5866. ;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::DEP. ;;; Emitting code for ASDF/BACKWARD-INTERNALS:LOAD-SYSDEF. ;;; Emitting code for ASDF/BACKWARD-INTERNALS:MAKE-TEMPORARY-PACKAGE. ;;; Emitting code for #:G5931. ;;; Emitting code for ASDF/BACKWARD-INTERFACE:COMPONENT-LOAD-DEPENDENCIES. ;;; Emitting code for #:G5933. ;;; Emitting code for #:G5934. ;;; Emitting code for #:G5935. ;;; Emitting code for #:G5940. ;;; Emitting code for #:G5946. ;;; Emitting code for ASDF/BACKWARD-INTERFACE:SYSTEM-DEFINITION-PATHNAME. ;;; Emitting code for #:G5950. ;;; Emitting code for #:G5951. ;;; Emitting code for #:G5952. ;;; Emitting code for #:G5953. ;;; Emitting code for #:G5932. ;;; Emitting code for ASDF/BACKWARD-INTERFACE:ENABLE-ASDF-BINARY-LOCATIONS-COMPATIBILITY. ;;; Emitting code for #:G5976. ;;; Emitting code for ASDF/BACKWARD-INTERFACE:RUN-SHELL-COMMAND. ;;; Emitting code for #:G5988. ;;; Emitting code for #:G5997. ;;; Emitting code for #:G6018. ;;; Emitting code for #:G6035. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/asdf.c -o ext/asdf.o ;;; Finished compiling EXT:ASDF;ASDF.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitiVGLXO.c -o eclinitiVGLXO.o ;;; Note: ;;; Invoking external command: ;;; ar cr libasdf.a eclinitiVGLXO.o ext/asdf.o ;;; Note: ;;; Invoking external command: ;;; ranlib libasdf.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitWHwLvZ.c -o eclinitWHwLvZ.o ;;; Note: ;;; Invoking external command: ;;; gcc -o asdf.fas -L/<>/build/ /<>/build/eclinitWHwLvZ.o ext/asdf.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:profile;profile.lisp" :output-file #P"BUILD:EXT;PROFILE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:PROFILE;PROFILE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *PROFILE-LOCK* ...). ;;; Compiling (DEFUN GET-BYTES-CONSED ...). ;;; Style warning: ;;; in file PROFILE.LISP, position 2151 ;;; at (DEFUN GET-BYTES-CONSED ...) ;;; ! Variable +WRAP+ was undefined. Compiler assumes it is a global. ;;; Compiling (DEFVAR *PROFILED-FUN-NAME->INFO* ...). ;;; Compiling (DEFSTRUCT (PROFILE-INFO #) ...). ;;; Compiling (DEFVAR *ENCLOSED-TICKS* ...). ;;; Compiling (DEFVAR *ENCLOSED-CONSING* ...). ;;; Compiling (DEFVAR *ENCLOSED-PROFILES* ...). ;;; Compiling (DEFVAR *COMPUTING-PROFILING-DATA-FOR*). ;;; Compiling (DEFSTRUCT (OVERHEAD #) ...). ;;; Compiling (DEFVAR *OVERHEAD*). ;;; Compiling (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...). ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of (+ COUNT #:G36) to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of (+ TICKS #:G57) to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of (+ CONSING #:G64) to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of (+ PROFILES #:G71) to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of (+ OLD-ENCLOSED-TICKS DTICKS) to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of (+ OLD-ENCLOSED-CONSING DCONSING) to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of (+ OLD-ENCLOSED-PROFILES INNER-ENCLOSED-PROFILES 1) to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Note: ;;; in file PROFILE.LISP, position 7201 ;;; at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...) ;;; Checking type of 0 to be COUNTER ;;; Compiling (DEFUN MAPC-ON-NAMED-FUNS ...). ;;; Compiling (DEFUN PROFILE-1-UNPROFILED-FUN ...). ;;; Note: ;;; in file PROFILE.LISP, position 10716 ;;; at (DEFUN PROFILE-1-UNPROFILED-FUN ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK111) to be FIXNUM ;;; Compiling (DEFUN PROFILE-1-FUN ...). ;;; Note: ;;; in file PROFILE.LISP, position 11525 ;;; at (DEFUN PROFILE-1-FUN ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK130) to be FIXNUM ;;; Compiling (DEFUN UNPROFILE-1-FUN ...). ;;; Note: ;;; in file PROFILE.LISP, position 11924 ;;; at (DEFUN UNPROFILE-1-FUN ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK146) to be FIXNUM ;;; Note: ;;; in file PROFILE.LISP, position 11924 ;;; at (DEFUN UNPROFILE-1-FUN ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK162) to be FIXNUM ;;; Compiling (DEFMACRO PROFILE ...). ;;; Compiling (DEFMACRO UNPROFILE ...). ;;; Compiling (DEFUN UNPROFILE-ALL ...). ;;; Note: ;;; in file PROFILE.LISP, position 13635 ;;; at (DEFUN UNPROFILE-ALL ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK194) to be FIXNUM ;;; Style warning: ;;; in file PROFILE.LISP, position 13635 ;;; at (DEFUN UNPROFILE-ALL ...) ;;; ! The variable PROFILE-INFO is not used. ;;; Compiling (DEFUN RESET ...). ;;; Note: ;;; in file PROFILE.LISP, position 13804 ;;; at (DEFUN RESET ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK216) to be FIXNUM ;;; Style warning: ;;; in file PROFILE.LISP, position 13804 ;;; at (DEFUN RESET ...) ;;; ! The variable NAME is not used. ;;; Compiling (DEFSTRUCT (TIME-INFO #) ...). ;;; Compiling (DEFUN COMPENSATE-TIME ...). ;;; Compiling (DEFUN REPORT ...). ;;; Note: ;;; in file PROFILE.LISP, position 15171 ;;; at (DEFUN REPORT ...) ;;; Checking type of (COMPUTE-OVERHEAD) to be OVERHEAD ;;; Note: ;;; in file PROFILE.LISP, position 15171 ;;; at (DEFUN REPORT ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK241) to be FIXNUM ;;; Compiling (DEFUN PRINT-PROFILE-TABLE ...). ;;; Compiling (DEFPARAMETER *TIMER-OVERHEAD-ITERATIONS* ...). ;;; Compiling (DEFUN COMPUTE-OVERHEAD-AUX ...). ;;; Compiling (DEFUN COMPUTE-OVERHEAD ...). ;;; Note: ;;; in file PROFILE.LISP, position 20145 ;;; at (DEFUN COMPUTE-OVERHEAD ...) ;;; Checking type of #:LET294 to be FUNCTION ;;; Note: ;;; in file PROFILE.LISP, position 20145 ;;; at (DEFUN COMPUTE-OVERHEAD ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK302) to be FIXNUM ;;; Compiling (DEFUN PROFILE-DEINIT ...). ;;; End of Pass 1. ;;; Emitting code for GET-BYTES-CONSED. ;;; Emitting code for MAKE-PROFILE-INFO. ;;; Emitting code for MAKE-OVERHEAD. ;;; Emitting code for PROFILE-ENCAPSULATION-LAMBDAS. ;;; Emitting code for #:G34. ;;; Emitting code for #:G95. ;;; Emitting code for #:G96. ;;; Emitting code for MAPC-ON-NAMED-FUNS. ;;; Emitting code for PROFILE-1-UNPROFILED-FUN. ;;; Emitting code for PROFILE-1-FUN. ;;; Emitting code for UNPROFILE-1-FUN. ;;; Emitting code for PROFILE. ;;; Emitting code for UNPROFILE. ;;; Emitting code for UNPROFILE-ALL. ;;; Emitting code for RESET. ;;; Emitting code for MAKE-TIME-INFO. ;;; Emitting code for COMPENSATE-TIME. ;;; Emitting code for REPORT. ;;; Emitting code for #:G264. ;;; Emitting code for PRINT-PROFILE-TABLE. ;;; Emitting code for DASHES. ;;; Emitting code for COMPUTE-OVERHEAD-AUX. ;;; Emitting code for COMPUTE-OVERHEAD. ;;; Emitting code for FROB. ;;; Emitting code for PROFILE-DEINIT. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/profile.c -o ext/profile.o ;;; Finished compiling EXT:PROFILE;PROFILE.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitbJDJbb.c -o eclinitbJDJbb.o ;;; Note: ;;; Invoking external command: ;;; ar cr libprofile.a eclinitbJDJbb.o ext/profile.o ;;; Note: ;;; Invoking external command: ;;; ranlib libprofile.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitUTv3Vm.c -o eclinitUTv3Vm.o ;;; Note: ;;; Invoking external command: ;;; gcc -o profile.fas -L/<>/build/ /<>/build/eclinitUTv3Vm.o ext/profile.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:sockets;package.lisp" :output-file #P"BUILD:EXT;PACKAGE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:SOCKETS;PACKAGE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/package.c -o ext/package.o ;;; Finished compiling EXT:SOCKETS;PACKAGE.LISP. ;;; (compile-file "ext:sockets;sockets.lisp" :output-file #P"BUILD:EXT;SOCKETS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:SOCKETS;SOCKETS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFENTRY FF-SOCKET ...). ;;; Compiling (DEFENTRY FF-LISTEN ...). ;;; Compiling (DEFENTRY FF-CLOSE ...). ;;; Compiling (DEFUN SPLIT ...). ;;; Note: ;;; in file SOCKETS.LISP, position 3868 ;;; at (DEFUN SPLIT ...) ;;; Checking type of #:LOOP-LIST-TAIL27 to be CONS ;;; Note: ;;; in file SOCKETS.LISP, position 3868 ;;; at (DEFUN SPLIT ...) ;;; Checking type of (1+ WORD-COUNT) to be FIXNUM ;;; Compiling (DEFCLASS HOST-ENT ...). ;;; Compiling (DEFGENERIC HOST-ENT-ADDRESS ...). ;;; Compiling (DEFMETHOD HOST-ENT-ADDRESS ...). ;;; Compiling (DEFUN GET-HOST-BY-NAME ...). ;;; Compiling (DEFUN GET-HOST-BY-ADDRESS ...). ;;; Compiling (DEFCLASS SOCKET ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...). ;;; Compiling (DEFGENERIC SOCKET-BIND ...). ;;; Compiling (DEFGENERIC SOCKET-ACCEPT ...). ;;; Compiling (DEFGENERIC SOCKET-CONNECT ...). ;;; Compiling (DEFGENERIC SOCKET-PEERNAME ...). ;;; Compiling (DEFGENERIC SOCKET-NAME ...). ;;; Compiling (DEFGENERIC SOCKET-LISTEN ...). ;;; Compiling (DEFGENERIC SOCKET-RECEIVE ...). ;;; Compiling (DEFGENERIC SOCKET-SEND ...). ;;; Compiling (DEFGENERIC SOCKET-CLOSE ...). ;;; Compiling (DEFGENERIC SOCKET-MAKE-STREAM ...). ;;; Compiling (DEFGENERIC NON-BLOCKING-MODE ...). ;;; Compiling (DEFGENERIC (SETF NON-BLOCKING-MODE) ...). ;;; Compiling (DEFGENERIC SOCKET-CLOSE-LOW-LEVEL ...). ;;; Compiling (DEFMETHOD SOCKET-LISTEN ...). ;;; Compiling (DEFMETHOD SOCKET-CLOSE-LOW-LEVEL ...). ;;; Compiling (DEFMETHOD SOCKET-CLOSE ...). ;;; Compiling (DEFMETHOD SOCKET-RECEIVE ...). ;;; Style warning: ;;; in file SOCKETS.LISP, position 17771 ;;; at (DEFMETHOD SOCKET-RECEIVE ...) ;;; ! Variable +EAGAIN+ was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 17771 ;;; at (DEFMETHOD SOCKET-RECEIVE ...) ;;; ! Variable +EINTR+ was undefined. Compiler assumes it is a global. ;;; Compiling (DEFUN GET-PROTOCOL-BY-NAME ...). ;;; Compiling (DEFUN MAKE-INET-ADDRESS ...). ;;; Compiling (DEFCLASS INET-SOCKET ...). ;;; Style warning: ;;; in file SOCKETS.LISP, position 21127 ;;; at (DEFCLASS INET-SOCKET ...) ;;; ! Variable +AF-INET+ was undefined. Compiler assumes it is a global. ;;; Compiling (DEFUN MAKE-INET-SOCKET ...). ;;; Compiling (DEFMETHOD SOCKET-BIND ...). ;;; Compiling (DEFMETHOD SOCKET-ACCEPT ...). ;;; Compiling (DEFMETHOD SOCKET-CONNECT ...). ;;; Compiling (DEFMETHOD SOCKET-PEERNAME ...). ;;; Compiling (DEFMETHOD SOCKET-NAME ...). ;;; Compiling (DEFMETHOD SOCKET-SEND ...). ;;; Compiling (DEFCLASS LOCAL-SOCKET ...). ;;; Style warning: ;;; in file SOCKETS.LISP, position 30795 ;;; at (DEFCLASS LOCAL-SOCKET ...) ;;; ! Variable +AF-LOCAL+ was undefined. Compiler assumes it is a global. ;;; Compiling (DEFMETHOD SOCKET-BIND ...). ;;; Compiling (DEFMETHOD SOCKET-ACCEPT ...). ;;; Compiling (DEFMETHOD SOCKET-CONNECT ...). ;;; Compiling (DEFMETHOD SOCKET-PEERNAME ...). ;;; Compiling (DEFMETHOD NON-BLOCKING-MODE ...). ;;; Compiling (DEFMETHOD (SETF NON-BLOCKING-MODE) ...). ;;; Compiling (DEFUN DUP ...). ;;; Compiling (DEFUN MAKE-STREAM-FROM-FD ...). ;;; Compiling (DEFUN AUTO-CLOSE-TWO-WAY-STREAM ...). ;;; Compiling (DEFUN SOCKET-MAKE-STREAM-INNER ...). ;;; Compiling (DEFMETHOD SOCKET-MAKE-STREAM ...). ;;; Compiling (DEFMETHOD EXT::STREAM-FD ...). ;;; Compiling (DEFINE-CONDITION SOCKET-ERROR ...). ;;; Compiling (DEFMACRO DEFINE-SOCKET-CONDITION ...). ;;; Compiling (DEFPARAMETER *CONDITIONS-FOR-ERRNO* ...). ;;; Style warning: ;;; in file SOCKETS.LISP, position 52014 ;;; at (DEFINE-SOCKET-CONDITION EADDRINUSE ...) ;;; ! Variable EADDRINUSE was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52072 ;;; at (DEFINE-SOCKET-CONDITION EAGAIN ...) ;;; ! Variable EAGAIN was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52123 ;;; at (DEFINE-SOCKET-CONDITION EBADF ...) ;;; ! Variable EBADF was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52181 ;;; at (DEFINE-SOCKET-CONDITION ECONNREFUSED ...) ;;; ! Variable ECONNREFUSED was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52245 ;;; at (DEFINE-SOCKET-CONDITION ETIMEDOUT ...) ;;; ! Variable ETIMEDOUT was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52305 ;;; at (DEFINE-SOCKET-CONDITION EINTR ...) ;;; ! Variable EINTR was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52355 ;;; at (DEFINE-SOCKET-CONDITION EINVAL ...) ;;; ! Variable EINVAL was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52411 ;;; at (DEFINE-SOCKET-CONDITION ENOBUFS ...) ;;; ! Variable ENOBUFS was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52462 ;;; at (DEFINE-SOCKET-CONDITION ENOMEM ...) ;;; ! Variable ENOMEM was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52515 ;;; at (DEFINE-SOCKET-CONDITION EOPNOTSUPP ...) ;;; ! Variable EOPNOTSUPP was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52582 ;;; at (DEFINE-SOCKET-CONDITION EPERM ...) ;;; ! Variable EPERM was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52644 ;;; at (DEFINE-SOCKET-CONDITION EPROTONOSUPPORT ...) ;;; ! Variable EPROTONOSUPPORT was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52715 ;;; at (DEFINE-SOCKET-CONDITION ESOCKTNOSUPPORT ...) ;;; ! Variable ESOCKTNOSUPPORT was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 52789 ;;; at (DEFINE-SOCKET-CONDITION ENETUNREACH ...) ;;; ! Variable ENETUNREACH was undefined. Compiler assumes it is a global. ;;; Compiling (DEFUN CONDITION-FOR-ERRNO ...). ;;; Compiling (DEFUN SOCKET-ERROR ...). ;;; Compiling (DEFVAR *NAME-SERVICE-ERRNO* ...). ;;; Compiling (DEFUN NAME-SERVICE-ERROR ...). ;;; Compiling (DEFINE-CONDITION NAME-SERVICE-ERROR ...). ;;; Compiling (DEFMACRO DEFINE-NAME-SERVICE-CONDITION ...). ;;; Compiling (DEFPARAMETER *CONDITIONS-FOR-NAME-SERVICE-ERRNO* ...). ;;; Style warning: ;;; in file SOCKETS.LISP, position 54893 ;;; at (DEFINE-NAME-SERVICE-CONDITION NETDB_INTERNAL ...) ;;; ! Variable NETDB_INTERNAL was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 54962 ;;; at (DEFINE-NAME-SERVICE-CONDITION NETDB_SUCCESS ...) ;;; ! Variable NETDB_SUCCESS was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 55028 ;;; at (DEFINE-NAME-SERVICE-CONDITION HOST_NOT_FOUND ...) ;;; ! Variable HOST_NOT_FOUND was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 55096 ;;; at (DEFINE-NAME-SERVICE-CONDITION TRY_AGAIN ...) ;;; ! Variable TRY_AGAIN was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 55154 ;;; at (DEFINE-NAME-SERVICE-CONDITION NO_RECOVERY ...) ;;; ! Variable NO_RECOVERY was undefined. Compiler assumes it is a global. ;;; Style warning: ;;; in file SOCKETS.LISP, position 55309 ;;; at (DEFINE-NAME-SERVICE-CONDITION NO_ADDRESS ...) ;;; ! Variable NO_ADDRESS was undefined. Compiler assumes it is a global. ;;; Compiling (DEFUN CONDITION-FOR-NAME-SERVICE-ERRNO ...). ;;; Compiling (DEFUN GET-NAME-SERVICE-ERRNO ...). ;;; Compiling (DEFUN GET-NAME-SERVICE-ERROR-MESSAGE ...). ;;; Compiling (DEFUN GET-SOCKOPT-INT ...). ;;; Compiling (DEFUN GET-SOCKOPT-BOOL ...). ;;; Compiling (DEFUN GET-SOCKOPT-TIMEVAL ...). ;;; Compiling (DEFUN GET-SOCKOPT-LINGER ...). ;;; Compiling (DEFUN SET-SOCKOPT-INT ...). ;;; Compiling (DEFUN SET-SOCKOPT-BOOL ...). ;;; Compiling (DEFUN SET-SOCKOPT-TIMEVAL ...). ;;; Compiling (DEFUN SET-SOCKOPT-LINGER ...). ;;; Compiling (DEFMACRO DEFINE-SOCKOPT ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-TYPE ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-RECEIVE-BUFFER ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-RECEIVE-BUFFER ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-RECEIVE-TIMEOUT ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-RECEIVE-TIMEOUT ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-SEND-TIMEOUT ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-SEND-TIMEOUT ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-REUSE-ADDRESS ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-REUSE-ADDRESS ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-KEEP-ALIVE ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-KEEP-ALIVE ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-DONT-ROUTE ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-DONT-ROUTE ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-LINGER ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-LINGER ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-TCP-NODELAY ...). ;;; Compiling (DEFINE-SOCKOPT SOCKOPT-TCP-NODELAY ...). ;;; End of Pass 1. ;;; Emitting code for FF-SOCKET. ;;; Emitting code for FF-LISTEN. ;;; Emitting code for FF-CLOSE. ;;; Emitting code for SPLIT. ;;; Emitting code for IS-WS. ;;; Emitting code for #:G28. ;;; Emitting code for GET-HOST-BY-NAME. ;;; Emitting code for GET-HOST-BY-ADDRESS. ;;; Emitting code for #:G32. ;;; Emitting code for #:G33. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for #:G48. ;;; Emitting code for #:G59. ;;; Emitting code for #:G60. ;;; Emitting code for #:G67. ;;; Emitting code for #:G71. ;;; Emitting code for GET-PROTOCOL-BY-NAME. ;;; Emitting code for MAKE-INET-ADDRESS. ;;; Emitting code for #:G76. ;;; Emitting code for MAKE-INET-SOCKET. ;;; Emitting code for #:G79. ;;; Emitting code for #:G85. ;;; Emitting code for #:G86. ;;; Emitting code for #:G89. ;;; Emitting code for #:G90. ;;; Emitting code for #:G91. ;;; Emitting code for #:G98. ;;; Emitting code for #:G101. ;;; Emitting code for #:G109. ;;; Emitting code for #:G112. ;;; Emitting code for #:G120. ;;; Emitting code for #:G121. ;;; Emitting code for #:G122. ;;; Emitting code for DUP. ;;; Emitting code for MAKE-STREAM-FROM-FD. ;;; Emitting code for AUTO-CLOSE-TWO-WAY-STREAM. ;;; Emitting code for SOCKET-MAKE-STREAM-INNER. ;;; Emitting code for #:G142. ;;; Emitting code for #:G149. ;;; Emitting code for #:G150. ;;; Emitting code for #:G151. ;;; Emitting code for DEFINE-SOCKET-CONDITION. ;;; Emitting code for CONDITION-FOR-ERRNO. ;;; Emitting code for SOCKET-ERROR. ;;; Emitting code for NAME-SERVICE-ERROR. ;;; Emitting code for #:G174. ;;; Emitting code for #:G175. ;;; Emitting code for DEFINE-NAME-SERVICE-CONDITION. ;;; Emitting code for CONDITION-FOR-NAME-SERVICE-ERRNO. ;;; Emitting code for GET-NAME-SERVICE-ERRNO. ;;; Emitting code for GET-NAME-SERVICE-ERROR-MESSAGE. ;;; Emitting code for GET-SOCKOPT-INT. ;;; Emitting code for GET-SOCKOPT-BOOL. ;;; Emitting code for GET-SOCKOPT-TIMEVAL. ;;; Emitting code for GET-SOCKOPT-LINGER. ;;; Emitting code for SET-SOCKOPT-INT. ;;; Emitting code for SET-SOCKOPT-BOOL. ;;; Emitting code for SET-SOCKOPT-TIMEVAL. ;;; Emitting code for SET-SOCKOPT-LINGER. ;;; Emitting code for DEFINE-SOCKOPT. ;;; Emitting code for SOCKOPT-TYPE. ;;; Emitting code for SOCKOPT-RECEIVE-BUFFER. ;;; Emitting code for (SETF SOCKOPT-RECEIVE-BUFFER). ;;; Emitting code for SOCKOPT-RECEIVE-TIMEOUT. ;;; Emitting code for (SETF SOCKOPT-RECEIVE-TIMEOUT). ;;; Emitting code for SOCKOPT-SEND-TIMEOUT. ;;; Emitting code for (SETF SOCKOPT-SEND-TIMEOUT). ;;; Emitting code for SOCKOPT-REUSE-ADDRESS. ;;; Emitting code for (SETF SOCKOPT-REUSE-ADDRESS). ;;; Emitting code for SOCKOPT-KEEP-ALIVE. ;;; Emitting code for (SETF SOCKOPT-KEEP-ALIVE). ;;; Emitting code for SOCKOPT-DONT-ROUTE. ;;; Emitting code for (SETF SOCKOPT-DONT-ROUTE). ;;; Emitting code for SOCKOPT-LINGER. ;;; Emitting code for (SETF SOCKOPT-LINGER). ;;; Emitting code for SOCKOPT-TCP-NODELAY. ;;; Emitting code for (SETF SOCKOPT-TCP-NODELAY). ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/sockets.c -o ext/sockets.o ;;; Finished compiling EXT:SOCKETS;SOCKETS.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitvZ9U2z.c -o eclinitvZ9U2z.o ;;; Note: ;;; Invoking external command: ;;; ar cr libsockets.a eclinitvZ9U2z.o ext/package.o ext/sockets.o ;;; Note: ;;; Invoking external command: ;;; ranlib libsockets.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitxixseN.c -o eclinitxixseN.o ;;; Note: ;;; Invoking external command: ;;; gcc -o sockets.fas -L/<>/build/ /<>/build/eclinitxixseN.o ext/package.o ext/sockets.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:sockets;sb-bsd-sockets.lisp" :output-file #P"BUILD:EXT;SB-BSD-SOCKETS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:SOCKETS;SB-BSD-SOCKETS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/sb-bsd-sockets.c -o ext/sb-bsd-sockets.o ;;; Finished compiling EXT:SOCKETS;SB-BSD-SOCKETS.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitOorAy0.c -o eclinitOorAy0.o ;;; Note: ;;; Invoking external command: ;;; ar cr libsb-bsd-sockets.a eclinitOorAy0.o ext/sb-bsd-sockets.o ;;; Note: ;;; Invoking external command: ;;; ranlib libsb-bsd-sockets.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitdAPeWd.c -o eclinitdAPeWd.o ;;; Note: ;;; Invoking external command: ;;; gcc -o sb-bsd-sockets.fas -L/<>/build/ /<>/build/eclinitdAPeWd.o ext/sb-bsd-sockets.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:serve-event;serve-event.lisp" :output-file #P"BUILD:EXT;SERVE-EVENT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:SERVE-EVENT;SERVE-EVENT.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFSTRUCT (HANDLER # ...) ...). ;;; Compiling (DEFVAR *DESCRIPTOR-HANDLERS* ...). ;;; Compiling (DEFUN COERCE-TO-DESCRIPTOR ...). ;;; Compiling (DEFUN ADD-FD-HANDLER ...). ;;; Compiling (DEFUN REMOVE-FD-HANDLER ...). ;;; Compiling (DEFMACRO WITH-FD-HANDLER ...). ;;; Compiling (DEFMACRO FD-ZERO ...). ;;; Compiling (DEFMACRO FD-SET ...). ;;; Compiling (DEFMACRO FD-ISSET ...). ;;; Compiling (DEFUN FDSET-SIZE ...). ;;; Compiling (DEFUN SERVE-EVENT ...). ;;; Style warning: ;;; in file SERVE-EVENT.LISP, position 5367 ;;; at (DEFUN SERVE-EVENT ...) ;;; ! Variable +EINTR+ was undefined. Compiler assumes it is a global. ;;; Compiling (DEFUN SERVE-ALL-EVENTS ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-HANDLER. ;;; Emitting code for COERCE-TO-DESCRIPTOR. ;;; Emitting code for ADD-FD-HANDLER. ;;; Emitting code for REMOVE-FD-HANDLER. ;;; Emitting code for WITH-FD-HANDLER. ;;; Emitting code for FD-ZERO. ;;; Emitting code for FD-SET. ;;; Emitting code for FD-ISSET. ;;; Emitting code for FDSET-SIZE. ;;; Emitting code for SERVE-EVENT. ;;; Emitting code for SERVE-ALL-EVENTS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/serve-event.c -o ext/serve-event.o ;;; Finished compiling EXT:SERVE-EVENT;SERVE-EVENT.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitsiqYCr.c -o eclinitsiqYCr.o ;;; Note: ;;; Invoking external command: ;;; ar cr libserve-event.a eclinitsiqYCr.o ext/serve-event.o ;;; Note: ;;; Invoking external command: ;;; ranlib libserve-event.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinit7F0nnF.c -o eclinit7F0nnF.o ;;; Note: ;;; Invoking external command: ;;; gcc -o serve-event.fas -L/<>/build/ /<>/build/eclinit7F0nnF.o ext/serve-event.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:ecl-curl;ecl-curl.lisp" :output-file #P"BUILD:EXT;ECL-CURL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:ECL-CURL;ECL-CURL.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFINE-CONDITION HTTP-TRANSFER-ERROR ...). ;;; Compiling (DEFINE-CONDITION DOWNLOAD-ERROR ...). ;;; Compiling (DEFVAR *STREAM-BUFFER-SIZE* ...). ;;; Compiling (DEFUN COPY-STREAM ...). ;;; Compiling (DEFUN MAKE-STREAM-FROM-URL ...). ;;; Compiling (DEFUN URL-HOST ...). ;;; Compiling (DEFUN URL-PORT ...). ;;; Compiling (DEFPARAMETER *ENCODE-TABLE* ...). ;;; Compiling (DEFUN BASE64-ENCODE ...). ;;; Compiling (DEFVAR *PROXY* ...). ;;; Compiling (DEFVAR *PROXY-USER* ...). ;;; Compiling (DEFVAR *PROXY-PASSWD* ...). ;;; Compiling (DEFUN REQUEST-URI ...). ;;; Compiling (DEFUN HEADER-PAIR ...). ;;; Compiling (DEFUN HEADER-VALUE ...). ;;; Compiling (DEFUN URL-CONNECTION ...). ;;; Note: ;;; in file ECL-CURL.LISP, position 7887 ;;; at (DEFUN URL-CONNECTION ...) ;;; Checking type of #:LOOP-LIST-TAIL49 to be CONS ;;; Compiling (DEFUN DOWNLOAD-URL-TO-FILE ...). ;;; End of Pass 1. ;;; Emitting code for #:G0. ;;; Emitting code for #:G1. ;;; Emitting code for COPY-STREAM. ;;; Emitting code for MAKE-STREAM-FROM-URL. ;;; Emitting code for URL-HOST. ;;; Emitting code for URL-PORT. ;;; Emitting code for BASE64-ENCODE. ;;; Emitting code for REQUEST-URI. ;;; Emitting code for HEADER-PAIR. ;;; Emitting code for HEADER-VALUE. ;;; Emitting code for URL-CONNECTION. ;;; Emitting code for DOWNLOAD-URL-TO-FILE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/ecl-curl.c -o ext/ecl-curl.o ;;; Finished compiling EXT:ECL-CURL;ECL-CURL.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitJKS7xT.c -o eclinitJKS7xT.o ;;; Note: ;;; Invoking external command: ;;; ar cr libecl-curl.a eclinitJKS7xT.o ext/ecl-curl.o ;;; Note: ;;; Invoking external command: ;;; ranlib libecl-curl.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitGcNLM7.c -o eclinitGcNLM7.o ;;; Note: ;;; Invoking external command: ;;; gcc -o ecl-curl.fas -L/<>/build/ /<>/build/eclinitGcNLM7.o ext/ecl-curl.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:quicklisp;minitar.lisp" :output-file #P"BUILD:EXT;MINITAR.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:QUICKLISP;MINITAR.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN MAKE-BLOCK-BUFFER ...). ;;; Compiling (DEFUN SKIP-N-BLOCKS ...). ;;; Compiling (DEFUN ASCII-SUBSEQ ...). ;;; Note: ;;; in file MINITAR.LISP, position 437 ;;; at (DEFUN ASCII-SUBSEQ ...) ;;; Checking type of #:LET6 to be REAL ;;; Note: ;;; in file MINITAR.LISP, position 437 ;;; at (DEFUN ASCII-SUBSEQ ...) ;;; Checking type of #:LET7 to be REAL ;;; Compiling (DEFUN BLOCK-ASCIIZ-STRING ...). ;;; Compiling (DEFUN PREFIX ...). ;;; Compiling (DEFUN NAME ...). ;;; Compiling (DEFUN PAYLOAD-SIZE ...). ;;; Compiling (DEFUN NTH-BLOCK ...). ;;; Compiling (DEFUN PAYLOAD-TYPE ...). ;;; Compiling (DEFUN FULL-PATH ...). ;;; Compiling (DEFUN SAVE-FILE ...). ;;; Compiling (DEFUN UNPACK-TARBALL ...). ;;; Compiling (DEFUN CONTENTS ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-BLOCK-BUFFER. ;;; Emitting code for SKIP-N-BLOCKS. ;;; Emitting code for ASCII-SUBSEQ. ;;; Emitting code for BLOCK-ASCIIZ-STRING. ;;; Emitting code for PREFIX. ;;; Emitting code for NAME. ;;; Emitting code for PAYLOAD-SIZE. ;;; Emitting code for NTH-BLOCK. ;;; Emitting code for PAYLOAD-TYPE. ;;; Emitting code for FULL-PATH. ;;; Emitting code for SAVE-FILE. ;;; Emitting code for UNPACK-TARBALL. ;;; Emitting code for CONTENTS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/minitar.c -o ext/minitar.o ;;; Finished compiling EXT:QUICKLISP;MINITAR.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitja5hnm.c -o eclinitja5hnm.o ;;; Note: ;;; Invoking external command: ;;; ar cr libql-minitar.a eclinitja5hnm.o ext/minitar.o ;;; Note: ;;; Invoking external command: ;;; ranlib libql-minitar.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitoJxO1A.c -o eclinitoJxO1A.o ;;; Note: ;;; Invoking external command: ;;; gcc -o ql-minitar.fas -L/<>/build/ /<>/build/eclinitoJxO1A.o ext/minitar.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:deflate;deflate.lisp" :output-file #P"BUILD:EXT;DEFLATE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:DEFLATE;DEFLATE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFINE-CONDITION DECOMPRESSION-ERROR ...). ;;; Compiling (DEFINE-CONDITION DEFLATE-DECOMPRESSION-ERROR ...). ;;; Compiling (DEFINE-CONDITION ZLIB-DECOMPRESSION-ERROR ...). ;;; Compiling (DEFINE-CONDITION GZIP-DECOMPRESSION-ERROR ...). ;;; Compiling (DEFUN UPDATE-ADLER32-CHECKSUM ...). ;;; Compiling (DEFUN GENERATE-CRC32-TABLE ...). ;;; Compiling (DEFUN UPDATE-CRC32-CHECKSUM ...). ;;; Compiling (DEFSTRUCT SLIDING-WINDOW-STREAM ...). ;;; Compiling (DEFUN SLIDING-WINDOW-STREAM-WRITE-BYTE ...). ;;; Compiling (DEFUN SLIDING-WINDOW-STREAM-FLUSH ...). ;;; Compiling (DEFUN SLIDING-WINDOW-STREAM-COPY-BYTES ...). ;;; Note: ;;; in file DEFLATE.LISP, position 10986 ;;; at (DEFUN SLIDING-WINDOW-STREAM-COPY-BYTES ...) ;;; Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE ;;; Compiling (DEFSTRUCT BIT-STREAM ...). ;;; Compiling (DEFUN BIT-STREAM-GET-BYTE ...). ;;; Compiling (DEFUN BIT-STREAM-READ-BITS ...). ;;; Note: ;;; in file DEFLATE.LISP, position 12132 ;;; at (DEFUN BIT-STREAM-READ-BITS ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFUN BIT-STREAM-COPY-BLOCK ...). ;;; Note: ;;; in file DEFLATE.LISP, position 13176 ;;; at (DEFUN BIT-STREAM-COPY-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 13176 ;;; at (DEFUN BIT-STREAM-COPY-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 13176 ;;; at (DEFUN BIT-STREAM-COPY-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 13176 ;;; at (DEFUN BIT-STREAM-COPY-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 13176 ;;; at (DEFUN BIT-STREAM-COPY-BLOCK ...) ;;; Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 13176 ;;; at (DEFUN BIT-STREAM-COPY-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 13176 ;;; at (DEFUN BIT-STREAM-COPY-BLOCK ...) ;;; Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 13176 ;;; at (DEFUN BIT-STREAM-COPY-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFSTRUCT DECODE-TREE ...). ;;; Compiling (DEFUN MAKE-HUFFMAN-DECODE-TREE ...). ;;; Compiling (DEFUN READ-HUFFMAN-CODE ...). ;;; Note: ;;; in file DEFLATE.LISP, position 16623 ;;; at (DEFUN READ-HUFFMAN-CODE ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 16623 ;;; at (DEFUN READ-HUFFMAN-CODE ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 16623 ;;; at (DEFUN READ-HUFFMAN-CODE ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 16623 ;;; at (DEFUN READ-HUFFMAN-CODE ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFPARAMETER *STD-LIT-DECODE-TREE* ...). ;;; Compiling (DEFPARAMETER *STD-DIST-DECODE-TREE* ...). ;;; Compiling (DEFPARAMETER *CODE-LENGTH-ENTRY-ORDER* ...). ;;; Compiling (DEFUN DECODE-CODE-LENGTH-ENTRIES ...). ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining READ-HUFFMAN-CODE ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 18616 ;;; at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFUN DECODE-HUFFMAN-TABLES ...). ;;; Note: ;;; in file DEFLATE.LISP, position 19807 ;;; at (DEFUN DECODE-HUFFMAN-TABLES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 19807 ;;; at (DEFUN DECODE-HUFFMAN-TABLES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 19807 ;;; at (DEFUN DECODE-HUFFMAN-TABLES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 19807 ;;; at (DEFUN DECODE-HUFFMAN-TABLES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 19807 ;;; at (DEFUN DECODE-HUFFMAN-TABLES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 19807 ;;; at (DEFUN DECODE-HUFFMAN-TABLES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 19807 ;;; at (DEFUN DECODE-HUFFMAN-TABLES ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 19807 ;;; at (DEFUN DECODE-HUFFMAN-TABLES ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFUN DECODE-LENGTH-ENTRY ...). ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 21245 ;;; at (DEFUN DECODE-LENGTH-ENTRY ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFUN DECODE-DISTANCE-ENTRY ...). ;;; Note: ;;; in file DEFLATE.LISP, position 22079 ;;; at (DEFUN DECODE-DISTANCE-ENTRY ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22079 ;;; at (DEFUN DECODE-DISTANCE-ENTRY ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFUN DECODE-HUFFMAN-BLOCK ...). ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining READ-HUFFMAN-CODE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining DECODE-LENGTH-ENTRY ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining DECODE-DISTANCE-ENTRY ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining READ-HUFFMAN-CODE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining READ-HUFFMAN-CODE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 22516 ;;; at (DEFUN DECODE-HUFFMAN-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFUN DECODE-BLOCK ...). ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-READ-BITS ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-COPY-BLOCK ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE ;;; Note: ;;; in file DEFLATE.LISP, position 23304 ;;; at (DEFUN DECODE-BLOCK ...) ;;; Inlining BIT-STREAM-GET-BYTE ;;; Compiling (DEFUN PARSE-ZLIB-HEADER ...). ;;; Compiling (DEFUN PARSE-ZLIB-CHECKSUM ...). ;;; Compiling (DEFUN PARSE-ZLIB-FOOTER ...). ;;; Compiling (DEFUN PARSE-GZIP-HEADER ...). ;;; Compiling (DEFUN PARSE-GZIP-MTIME ...). ;;; Compiling (DEFUN PARSE-GZIP-EXTRA ...). ;;; Compiling (DEFUN PARSE-GZIP-STRING ...). ;;; Compiling (DEFUN PARSE-GZIP-CHECKSUM ...). ;;; Compiling (DEFUN PARSE-GZIP-FOOTER ...). ;;; Compiling (DEFUN INFLATE-STREAM ...). ;;; Compiling (DEFUN INFLATE-ZLIB-STREAM ...). ;;; Compiling (DEFUN INFLATE-GZIP-STREAM ...). ;;; Compiling (DEFUN GUNZIP ...). ;;; End of Pass 1. ;;; Emitting code for #:G0. ;;; Emitting code for #:G1. ;;; Emitting code for #:G2. ;;; Emitting code for #:G3. ;;; Emitting code for #:G4. ;;; Emitting code for #:G5. ;;; Emitting code for UPDATE-ADLER32-CHECKSUM. ;;; Emitting code for GENERATE-CRC32-TABLE. ;;; Emitting code for UPDATE-CRC32-CHECKSUM. ;;; Emitting code for MAKE-SLIDING-WINDOW-STREAM. ;;; Emitting code for SLIDING-WINDOW-STREAM-WRITE-BYTE. ;;; Emitting code for SLIDING-WINDOW-STREAM-FLUSH. ;;; Emitting code for SLIDING-WINDOW-STREAM-COPY-BYTES. ;;; Emitting code for MAKE-BIT-STREAM. ;;; Emitting code for BIT-STREAM-GET-BYTE. ;;; Emitting code for BIT-STREAM-READ-BITS. ;;; Emitting code for BIT-STREAM-COPY-BLOCK. ;;; Emitting code for MAKE-DECODE-TREE. ;;; Emitting code for MAKE-HUFFMAN-DECODE-TREE. ;;; Emitting code for READ-HUFFMAN-CODE. ;;; Emitting code for DECODE-CODE-LENGTH-ENTRIES. ;;; Emitting code for DECODE-HUFFMAN-TABLES. ;;; Emitting code for DECODE-LENGTH-ENTRY. ;;; Emitting code for DECODE-DISTANCE-ENTRY. ;;; Emitting code for DECODE-HUFFMAN-BLOCK. ;;; Emitting code for DECODE-BLOCK. ;;; Emitting code for PARSE-ZLIB-HEADER. ;;; Emitting code for PARSE-ZLIB-CHECKSUM. ;;; Emitting code for PARSE-ZLIB-FOOTER. ;;; Emitting code for PARSE-GZIP-HEADER. ;;; Emitting code for PARSE-GZIP-MTIME. ;;; Emitting code for PARSE-GZIP-EXTRA. ;;; Emitting code for PARSE-GZIP-STRING. ;;; Emitting code for PARSE-GZIP-CHECKSUM. ;;; Emitting code for PARSE-GZIP-FOOTER. ;;; Emitting code for INFLATE-STREAM. ;;; Emitting code for INFLATE-ZLIB-STREAM. ;;; Emitting code for INFLATE-GZIP-STREAM. ;;; Emitting code for GUNZIP. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/deflate.c -o ext/deflate.o ;;; Finished compiling EXT:DEFLATE;DEFLATE.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitnhpaDS.c -o eclinitnhpaDS.o ;;; Note: ;;; Invoking external command: ;;; ar cr libdeflate.a eclinitnhpaDS.o ext/deflate.o ;;; Note: ;;; Invoking external command: ;;; ranlib libdeflate.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinit70wnja.c -o eclinit70wnja.o ;;; Note: ;;; Invoking external command: ;;; gcc -o deflate.fas -L/<>/build/ /<>/build/eclinit70wnja.o ext/deflate.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:quicklisp;ecl-quicklisp.lisp" :output-file #P"BUILD:EXT;ECL-QUICKLISP.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:QUICKLISP;ECL-QUICKLISP.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *QUICKLISP-URL* ...). ;;; Compiling (DEFPARAMETER *QUICKLISP-DIRECTORY* ...). ;;; Compiling (DEFPARAMETER *QUICKLISP-SETUP* ...). ;;; Compiling (DEFUN SAFE-DOWNLOAD ...). ;;; Compiling (DEFUN INSTALL-QUICKLISP ...). ;;; End of Pass 1. ;;; Emitting code for SAFE-DOWNLOAD. ;;; Emitting code for #:G3. ;;; Emitting code for INSTALL-QUICKLISP. ;;; Emitting code for #:G7. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/ecl-quicklisp.c -o ext/ecl-quicklisp.o ;;; Finished compiling EXT:QUICKLISP;ECL-QUICKLISP.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitI5q2bs.c -o eclinitI5q2bs.o ;;; Note: ;;; Invoking external command: ;;; ar cr libecl-quicklisp.a eclinitI5q2bs.o ext/ecl-quicklisp.o ;;; Note: ;;; Invoking external command: ;;; ranlib libecl-quicklisp.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitBfjb8J.c -o eclinitBfjb8J.o ;;; Note: ;;; Invoking external command: ;;; gcc -o ecl-quicklisp.fas -L/<>/build/ /<>/build/eclinitBfjb8J.o ext/ecl-quicklisp.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm (compile-file "ext:rt;rt.lisp" :output-file #P"BUILD:EXT;RT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling EXT:RT;RT.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *TEST* ...). ;;; Compiling (DEFVAR *DO-TESTS-WHEN-DEFINED* ...). ;;; Compiling (DEFVAR *ENTRIES* ...). ;;; Compiling (DEFVAR *IN-TEST* ...). ;;; Compiling (DEFVAR *DEBUG* ...). ;;; Compiling (DEFVAR *CATCH-ERRORS* ...). ;;; Compiling (DEFVAR *PRINT-CIRCLE-ON-FAILURE* ...). ;;; Compiling (DEFVAR *COMPILE-TESTS* ...). ;;; Compiling (DEFVAR *OPTIMIZATION-SETTINGS* ...). ;;; Compiling (DEFVAR *EXPECTED-FAILURES* ...). ;;; Compiling (DEFSTRUCT (ENTRY # ...) ...). ;;; Compiling (DEFMACRO VALS ...). ;;; Compiling (DEFMACRO DEFN ...). ;;; Compiling (DEFUN PENDING-TESTS ...). ;;; Compiling (DEFUN REM-ALL-TESTS ...). ;;; Compiling (DEFUN REM-TEST ...). ;;; Note: ;;; in file RT.LISP, position 2923 ;;; at (DEFUN REM-TEST ...) ;;; Checking type of #:G21 to be CONS ;;; Compiling (DEFUN GET-TEST ...). ;;; Compiling (DEFUN GET-ENTRY ...). ;;; Compiling (DEFMACRO DEFTEST ...). ;;; Compiling (DEFMACRO DEFTEST* ...). ;;; Compiling (DEFUN ADD-ENTRY ...). ;;; Note: ;;; in file RT.LISP, position 3602 ;;; at (DEFUN ADD-ENTRY ...) ;;; Checking type of #:G50 to be CONS ;;; Note: ;;; in file RT.LISP, position 3602 ;;; at (DEFUN ADD-ENTRY ...) ;;; Checking type of (CDR #:G52) to be CONS ;;; Compiling (DEFUN REPORT-ERROR ...). ;;; Compiling (DEFUN DO-TEST ...). ;;; Compiling (DEFUN EQUALP-WITH-CASE ...). ;;; Note: ;;; in file RT.LISP, position 4337 ;;; at (DEFUN EQUALP-WITH-CASE ...) ;;; Checking type of #:LET63 to be VECTOR ;;; Note: ;;; in file RT.LISP, position 4337 ;;; at (DEFUN EQUALP-WITH-CASE ...) ;;; Checking type of #:LET67 to be VECTOR ;;; Note: ;;; in file RT.LISP, position 4337 ;;; at (DEFUN EQUALP-WITH-CASE ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-57) to be FIXNUM ;;; Note: ;;; in file RT.LISP, position 4337 ;;; at (DEFUN EQUALP-WITH-CASE ...) ;;; Checking type of (1+ #:LOOP-ACROSS-INDEX-60) to be FIXNUM ;;; Note: ;;; in file RT.LISP, position 4337 ;;; at (DEFUN EQUALP-WITH-CASE ...) ;;; Checking type of #:LET72 to be REAL ;;; Compiling (DEFUN DO-ENTRY ...). ;;; Compiling (DEFUN CONTINUE-TESTING ...). ;;; Compiling (DEFUN DO-TESTS ...). ;;; Compiling (DEFUN DO-ENTRIES ...). ;;; Note: ;;; in file RT.LISP, position 7826 ;;; at (DEFUN DO-ENTRIES ...) ;;; Checking type of #:LET106 to be LIST ;;; Note: ;;; in file RT.LISP, position 7826 ;;; at (DEFUN DO-ENTRIES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST102) to be LIST ;;; Note: ;;; in file RT.LISP, position 7826 ;;; at (DEFUN DO-ENTRIES ...) ;;; Checking type of #:LOOP-LIST-TAIL104 to be CONS ;;; End of Pass 1. ;;; Emitting code for MAKE-ENTRY. ;;; Emitting code for VALS. ;;; Emitting code for DEFN. ;;; Emitting code for PENDING-TESTS. ;;; Emitting code for REM-ALL-TESTS. ;;; Emitting code for REM-TEST. ;;; Emitting code for GET-TEST. ;;; Emitting code for GET-ENTRY. ;;; Emitting code for DEFTEST. ;;; Emitting code for DEFTEST*. ;;; Emitting code for ADD-ENTRY. ;;; Emitting code for REPORT-ERROR. ;;; Emitting code for DO-TEST. ;;; Emitting code for EQUALP-WITH-CASE. ;;; Emitting code for DO-ENTRY. ;;; Emitting code for %DO. ;;; Emitting code for #:G80. ;;; Emitting code for CONTINUE-TESTING. ;;; Emitting code for DO-TESTS. ;;; Emitting code for DO-ENTRIES. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c ext/rt.c -o ext/rt.o ;;; Finished compiling EXT:RT;RT.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitFs31B2.c -o eclinitFs31B2.o ;;; Note: ;;; Invoking external command: ;;; ar cr librt.a eclinitFs31B2.o ext/rt.o ;;; Note: ;;; Invoking external command: ;;; ranlib librt.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitX45E9k.c -o eclinitX45E9k.o ;;; Note: ;;; Invoking external command: ;;; gcc -o rt.fas -L/<>/build/ /<>/build/eclinitX45E9k.o ext/rt.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm ;;; Copying /<>/src/../contrib/encodings/ATARIST.BIN to BUILD:ENCODINGS;ATARIST.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-1.BIN to BUILD:ENCODINGS;ISO-8859-1.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-2.BIN to BUILD:ENCODINGS;ISO-8859-2.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-3.BIN to BUILD:ENCODINGS;ISO-8859-3.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-4.BIN to BUILD:ENCODINGS;ISO-8859-4.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-5.BIN to BUILD:ENCODINGS;ISO-8859-5.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-6.BIN to BUILD:ENCODINGS;ISO-8859-6.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-7.BIN to BUILD:ENCODINGS;ISO-8859-7.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-8.BIN to BUILD:ENCODINGS;ISO-8859-8.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-9.BIN to BUILD:ENCODINGS;ISO-8859-9.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-10.BIN to BUILD:ENCODINGS;ISO-8859-10.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-11.BIN to BUILD:ENCODINGS;ISO-8859-11.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-13.BIN to BUILD:ENCODINGS;ISO-8859-13.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-14.BIN to BUILD:ENCODINGS;ISO-8859-14.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-15.BIN to BUILD:ENCODINGS;ISO-8859-15.BIN ;;; Copying /<>/src/../contrib/encodings/ISO-8859-16.BIN to BUILD:ENCODINGS;ISO-8859-16.BIN ;;; Copying /<>/src/../contrib/encodings/KOI8-R.BIN to BUILD:ENCODINGS;KOI8-R.BIN ;;; Copying /<>/src/../contrib/encodings/KOI8-U.BIN to BUILD:ENCODINGS;KOI8-U.BIN ;;; Copying /<>/src/../contrib/encodings/CP-856.BIN to BUILD:ENCODINGS;CP-856.BIN ;;; Copying /<>/src/../contrib/encodings/CP-856.BIN to BUILD:ENCODINGS;CP-856.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP437.BIN to BUILD:ENCODINGS;DOS-CP437.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP737.BIN to BUILD:ENCODINGS;DOS-CP737.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP775.BIN to BUILD:ENCODINGS;DOS-CP775.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP850.BIN to BUILD:ENCODINGS;DOS-CP850.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP852.BIN to BUILD:ENCODINGS;DOS-CP852.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP855.BIN to BUILD:ENCODINGS;DOS-CP855.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP857.BIN to BUILD:ENCODINGS;DOS-CP857.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP860.BIN to BUILD:ENCODINGS;DOS-CP860.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP861.BIN to BUILD:ENCODINGS;DOS-CP861.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP862.BIN to BUILD:ENCODINGS;DOS-CP862.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP863.BIN to BUILD:ENCODINGS;DOS-CP863.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP864.BIN to BUILD:ENCODINGS;DOS-CP864.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP865.BIN to BUILD:ENCODINGS;DOS-CP865.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP866.BIN to BUILD:ENCODINGS;DOS-CP866.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP869.BIN to BUILD:ENCODINGS;DOS-CP869.BIN ;;; Copying /<>/src/../contrib/encodings/DOS-CP874.BIN to BUILD:ENCODINGS;DOS-CP874.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP932.BIN to BUILD:ENCODINGS;WINDOWS-CP932.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP936.BIN to BUILD:ENCODINGS;WINDOWS-CP936.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP949.BIN to BUILD:ENCODINGS;WINDOWS-CP949.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP950.BIN to BUILD:ENCODINGS;WINDOWS-CP950.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1250.BIN to BUILD:ENCODINGS;WINDOWS-CP1250.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1251.BIN to BUILD:ENCODINGS;WINDOWS-CP1251.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1252.BIN to BUILD:ENCODINGS;WINDOWS-CP1252.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1253.BIN to BUILD:ENCODINGS;WINDOWS-CP1253.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1254.BIN to BUILD:ENCODINGS;WINDOWS-CP1254.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1255.BIN to BUILD:ENCODINGS;WINDOWS-CP1255.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1256.BIN to BUILD:ENCODINGS;WINDOWS-CP1256.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1257.BIN to BUILD:ENCODINGS;WINDOWS-CP1257.BIN ;;; Copying /<>/src/../contrib/encodings/WINDOWS-CP1258.BIN to BUILD:ENCODINGS;WINDOWS-CP1258.BIN ;;; Copying /<>/src/../contrib/encodings/JISX0201.BIN to BUILD:ENCODINGS;JISX0201.BIN ;;; Copying /<>/src/../contrib/encodings/JISX0208.BIN to BUILD:ENCODINGS;JISX0208.BIN ;;; Copying /<>/src/../contrib/encodings/JISX0212.BIN to BUILD:ENCODINGS;JISX0212.BIN ;;; Copying /<>/src/../contrib/encodings/SHIFT-JIS.BIN to BUILD:ENCODINGS;SHIFT-JIS.BIN ;;; Creating alias ASCII -> US-ASCII, BUILD:ENCODINGS;ASCII ;;; Creating alias UTF8 -> UTF-8, BUILD:ENCODINGS;UTF8 ;;; Creating alias UCS2 -> UCS-2, BUILD:ENCODINGS;UCS2 ;;; Creating alias UTF-16 -> UCS-2, BUILD:ENCODINGS;UTF-16 ;;; Creating alias UTF16 -> UCS-2, BUILD:ENCODINGS;UTF16 ;;; Creating alias UNICODE -> UCS-2, BUILD:ENCODINGS;UNICODE ;;; Creating alias UCS2LE -> UCS-2LE, BUILD:ENCODINGS;UCS2LE ;;; Creating alias UTF-16LE -> UCS-2LE, BUILD:ENCODINGS;UTF-16LE ;;; Creating alias UCS2BE -> UCS-2BE, BUILD:ENCODINGS;UCS2BE ;;; Creating alias UTF-16BE -> UCS-2BE, BUILD:ENCODINGS;UTF-16BE ;;; Creating alias UCS4 -> UCS-4, BUILD:ENCODINGS;UCS4 ;;; Creating alias UTF-32 -> UCS-4, BUILD:ENCODINGS;UTF-32 ;;; Creating alias UTF32 -> UCS-4, BUILD:ENCODINGS;UTF32 ;;; Creating alias UCS4BE -> UCS-4BE, BUILD:ENCODINGS;UCS4BE ;;; Creating alias UTF-32BE -> UCS-4BE, BUILD:ENCODINGS;UTF-32BE ;;; Creating alias UCS4LE -> UCS-4LE, BUILD:ENCODINGS;UCS4LE ;;; Creating alias UTF-32LE -> UCS-4LE, BUILD:ENCODINGS;UTF-32LE ;;; Creating alias KOI8R -> KOI8-R, BUILD:ENCODINGS;KOI8R ;;; Creating alias ISO8859-1 -> ISO-8859-1, BUILD:ENCODINGS;ISO8859-1 ;;; Creating alias LATIN-1 -> ISO-8859-1, BUILD:ENCODINGS;LATIN-1 ;;; Creating alias CP819 -> ISO-8859-1, BUILD:ENCODINGS;CP819 ;;; Creating alias IBM819 -> ISO-8859-1, BUILD:ENCODINGS;IBM819 ;;; Creating alias ISO8859-2 -> ISO-8859-2, BUILD:ENCODINGS;ISO8859-2 ;;; Creating alias LATIN-2 -> ISO-8859-2, BUILD:ENCODINGS;LATIN-2 ;;; Creating alias LATIN2 -> ISO-8859-2, BUILD:ENCODINGS;LATIN2 ;;; Creating alias ISO8859-3 -> ISO-8859-3, BUILD:ENCODINGS;ISO8859-3 ;;; Creating alias LATIN-3 -> ISO-8859-3, BUILD:ENCODINGS;LATIN-3 ;;; Creating alias LATIN3 -> ISO-8859-3, BUILD:ENCODINGS;LATIN3 ;;; Creating alias ISO8859-4 -> ISO-8859-4, BUILD:ENCODINGS;ISO8859-4 ;;; Creating alias LATIN-4 -> ISO-8859-4, BUILD:ENCODINGS;LATIN-4 ;;; Creating alias LATIN4 -> ISO-8859-4, BUILD:ENCODINGS;LATIN4 ;;; Creating alias ISO8859-5 -> ISO-8859-5, BUILD:ENCODINGS;ISO8859-5 ;;; Creating alias CYRILLIC -> ISO-8859-5, BUILD:ENCODINGS;CYRILLIC ;;; Creating alias ISO8859-6 -> ISO-8859-6, BUILD:ENCODINGS;ISO8859-6 ;;; Creating alias ARABIC -> ISO-8859-6, BUILD:ENCODINGS;ARABIC ;;; Creating alias ASMO-708 -> ISO-8859-6, BUILD:ENCODINGS;ASMO-708 ;;; Creating alias ECMA-114 -> ISO-8859-6, BUILD:ENCODINGS;ECMA-114 ;;; Creating alias ISO8859-7 -> ISO-8859-7, BUILD:ENCODINGS;ISO8859-7 ;;; Creating alias GREEK8 -> ISO-8859-7, BUILD:ENCODINGS;GREEK8 ;;; Creating alias GREEK -> ISO-8859-7, BUILD:ENCODINGS;GREEK ;;; Creating alias ECMA-118 -> ISO-8859-7, BUILD:ENCODINGS;ECMA-118 ;;; Creating alias ISO8859-8 -> ISO-8859-8, BUILD:ENCODINGS;ISO8859-8 ;;; Creating alias HEBREW -> ISO-8859-8, BUILD:ENCODINGS;HEBREW ;;; Creating alias ISO8859-9 -> ISO-8859-9, BUILD:ENCODINGS;ISO8859-9 ;;; Creating alias LATIN-5 -> ISO-8859-9, BUILD:ENCODINGS;LATIN-5 ;;; Creating alias LATIN5 -> ISO-8859-9, BUILD:ENCODINGS;LATIN5 ;;; Creating alias ISO8859-10 -> ISO-8859-10, BUILD:ENCODINGS;ISO8859-10 ;;; Creating alias LATIN-6 -> ISO-8859-10, BUILD:ENCODINGS;LATIN-6 ;;; Creating alias LATIN6 -> ISO-8859-10, BUILD:ENCODINGS;LATIN6 ;;; Creating alias ISO8859-13 -> ISO-8859-13, BUILD:ENCODINGS;ISO8859-13 ;;; Creating alias LATIN-7 -> ISO-8859-13, BUILD:ENCODINGS;LATIN-7 ;;; Creating alias LATIN7 -> ISO-8859-13, BUILD:ENCODINGS;LATIN7 ;;; Creating alias ISO8859-14 -> ISO-8859-14, BUILD:ENCODINGS;ISO8859-14 ;;; Creating alias LATIN-8 -> ISO-8859-14, BUILD:ENCODINGS;LATIN-8 ;;; Creating alias LATIN8 -> ISO-8859-14, BUILD:ENCODINGS;LATIN8 ;;; Creating alias ISO8859-15 -> ISO-8859-15, BUILD:ENCODINGS;ISO8859-15 ;;; Creating alias LATIN-9 -> ISO-8859-15, BUILD:ENCODINGS;LATIN-9 ;;; Creating alias LATIN9 -> ISO-8859-15, BUILD:ENCODINGS;LATIN9 ;;; Creating alias IBM437 -> DOS-CP437, BUILD:ENCODINGS;IBM437 ;;; Creating alias IBM850 -> DOS-CP850, BUILD:ENCODINGS;IBM850 ;;; Creating alias CP850 -> DOS-CP850, BUILD:ENCODINGS;CP850 ;;; Creating alias IBM852 -> DOS-CP852, BUILD:ENCODINGS;IBM852 ;;; Creating alias IBM855 -> DOS-CP855, BUILD:ENCODINGS;IBM855 ;;; Creating alias IBM857 -> DOS-CP857, BUILD:ENCODINGS;IBM857 ;;; Creating alias IBM860 -> DOS-CP860, BUILD:ENCODINGS;IBM860 ;;; Creating alias IBM861 -> DOS-CP861, BUILD:ENCODINGS;IBM861 ;;; Creating alias IBM862 -> DOS-CP862, BUILD:ENCODINGS;IBM862 ;;; Creating alias CP862 -> DOS-CP862, BUILD:ENCODINGS;CP862 ;;; Creating alias IBM863 -> DOS-CP863, BUILD:ENCODINGS;IBM863 ;;; Creating alias IBM864 -> DOS-CP864, BUILD:ENCODINGS;IBM864 ;;; Creating alias IBM865 -> DOS-CP865, BUILD:ENCODINGS;IBM865 ;;; Creating alias IBM866 -> DOS-CP866, BUILD:ENCODINGS;IBM866 ;;; Creating alias CP866 -> DOS-CP866, BUILD:ENCODINGS;CP866 ;;; Creating alias IBM869 -> DOS-CP869, BUILD:ENCODINGS;IBM869 ;;; Creating alias WINDOWS-932 -> WINDOWS-CP932, BUILD:ENCODINGS;WINDOWS-932 ;;; Creating alias CP932 -> WINDOWS-CP932, BUILD:ENCODINGS;CP932 ;;; Creating alias WINDOWS-936 -> WINDOWS-CP936, BUILD:ENCODINGS;WINDOWS-936 ;;; Creating alias CP936 -> WINDOWS-CP936, BUILD:ENCODINGS;CP936 ;;; Creating alias WINDOWS-949 -> WINDOWS-CP949, BUILD:ENCODINGS;WINDOWS-949 ;;; Creating alias CP949 -> WINDOWS-CP949, BUILD:ENCODINGS;CP949 ;;; Creating alias WINDOWS-950 -> WINDOWS-CP950, BUILD:ENCODINGS;WINDOWS-950 ;;; Creating alias CP950 -> WINDOWS-CP950, BUILD:ENCODINGS;CP950 ;;; Creating alias WINDOWS-1250 -> WINDOWS-CP1250, BUILD:ENCODINGS;WINDOWS-1250 ;;; Creating alias MS-EE -> WINDOWS-CP1250, BUILD:ENCODINGS;MS-EE ;;; Creating alias WINDOWS-1251 -> WINDOWS-CP1251, BUILD:ENCODINGS;WINDOWS-1251 ;;; Creating alias MS-CYRL -> WINDOWS-CP1251, BUILD:ENCODINGS;MS-CYRL ;;; Creating alias WINDOWS-1252 -> WINDOWS-CP1252, BUILD:ENCODINGS;WINDOWS-1252 ;;; Creating alias MS-ANSI -> WINDOWS-CP1252, BUILD:ENCODINGS;MS-ANSI ;;; Creating alias WINDOWS-1253 -> WINDOWS-CP1253, BUILD:ENCODINGS;WINDOWS-1253 ;;; Creating alias MS-GREEK -> WINDOWS-CP1253, BUILD:ENCODINGS;MS-GREEK ;;; Creating alias WINDOWS-1254 -> WINDOWS-CP1254, BUILD:ENCODINGS;WINDOWS-1254 ;;; Creating alias MS-TURK -> WINDOWS-CP1254, BUILD:ENCODINGS;MS-TURK ;;; Creating alias WINDOWS-1255 -> WINDOWS-CP1255, BUILD:ENCODINGS;WINDOWS-1255 ;;; Creating alias MS-HEBR -> WINDOWS-CP1255, BUILD:ENCODINGS;MS-HEBR ;;; Creating alias WINDOWS-1256 -> WINDOWS-CP1256, BUILD:ENCODINGS;WINDOWS-1256 ;;; Creating alias MS-ARAB -> WINDOWS-CP1256, BUILD:ENCODINGS;MS-ARAB ;;; Creating alias WINDOWS-1257 -> WINDOWS-CP1257, BUILD:ENCODINGS;WINDOWS-1257 ;;; Creating alias WINBALTRIM -> WINDOWS-CP1257, BUILD:ENCODINGS;WINBALTRIM ;;; Creating alias WINDOWS-1258 -> WINDOWS-CP1258, BUILD:ENCODINGS;WINDOWS-1258 ;;; Copying ext:encodings;tools.lisp to build:encodings;tools.lisp ;;; Copying /<>/src/../contrib/encodings/ISO-2022-JP to build:encodings;ISO-2022-JP ;;; Copying /<>/src/../contrib/encodings/ISO-2022-JP-1 to build:encodings;ISO-2022-JP-1 (compile-file "src:clx;package.lisp" :output-file #P"BUILD:CLX;PACKAGE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;PACKAGE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/package.c -o clx/package.o ;;; Finished compiling SRC:CLX;PACKAGE.LISP. ;;; (compile-file "src:clx;depdefs.lisp" :output-file #P"BUILD:CLX;DEPDEFS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;DEPDEFS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO WITH-VECTOR ...). ;;; Compiling (DEFMACRO WITHIN-DEFINITION ...). ;;; Compiling (DEFMACRO RESOURCE-ID-MAP-TEST ...). ;;; Compiling (DEFMACRO ATOM-CACHE-MAP-TEST ...). ;;; Compiling (DEFMACRO KEYSYM->CHARACTER-MAP-TEST ...). ;;; Compiling (DEFUN MAKE-INDEX-TYPED ...). ;;; Compiling (DEFUN MAKE-INDEX-OP ...). ;;; Compiling (DEFMACRO INDEX+ ...). ;;; Compiling (DEFMACRO INDEX-LOGAND ...). ;;; Compiling (DEFMACRO INDEX-LOGIOR ...). ;;; Compiling (DEFMACRO INDEX- ...). ;;; Compiling (DEFMACRO INDEX* ...). ;;; Compiling (DEFMACRO INDEX1+ ...). ;;; Compiling (DEFMACRO INDEX1- ...). ;;; Compiling (DEFMACRO INDEX-INCF ...). ;;; Compiling (DEFMACRO INDEX-DECF ...). ;;; Compiling (DEFMACRO INDEX-MIN ...). ;;; Compiling (DEFMACRO INDEX-MAX ...). ;;; Compiling (DEFMACRO INDEX-FLOOR ...). ;;; Compiling (DEFMACRO INDEX-CEILING ...). ;;; Compiling (DEFMACRO INDEX-TRUNCATE ...). ;;; Compiling (DEFMACRO INDEX-MOD ...). ;;; Compiling (DEFMACRO INDEX-ASH ...). ;;; Compiling (DEFMACRO INDEX-PLUSP ...). ;;; Compiling (DEFMACRO INDEX-ZEROP ...). ;;; Compiling (DEFMACRO INDEX-EVENP ...). ;;; Compiling (DEFMACRO INDEX-ODDP ...). ;;; Compiling (DEFMACRO INDEX> ...). ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX> ...) ;;; Checking type of #:LET202 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX> ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST198) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX> ...) ;;; Checking type of #:LOOP-LIST-TAIL200 to be CONS ;;; Compiling (DEFMACRO INDEX= ...). ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX= ...) ;;; Checking type of #:LET215 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX= ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST211) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX= ...) ;;; Checking type of #:LOOP-LIST-TAIL213 to be CONS ;;; Compiling (DEFMACRO INDEX< ...). ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX< ...) ;;; Checking type of #:LET228 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX< ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST224) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX< ...) ;;; Checking type of #:LOOP-LIST-TAIL226 to be CONS ;;; Compiling (DEFMACRO INDEX>= ...). ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX>= ...) ;;; Checking type of #:LET241 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX>= ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST237) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX>= ...) ;;; Checking type of #:LOOP-LIST-TAIL239 to be CONS ;;; Compiling (DEFMACRO INDEX<= ...). ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX<= ...) ;;; Checking type of #:LET254 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX<= ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST250) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 7172 ;;; at (FSET 'INDEX<= ...) ;;; Checking type of #:LOOP-LIST-TAIL252 to be CONS ;;; Compiling (DEFVAR *EMPTY-BYTES* ...). ;;; Note: ;;; in file DEPDEFS.LISP, position 12462 ;;; at (DEFVAR *EMPTY-BYTES* ...) ;;; Checking type of (MAKE-SEQUENCE 'BUFFER-BYTES 0) to be BUFFER-BYTES ;;; Compiling (DEFSTRUCT (REPLY-BUFFER # ...) ...). ;;; Compiling (DEFPARAMETER *XLIB-PACKAGE* ...). ;;; Compiling (DEFUN XINTERN ...). ;;; Note: ;;; in file DEPDEFS.LISP, position 13618 ;;; at (DEFUN XINTERN ...) ;;; Checking type of #:LET274 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 13618 ;;; at (DEFUN XINTERN ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST270) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 13618 ;;; at (DEFUN XINTERN ...) ;;; Checking type of #:LOOP-LIST-TAIL272 to be CONS ;;; Compiling (DEFPARAMETER *KEYWORD-PACKAGE* ...). ;;; Compiling (DEFUN KINTERN ...). ;;; Compiling (DEFVAR *DEF-CLX-CLASS-USE-DEFCLASS* ...). ;;; Compiling (DEFMACRO DEF-CLX-CLASS ...). ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of #:LET541 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST537) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of #:LOOP-LIST-TAIL539 to be CONS ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of #:LET585 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST580) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of #:G586 to be CONS ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of #:LET595 to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST590) to be LIST ;;; Note: ;;; in file DEPDEFS.LISP, position 14473 ;;; at (FSET 'DEF-CLX-CLASS ...) ;;; Checking type of #:G596 to be CONS ;;; Compiling (DEFUN UNIX-SOCKET-PATH-FROM-HOST ...). ;;; End of Pass 1. ;;; Emitting code for WITH-VECTOR. ;;; Emitting code for WITHIN-DEFINITION. ;;; Emitting code for RESOURCE-ID-MAP-TEST. ;;; Emitting code for ATOM-CACHE-MAP-TEST. ;;; Emitting code for KEYSYM->CHARACTER-MAP-TEST. ;;; Emitting code for BUFFER-BYTES. ;;; Emitting code for ARRAY-INDEX. ;;; Emitting code for MAKE-INDEX-TYPED. ;;; Emitting code for MAKE-INDEX-OP. ;;; Emitting code for INDEX+. ;;; Emitting code for INDEX-LOGAND. ;;; Emitting code for INDEX-LOGIOR. ;;; Emitting code for INDEX-. ;;; Emitting code for INDEX*. ;;; Emitting code for INDEX1+. ;;; Emitting code for INDEX1-. ;;; Emitting code for INDEX-INCF. ;;; Emitting code for INDEX-DECF. ;;; Emitting code for INDEX-MIN. ;;; Emitting code for INDEX-MAX. ;;; Emitting code for INDEX-FLOOR. ;;; Emitting code for INDEX-CEILING. ;;; Emitting code for INDEX-TRUNCATE. ;;; Emitting code for INDEX-MOD. ;;; Emitting code for INDEX-ASH. ;;; Emitting code for INDEX-PLUSP. ;;; Emitting code for INDEX-ZEROP. ;;; Emitting code for INDEX-EVENP. ;;; Emitting code for INDEX-ODDP. ;;; Emitting code for INDEX>. ;;; Emitting code for INDEX=. ;;; Emitting code for INDEX<. ;;; Emitting code for INDEX>=. ;;; Emitting code for INDEX<=. ;;; Emitting code for MAKE-REPLY-BUFFER-INTERNAL. ;;; Emitting code for BUFFER-TEXT16. ;;; Emitting code for XINTERN. ;;; Emitting code for KINTERN. ;;; Emitting code for DEF-CLX-CLASS. ;;; Emitting code for CLOSINTERN. ;;; Emitting code for KINTERN. ;;; Emitting code for CINTERN. ;;; Emitting code for #:G577. ;;; Emitting code for #:G583. ;;; Emitting code for #:G593. ;;; Emitting code for UNIX-SOCKET-PATH-FROM-HOST. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/depdefs.c -o clx/depdefs.o ;;; Finished compiling SRC:CLX;DEPDEFS.LISP. ;;; (compile-file "src:clx;clx.lisp" :output-file #P"BUILD:CLX;CLX.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;CLX.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *VERSION* ...). ;;; Compiling (DEFPARAMETER *PROTOCOL-MAJOR-VERSION* ...). ;;; Compiling (DEFPARAMETER *PROTOCOL-MINOR-VERSION* ...). ;;; Compiling (DEFPARAMETER *X-TCP-PORT* ...). ;;; Compiling (DEF-CLX-CLASS (COLOR # ...) ...). ;;; Compiling (DEFUN PRINT-COLOR ...). ;;; Compiling (DEFUN MAKE-COLOR ...). ;;; Compiling (DEFUN COLOR-RGB ...). ;;; Compiling (DEF-CLX-CLASS (BITMAP-FORMAT # ...) ...). ;;; Compiling (DEFUN PRINT-BITMAP-FORMAT ...). ;;; Compiling (DEF-CLX-CLASS (PIXMAP-FORMAT # ...) ...). ;;; Compiling (DEFUN PRINT-PIXMAP-FORMAT ...). ;;; Compiling (DEFPARAMETER *ATOM-CACHE-SIZE* ...). ;;; Compiling (DEFPARAMETER *RESOURCE-ID-MAP-SIZE* ...). ;;; Compiling (DEF-CLX-CLASS (DISPLAY # ...) ...). ;;; Compiling (DEFUN PRINT-DISPLAY-NAME ...). ;;; Compiling (DEFUN PRINT-DISPLAY ...). ;;; Compiling (DEF-CLX-CLASS (DRAWABLE # ...) ...). ;;; Compiling (DEFUN PRINT-DRAWABLE ...). ;;; Compiling (DEF-CLX-CLASS (WINDOW # ...)). ;;; Compiling (DEF-CLX-CLASS (PIXMAP # ...)). ;;; Compiling (DEF-CLX-CLASS (VISUAL-INFO # ...) ...). ;;; Compiling (DEFUN PRINT-VISUAL-INFO ...). ;;; Compiling (DEF-CLX-CLASS (COLORMAP # ...) ...). ;;; Compiling (DEFUN PRINT-COLORMAP ...). ;;; Compiling (DEF-CLX-CLASS (CURSOR # ...) ...). ;;; Compiling (DEFUN PRINT-CURSOR ...). ;;; Compiling (DEFPARAMETER *PROTOCOL-FAMILIES* ...). ;;; Compiling (DEF-CLX-CLASS (GCONTEXT # ...) ...). ;;; Compiling (DEFUN PRINT-GCONTEXT ...). ;;; Compiling (DEF-CLX-CLASS (SCREEN # ...) ...). ;;; Compiling (DEFUN PRINT-SCREEN ...). ;;; Compiling (DEFUN SCREEN-ROOT-VISUAL ...). ;;; Compiling (DEF-CLX-CLASS (FONT-INFO # ...) ...). ;;; Compiling (DEF-CLX-CLASS (FONT # ...) ...). ;;; Compiling (DEFUN PRINT-FONT ...). ;;; Compiling (DEFUN FONT-ID ...). ;;; Compiling (DEFUN FONT-FONT-INFO ...). ;;; Compiling (DEFUN FONT-CHAR-INFOS ...). ;;; Compiling (DEFUN MAKE-FONT ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (MAKE-FONT-INFO-ACCESSORS IGNORE ...). ;;; Compiling (DEFUN FONT-PROPERTY ...). ;;; Compiling (MAKE-MUMBLE-EQUAL WINDOW). ;;; Compiling (MAKE-MUMBLE-EQUAL PIXMAP). ;;; Compiling (MAKE-MUMBLE-EQUAL CURSOR). ;;; Compiling (MAKE-MUMBLE-EQUAL FONT). ;;; Compiling (MAKE-MUMBLE-EQUAL GCONTEXT). ;;; Compiling (MAKE-MUMBLE-EQUAL COLORMAP). ;;; Compiling (MAKE-MUMBLE-EQUAL DRAWABLE). ;;; Compiling (DEFUN ENCODE-MASK ...). ;;; Compiling (DEFUN DECODE-MASK ...). ;;; Note: ;;; in file CLX.LISP, position 35978 ;;; at (DEFUN DECODE-MASK ...) ;;; Checking type of #:LET426 to be LIST ;;; Note: ;;; in file CLX.LISP, position 35978 ;;; at (DEFUN DECODE-MASK ...) ;;; Checking type of (ASH M -1) to be MASK32 ;;; Note: ;;; in file CLX.LISP, position 35978 ;;; at (DEFUN DECODE-MASK ...) ;;; Checking type of (1+ BIT) to be FIXNUM ;;; Compiling (DEFUN ENCODE-EVENT-MASK ...). ;;; Compiling (DEFUN MAKE-EVENT-MASK ...). ;;; Compiling (DEFUN MAKE-EVENT-KEYS ...). ;;; Compiling (DEFUN ENCODE-DEVICE-EVENT-MASK ...). ;;; Compiling (DEFUN ENCODE-MODIFIER-MASK ...). ;;; Compiling (DEFUN ENCODE-STATE-MASK ...). ;;; Compiling (DEFUN MAKE-STATE-MASK ...). ;;; Compiling (DEFUN MAKE-STATE-KEYS ...). ;;; Compiling (DEFUN ENCODE-POINTER-EVENT-MASK ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-COLOR-INTERNAL. ;;; Emitting code for PRINT-COLOR. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-COLOR. ;;; Emitting code for COLOR-RGB. ;;; Emitting code for MAKE-BITMAP-FORMAT. ;;; Emitting code for PRINT-BITMAP-FORMAT. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-PIXMAP-FORMAT. ;;; Emitting code for PRINT-PIXMAP-FORMAT. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-DISPLAY-INTERNAL. ;;; Emitting code for PRINT-DISPLAY-NAME. ;;; Emitting code for PRINT-DISPLAY. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-DRAWABLE. ;;; Emitting code for PRINT-DRAWABLE. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-WINDOW. ;;; Emitting code for MAKE-PIXMAP. ;;; Emitting code for MAKE-VISUAL-INFO. ;;; Emitting code for PRINT-VISUAL-INFO. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-COLORMAP. ;;; Emitting code for PRINT-COLORMAP. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-CURSOR. ;;; Emitting code for PRINT-CURSOR. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for ALIST. ;;; Emitting code for CLX-LIST. ;;; Emitting code for CLX-SEQUENCE. ;;; Emitting code for REPEAT-SEQ. ;;; Emitting code for MAKE-GCONTEXT. ;;; Emitting code for PRINT-GCONTEXT. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for BOOLE-CONSTANT. ;;; Emitting code for MAKE-SCREEN. ;;; Emitting code for PRINT-SCREEN. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for SCREEN-ROOT-VISUAL. ;;; Emitting code for MAKE-FONT-INFO. ;;; Emitting code for MAKE-FONT-INTERNAL. ;;; Emitting code for PRINT-FONT. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for FONT-ID. ;;; Emitting code for FONT-FONT-INFO. ;;; Emitting code for FONT-CHAR-INFOS. ;;; Emitting code for MAKE-FONT. ;;; Emitting code for FONT-DIRECTION. ;;; Emitting code for FONT-MIN-CHAR. ;;; Emitting code for FONT-MAX-CHAR. ;;; Emitting code for FONT-MIN-BYTE1. ;;; Emitting code for FONT-MAX-BYTE1. ;;; Emitting code for FONT-MIN-BYTE2. ;;; Emitting code for FONT-MAX-BYTE2. ;;; Emitting code for FONT-ALL-CHARS-EXIST-P. ;;; Emitting code for FONT-DEFAULT-CHAR. ;;; Emitting code for FONT-MIN-BOUNDS. ;;; Emitting code for FONT-MAX-BOUNDS. ;;; Emitting code for FONT-ASCENT. ;;; Emitting code for FONT-DESCENT. ;;; Emitting code for FONT-PROPERTIES. ;;; Emitting code for FONT-PROPERTY. ;;; Emitting code for WINDOW-EQUAL. ;;; Emitting code for PIXMAP-EQUAL. ;;; Emitting code for CURSOR-EQUAL. ;;; Emitting code for FONT-EQUAL. ;;; Emitting code for GCONTEXT-EQUAL. ;;; Emitting code for COLORMAP-EQUAL. ;;; Emitting code for DRAWABLE-EQUAL. ;;; Emitting code for ENCODE-MASK. ;;; Emitting code for DECODE-MASK. ;;; Emitting code for ENCODE-EVENT-MASK. ;;; Emitting code for MAKE-EVENT-MASK. ;;; Emitting code for MAKE-EVENT-KEYS. ;;; Emitting code for ENCODE-DEVICE-EVENT-MASK. ;;; Emitting code for ENCODE-MODIFIER-MASK. ;;; Emitting code for ENCODE-STATE-MASK. ;;; Emitting code for MAKE-STATE-MASK. ;;; Emitting code for MAKE-STATE-KEYS. ;;; Emitting code for ENCODE-POINTER-EVENT-MASK. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/clx.c -o clx/clx.o ;;; Finished compiling SRC:CLX;CLX.LISP. ;;; (compile-file "src:clx;dependent.lisp" :output-file #P"BUILD:CLX;DEPENDENT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;DEPENDENT.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *OUTPUT-BUFFER-SIZE* ...). ;;; Compiling (DEFPARAMETER *REPLY-TIMEOUT* ...). ;;; Compiling (DEFUN DECLARE-BUFMAC ...). ;;; Compiling (DEFUN DECLARE-BUFFUN ...). ;;; Compiling (DEFUN CARD8->INT8 ...). ;;; Compiling (DEFUN INT8->CARD8 ...). ;;; Compiling (DEFUN CARD16->INT16 ...). ;;; Compiling (DEFUN INT16->CARD16 ...). ;;; Compiling (DEFUN CARD32->INT32 ...). ;;; Compiling (DEFUN INT32->CARD32 ...). ;;; Compiling (DEFUN AREF-CARD8 ...). ;;; Compiling (DEFUN ASET-CARD8 ...). ;;; Compiling (DEFUN AREF-INT8 ...). ;;; Note: ;;; in file DEPENDENT.LISP, position 4568 ;;; at (DEFUN AREF-INT8 ...) ;;; Inlining CARD8->INT8 ;;; Compiling (DEFUN ASET-INT8 ...). ;;; Note: ;;; in file DEPENDENT.LISP, position 4568 ;;; at (DEFUN ASET-INT8 ...) ;;; Inlining INT8->CARD8 ;;; Compiling (DEFUN AREF-CARD16 ...). ;;; Compiling (DEFUN ASET-CARD16 ...). ;;; Compiling (DEFUN AREF-INT16 ...). ;;; Note: ;;; in file DEPENDENT.LISP, position 13190 ;;; at (DEFUN AREF-INT16 ...) ;;; Inlining AREF-INT8 ;;; Note: ;;; in file DEPENDENT.LISP, position 13190 ;;; at (DEFUN AREF-INT16 ...) ;;; Inlining CARD8->INT8 ;;; Compiling (DEFUN ASET-INT16 ...). ;;; Compiling (DEFUN AREF-CARD32 ...). ;;; Compiling (DEFUN ASET-CARD32 ...). ;;; Compiling (DEFUN AREF-INT32 ...). ;;; Note: ;;; in file DEPENDENT.LISP, position 13190 ;;; at (DEFUN AREF-INT32 ...) ;;; Inlining AREF-INT8 ;;; Note: ;;; in file DEPENDENT.LISP, position 13190 ;;; at (DEFUN AREF-INT32 ...) ;;; Inlining CARD8->INT8 ;;; Compiling (DEFUN ASET-INT32 ...). ;;; Compiling (DEFUN AREF-CARD29 ...). ;;; Compiling (DEFUN ASET-CARD29 ...). ;;; Compiling (DEFUN RGB-VAL->CARD16 ...). ;;; Compiling (DEFUN CARD16->RGB-VAL ...). ;;; Compiling (DEFUN RADIANS->INT16 ...). ;;; Compiling (DEFUN INT16->RADIANS ...). ;;; Compiling (DEFUN ANGLEP ...). ;;; Compiling (CHAR-TRANSLATORS). ;;; Compiling (CHAR-TRANSLATORS). ;;; Compiling (DEFUN MAKE-PROCESS-LOCK ...). ;;; Compiling (DEFMACRO HOLDING-LOCK ...). ;;; Style warning: ;;; in file DEPENDENT.LISP, position 31430 ;;; at (FSET 'HOLDING-LOCK ...) ;;; ! The variable WHOSTATE is not used. ;;; Compiling (DEFMACRO WITHOUT-ABORTS ...). ;;; Compiling (DEFUN PROCESS-BLOCK ...). ;;; Compiling (DEFUN PROCESS-WAKEUP ...). ;;; Compiling (DEFUN CURRENT-PROCESS ...). ;;; Compiling (DEFMACRO WITHOUT-INTERRUPTS ...). ;;; Compiling (DEFMACRO WITHOUT-INTERRUPTS ...). ;;; Compiling (DEFMACRO CONDITIONAL-STORE ...). ;;; Compiling (DEFMACRO WRAP-BUF-OUTPUT ...). ;;; Compiling (DEFMACRO WRAP-BUF-INPUT ...). ;;; Compiling (DEFUN OPEN-X-STREAM ...). ;;; Compiling (DEFUN BUFFER-READ-DEFAULT ...). ;;; Compiling (DEFUN BUFFER-WRITE-DEFAULT ...). ;;; Compiling (DEFUN BUFFER-FORCE-OUTPUT-DEFAULT ...). ;;; Note: ;;; in file DEPENDENT.LISP, position 63278 ;;; at (DEFUN BUFFER-FORCE-OUTPUT-DEFAULT ...) ;;; Checking type of (DISPLAY-OUTPUT-STREAM DISPLAY) to be (OR NULL STREAM) ;;; Compiling (DEFUN BUFFER-CLOSE-DEFAULT ...). ;;; Compiling (DEFPARAMETER *BUFFER-READ-POLLING-TIME* ...). ;;; Compiling (DEFUN BUFFER-INPUT-WAIT-DEFAULT ...). ;;; Note: ;;; in file DEPENDENT.LISP, position 64729 ;;; at (DEFUN BUFFER-INPUT-WAIT-DEFAULT ...) ;;; Checking type of (DISPLAY-INPUT-STREAM DISPLAY) to be (OR NULL STREAM) ;;; Compiling (DEFUN BUFFER-LISTEN-DEFAULT ...). ;;; Note: ;;; in file DEPENDENT.LISP, position 71867 ;;; at (DEFUN BUFFER-LISTEN-DEFAULT ...) ;;; Checking type of (DISPLAY-INPUT-STREAM DISPLAY) to be (OR NULL STREAM) ;;; Compiling (DEFMACRO WITH-STACK-LIST ...). ;;; Compiling (DEFMACRO WITH-STACK-LIST* ...). ;;; Compiling (DEFUN BUFFER-REPLACE ...). ;;; Compiling (DEFMACRO WITH-GCONTEXT-BINDINGS ...). ;;; Compiling (DEFMACRO TYPE? ...). ;;; Compiling (DEFUN X-TYPE-ERROR ...). ;;; Compiling (DEFUN DEFAULT-ERROR-HANDLER ...). ;;; Compiling (DEFUN X-ERROR ...). ;;; Compiling (DEFUN X-CERROR ...). ;;; Compiling (DEFUN X-ERROR ...). ;;; Compiling (DEFINE-CONDITION X-ERROR ...). ;;; Compiling (DEFUN HOST-ADDRESS ...). ;;; Style warning: ;;; in file DEPENDENT.LISP, position 102029 ;;; at (DEFUN HOST-ADDRESS ...) ;;; ! The variable FAMILY is not used. ;;; Compiling (DEFMACRO USE-CLOSURES ...). ;;; Compiling (DEFUN CLX-MACROEXPAND ...). ;;; Compiling (DEFUN GETENV ...). ;;; Compiling (DEFUN GET-HOST-NAME ...). ;;; Compiling (DEFUN HOMEDIR-FILE-PATHNAME ...). ;;; Compiling (DEFUN DEFAULT-RESOURCES-PATHNAME ...). ;;; Compiling (DEFUN RESOURCES-PATHNAME ...). ;;; Compiling (DEFUN AUTHORITY-PATHNAME ...). ;;; Compiling (DEFUN GET-DEFAULT-DISPLAY ...). ;;; Compiling (DEFUN GC-CLEANUP ...). ;;; Compiling (DEFUN DEFAULT-KEYSYM-TRANSLATE ...). ;;; Compiling (DEFMACRO READ-IMAGE-LOAD-BYTE ...). ;;; Compiling (DEFMACRO READ-IMAGE-ASSEMBLE-BYTES ...). ;;; Compiling (DEFMACRO WRITE-IMAGE-LOAD-BYTE ...). ;;; Compiling (DEFMACRO WRITE-IMAGE-ASSEMBLE-BYTES ...). ;;; Compiling (DEFUN FAST-READ-PIXARRAY ...). ;;; Compiling (DEFUN FAST-WRITE-PIXARRAY ...). ;;; Compiling (DEFUN FAST-COPY-PIXARRAY ...). ;;; End of Pass 1. ;;; Emitting code for DECLARE-BUFMAC. ;;; Emitting code for DECLARE-BUFFUN. ;;; Emitting code for CARD8->INT8. ;;; Emitting code for INT8->CARD8. ;;; Emitting code for CARD16->INT16. ;;; Emitting code for INT16->CARD16. ;;; Emitting code for CARD32->INT32. ;;; Emitting code for INT32->CARD32. ;;; Emitting code for AREF-CARD8. ;;; Emitting code for ASET-CARD8. ;;; Emitting code for AREF-INT8. ;;; Emitting code for ASET-INT8. ;;; Emitting code for AREF-CARD16. ;;; Emitting code for ASET-CARD16. ;;; Emitting code for AREF-INT16. ;;; Emitting code for ASET-INT16. ;;; Emitting code for AREF-CARD32. ;;; Emitting code for ASET-CARD32. ;;; Emitting code for AREF-INT32. ;;; Emitting code for ASET-INT32. ;;; Emitting code for AREF-CARD29. ;;; Emitting code for ASET-CARD29. ;;; Emitting code for AREF-CARD8. ;;; Emitting code for AREF-INT8. ;;; Emitting code for AREF-CARD16. ;;; Emitting code for AREF-INT16. ;;; Emitting code for AREF-CARD32. ;;; Emitting code for AREF-INT32. ;;; Emitting code for AREF-CARD29. ;;; Emitting code for RGB-VAL->CARD16. ;;; Emitting code for CARD16->RGB-VAL. ;;; Emitting code for RADIANS->INT16. ;;; Emitting code for INT16->RADIANS. ;;; Emitting code for ANGLEP. ;;; Emitting code for CHAR->CARD8. ;;; Emitting code for CARD8->CHAR. ;;; Emitting code for MAKE-PROCESS-LOCK. ;;; Emitting code for HOLDING-LOCK. ;;; Emitting code for WITHOUT-ABORTS. ;;; Emitting code for PROCESS-BLOCK. ;;; Emitting code for PROCESS-WAKEUP. ;;; Emitting code for CURRENT-PROCESS. ;;; Emitting code for WITHOUT-INTERRUPTS. ;;; Emitting code for WITHOUT-INTERRUPTS. ;;; Emitting code for CONDITIONAL-STORE. ;;; Emitting code for WRAP-BUF-OUTPUT. ;;; Emitting code for WRAP-BUF-INPUT. ;;; Emitting code for OPEN-X-STREAM. ;;; Emitting code for BUFFER-READ-DEFAULT. ;;; Emitting code for BUFFER-WRITE-DEFAULT. ;;; Emitting code for BUFFER-FORCE-OUTPUT-DEFAULT. ;;; Emitting code for BUFFER-CLOSE-DEFAULT. ;;; Emitting code for BUFFER-INPUT-WAIT-DEFAULT. ;;; Emitting code for BUFFER-LISTEN-DEFAULT. ;;; Emitting code for WITH-STACK-LIST. ;;; Emitting code for WITH-STACK-LIST*. ;;; Emitting code for BUFFER-REPLACE. ;;; Emitting code for WITH-GCONTEXT-BINDINGS. ;;; Emitting code for TYPE?. ;;; Emitting code for X-TYPE-ERROR. ;;; Emitting code for DEFAULT-ERROR-HANDLER. ;;; Emitting code for X-ERROR. ;;; Emitting code for X-CERROR. ;;; Emitting code for X-ERROR. ;;; Emitting code for HOST-ADDRESS. ;;; Emitting code for NO-HOST-ERROR. ;;; Emitting code for USE-CLOSURES. ;;; Emitting code for CLX-MACROEXPAND. ;;; Emitting code for GETENV. ;;; Emitting code for GET-HOST-NAME. ;;; Emitting code for HOMEDIR-FILE-PATHNAME. ;;; Emitting code for DEFAULT-RESOURCES-PATHNAME. ;;; Emitting code for RESOURCES-PATHNAME. ;;; Emitting code for AUTHORITY-PATHNAME. ;;; Emitting code for GET-DEFAULT-DISPLAY. ;;; Emitting code for GC-CLEANUP. ;;; Emitting code for DEFAULT-KEYSYM-TRANSLATE. ;;; Emitting code for READ-IMAGE-LOAD-BYTE. ;;; Emitting code for READ-IMAGE-ASSEMBLE-BYTES. ;;; Emitting code for WRITE-IMAGE-LOAD-BYTE. ;;; Emitting code for WRITE-IMAGE-ASSEMBLE-BYTES. ;;; Emitting code for FAST-READ-PIXARRAY. ;;; Emitting code for FAST-WRITE-PIXARRAY. ;;; Emitting code for FAST-COPY-PIXARRAY. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/dependent.c -o clx/dependent.o ;;; Finished compiling SRC:CLX;DEPENDENT.LISP. ;;; (compile-file "src:clx;macros.lisp" :output-file #P"BUILD:CLX;MACROS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;MACROS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO TYPE-CHECK ...). ;;; Compiling (DEFVAR *REQUIRED-ARG-DUMMY*). ;;; Compiling (DEFMACRO REQUIRED-ARG ...). ;;; Compiling (DEFMACRO LROUND ...). ;;; Compiling (DEFMACRO WROUND ...). ;;; Compiling (DEFUN INDEX-INCREMENT ...). ;;; Compiling (DEFUN GETIFY ...). ;;; Compiling (DEFUN PUTIFY ...). ;;; Compiling (DEFMACRO DEFINE-ACCESSOR ...). ;;; Compiling (DEFINE-ACCESSOR CARD32 ...). ;;; Compiling (DEFINE-ACCESSOR CARD32 ...). ;;; Compiling (DEFINE-ACCESSOR CARD29 ...). ;;; Compiling (DEFINE-ACCESSOR CARD29 ...). ;;; Compiling (DEFINE-ACCESSOR CARD16 ...). ;;; Compiling (DEFINE-ACCESSOR CARD16 ...). ;;; Compiling (DEFINE-ACCESSOR CARD8 ...). ;;; Compiling (DEFINE-ACCESSOR CARD8 ...). ;;; Compiling (DEFINE-ACCESSOR INTEGER ...). ;;; Compiling (DEFINE-ACCESSOR INTEGER ...). ;;; Compiling (DEFINE-ACCESSOR INT16 ...). ;;; Compiling (DEFINE-ACCESSOR INT16 ...). ;;; Compiling (DEFINE-ACCESSOR RGB-VAL ...). ;;; Compiling (DEFINE-ACCESSOR RGB-VAL ...). ;;; Compiling (DEFINE-ACCESSOR ANGLE ...). ;;; Compiling (DEFINE-ACCESSOR ANGLE ...). ;;; Compiling (DEFINE-ACCESSOR BIT ...). ;;; Compiling (DEFINE-ACCESSOR BIT ...). ;;; Compiling (DEFINE-ACCESSOR BOOLEAN ...). ;;; Compiling (DEFINE-ACCESSOR BOOLEAN ...). ;;; Compiling (DEFINE-ACCESSOR DRAWABLE ...). ;;; Compiling (DEFINE-ACCESSOR DRAWABLE ...). ;;; Compiling (DEFINE-ACCESSOR WINDOW ...). ;;; Compiling (DEFINE-ACCESSOR WINDOW ...). ;;; Compiling (DEFINE-ACCESSOR PIXMAP ...). ;;; Compiling (DEFINE-ACCESSOR PIXMAP ...). ;;; Compiling (DEFINE-ACCESSOR GCONTEXT ...). ;;; Compiling (DEFINE-ACCESSOR GCONTEXT ...). ;;; Compiling (DEFINE-ACCESSOR CURSOR ...). ;;; Compiling (DEFINE-ACCESSOR CURSOR ...). ;;; Compiling (DEFINE-ACCESSOR COLORMAP ...). ;;; Compiling (DEFINE-ACCESSOR COLORMAP ...). ;;; Compiling (DEFINE-ACCESSOR FONT ...). ;;; Compiling (DEFINE-ACCESSOR FONT ...). ;;; Compiling (DEFINE-ACCESSOR KEYWORD ...). ;;; Compiling (DEFINE-ACCESSOR KEYWORD ...). ;;; Compiling (DEFINE-ACCESSOR RESOURCE-ID ...). ;;; Compiling (DEFINE-ACCESSOR RESOURCE-ID ...). ;;; Compiling (DEFINE-ACCESSOR RESOURCE-ID-OR-NIL ...). ;;; Compiling (DEFINE-ACCESSOR RESOURCE-ID-OR-NIL ...). ;;; Compiling (DEFMACRO CHAR-INFO-GET ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER8 ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER8 ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER8 ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER16 ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER16 ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER16 ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER16-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER16-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER16-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER8-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER8-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR MEMBER8-VECTOR ...). ;;; Compiling (DEFINE-ACCESSOR BOOLE-CONSTANT ...). ;;; Compiling (DEFINE-ACCESSOR BOOLE-CONSTANT ...). ;;; Compiling (DEFINE-ACCESSOR BOOLE-CONSTANT ...). ;;; Compiling (DEFINE-ACCESSOR NULL ...). ;;; Compiling (DEFINE-ACCESSOR NULL ...). ;;; Compiling (DEFINE-ACCESSOR PAD8 ...). ;;; Compiling (DEFINE-ACCESSOR PAD8 ...). ;;; Compiling (DEFINE-ACCESSOR PAD16 ...). ;;; Compiling (DEFINE-ACCESSOR PAD16 ...). ;;; Compiling (DEFINE-ACCESSOR PAD32 ...). ;;; Compiling (DEFINE-ACCESSOR PAD32 ...). ;;; Compiling (DEFINE-ACCESSOR BIT-VECTOR256 ...). ;;; Compiling (DEFINE-ACCESSOR BIT-VECTOR256 ...). ;;; Compiling (DEFINE-ACCESSOR STRING ...). ;;; Compiling (DEFINE-ACCESSOR STRING ...). ;;; Note: ;;; in file MACROS.LISP, position 13980 ;;; at (DEFINE-ACCESSOR STRING ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 13980 ;;; at (DEFINE-ACCESSOR STRING ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 13980 ;;; at (DEFINE-ACCESSOR STRING ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 13980 ;;; at (DEFINE-ACCESSOR STRING ...) ;;; Checking type of (LOGAND (INDEX+ INDEX 3) -4) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 13980 ;;; at (DEFINE-ACCESSOR STRING ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 13980 ;;; at (DEFINE-ACCESSOR STRING ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 13980 ;;; at (DEFINE-ACCESSOR STRING ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Compiling (DEFINE-ACCESSOR SEQUENCE ...). ;;; Compiling (DEFINE-ACCESSOR SEQUENCE ...). ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of (LOGAND (INDEX+ INDEX 3) -4) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX INDEX) 4)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 14748 ;;; at (DEFINE-ACCESSOR SEQUENCE ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Compiling (DEFMACRO CLIENT-MESSAGE-EVENT-GET-SEQUENCE ...). ;;; Compiling (DEFMACRO CLIENT-MESSAGE-EVENT-PUT-SEQUENCE ...). ;;; Compiling (DEFINE-ACCESSOR CLIENT-MESSAGE-SEQUENCE ...). ;;; Compiling (DEFINE-ACCESSOR CLIENT-MESSAGE-SEQUENCE ...). ;;; Compiling (DEFINE-ACCESSOR CODE ...). ;;; Compiling (DEFINE-ACCESSOR CODE ...). ;;; Compiling (DEFINE-ACCESSOR CODE ...). ;;; Compiling (DEFINE-ACCESSOR LENGTH ...). ;;; Compiling (DEFINE-ACCESSOR LENGTH ...). ;;; Compiling (DEFINE-ACCESSOR LENGTH ...). ;;; Compiling (DEFINE-ACCESSOR DATA ...). ;;; Compiling (DEFINE-ACCESSOR DATA ...). ;;; Compiling (DEFINE-ACCESSOR DATA ...). ;;; Compiling (DEFMACRO OR-EXPAND ...). ;;; Note: ;;; in file MACROS.LISP, position 19310 ;;; at (FSET 'OR-EXPAND ...) ;;; Checking type of #:LET1051 to be LIST ;;; Note: ;;; in file MACROS.LISP, position 19310 ;;; at (FSET 'OR-EXPAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1046) to be LIST ;;; Note: ;;; in file MACROS.LISP, position 19310 ;;; at (FSET 'OR-EXPAND ...) ;;; Checking type of #:LOOP-LIST-TAIL1048 to be CONS ;;; Note: ;;; in file MACROS.LISP, position 19310 ;;; at (FSET 'OR-EXPAND ...) ;;; Checking type of #:LET1053 to be LIST ;;; Note: ;;; in file MACROS.LISP, position 19310 ;;; at (FSET 'OR-EXPAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1040) to be LIST ;;; Note: ;;; in file MACROS.LISP, position 19310 ;;; at (FSET 'OR-EXPAND ...) ;;; Checking type of #:LOOP-LIST-TAIL1042 to be CONS ;;; Compiling (DEFINE-ACCESSOR OR ...). ;;; Compiling (DEFINE-ACCESSOR OR ...). ;;; Compiling (DEFUN MASK-GET ...). ;;; Note: ;;; in file MACROS.LISP, position 21447 ;;; at (DEFUN MASK-GET ...) ;;; Checking type of #:LET1121 to be LIST ;;; Note: ;;; in file MACROS.LISP, position 21447 ;;; at (DEFUN MASK-GET ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1113) to be LIST ;;; Note: ;;; in file MACROS.LISP, position 21447 ;;; at (DEFUN MASK-GET ...) ;;; Checking type of #:LOOP-LIST-TAIL1115 to be CONS ;;; Compiling (DEFUN MASK-PUT ...). ;;; Compiling (DEFINE-ACCESSOR PROGN ...). ;;; Compiling (DEFINE-ACCESSOR PROGN ...). ;;; Compiling (DEFMACRO CHECK-PUT ...). ;;; Compiling (DEFUN GET-PUT-ITEMS ...). ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of #'(LAMBDA (TYPE INDEX ITEM ARGS) `((CHECK-PUT ,INDEX ,ITEM ,TYPE ,@ARGS))) to be (OR NULL FUNCTION) ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of (LOGAND (INDEX+ INDEX 1) -2) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of (LOGAND (INDEX+ INDEX 3) -4) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 25349 ;;; at (DEFUN GET-PUT-ITEMS ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Compiling (DEFMACRO WITH-BUFFER-REQUEST-INTERNAL ...). ;;; Note: ;;; in file MACROS.LISP, position 27657 ;;; at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 27657 ;;; at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 27657 ;;; at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 27657 ;;; at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...) ;;; Checking type of (LOGAND (INDEX+ INDEX 3) -4) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 27657 ;;; at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 27657 ;;; at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX ;;; Note: ;;; in file MACROS.LISP, position 27657 ;;; at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...) ;;; Checking type of INDEX to be ARRAY-INDEX ;;; Compiling (DEFMACRO WITH-BUFFER-REQUEST ...). ;;; Compiling (DEFMACRO WITH-BUFFER-REQUEST-AND-REPLY ...). ;;; Compiling (DEFMACRO COMPARE-REQUEST ...). ;;; Compiling (DEFMACRO PUT-ITEMS ...). ;;; Compiling (DEFMACRO DECODE-TYPE ...). ;;; Compiling (DEFMACRO ENCODE-TYPE ...). ;;; Compiling (DEFMACRO SET-DECODE-TYPE ...). ;;; Compiling (DEFMACRO THREADED-ATOMIC-PUSH ...). ;;; Compiling (DEFMACRO THREADED-ATOMIC-POP ...). ;;; Compiling (DEFMACRO THREADED-NCONC ...). ;;; Compiling (DEFMACRO THREADED-PUSH ...). ;;; Compiling (DEFMACRO THREADED-POP ...). ;;; Compiling (DEFMACRO THREADED-ENQUEUE ...). ;;; Compiling (DEFMACRO THREADED-DEQUEUE ...). ;;; Compiling (DEFMACRO THREADED-REQUEUE ...). ;;; Compiling (DEFMACRO THREADED-DOLIST ...). ;;; Compiling (DEFMACRO THREADED-DELETE ...). ;;; Compiling (DEFMACRO THREADED-LENGTH ...). ;;; End of Pass 1. ;;; Emitting code for TYPE-CHECK. ;;; Emitting code for REQUIRED-ARG. ;;; Emitting code for LROUND. ;;; Emitting code for WROUND. ;;; Emitting code for INDEX-INCREMENT. ;;; Emitting code for GETIFY. ;;; Emitting code for PUTIFY. ;;; Emitting code for DEFINE-ACCESSOR. ;;; Emitting code for CARD32-GET. ;;; Emitting code for CARD32-PUT. ;;; Emitting code for CARD29-GET. ;;; Emitting code for CARD29-PUT. ;;; Emitting code for CARD16-GET. ;;; Emitting code for CARD16-PUT. ;;; Emitting code for CARD8-GET. ;;; Emitting code for CARD8-PUT. ;;; Emitting code for INTEGER-GET. ;;; Emitting code for INTEGER-PUT. ;;; Emitting code for INT16-GET. ;;; Emitting code for INT16-PUT. ;;; Emitting code for RGB-VAL-GET. ;;; Emitting code for RGB-VAL-PUT. ;;; Emitting code for ANGLE-GET. ;;; Emitting code for ANGLE-PUT. ;;; Emitting code for BIT-GET. ;;; Emitting code for BIT-PUT. ;;; Emitting code for BOOLEAN-GET. ;;; Emitting code for BOOLEAN-PUT. ;;; Emitting code for DRAWABLE-GET. ;;; Emitting code for DRAWABLE-PUT. ;;; Emitting code for WINDOW-GET. ;;; Emitting code for WINDOW-PUT. ;;; Emitting code for PIXMAP-GET. ;;; Emitting code for PIXMAP-PUT. ;;; Emitting code for GCONTEXT-GET. ;;; Emitting code for GCONTEXT-PUT. ;;; Emitting code for CURSOR-GET. ;;; Emitting code for CURSOR-PUT. ;;; Emitting code for COLORMAP-GET. ;;; Emitting code for COLORMAP-PUT. ;;; Emitting code for FONT-GET. ;;; Emitting code for FONT-PUT. ;;; Emitting code for KEYWORD-GET. ;;; Emitting code for KEYWORD-PUT. ;;; Emitting code for RESOURCE-ID-GET. ;;; Emitting code for RESOURCE-ID-PUT. ;;; Emitting code for RESOURCE-ID-OR-NIL-GET. ;;; Emitting code for RESOURCE-ID-OR-NIL-PUT. ;;; Emitting code for CHAR-INFO-GET. ;;; Emitting code for MEMBER8-GET. ;;; Emitting code for MEMBER8-PUT. ;;; Emitting code for MEMBER8-PUT-PREDICATING. ;;; Emitting code for MEMBER16-GET. ;;; Emitting code for MEMBER16-PUT. ;;; Emitting code for MEMBER16-PUT-PREDICATING. ;;; Emitting code for MEMBER-GET. ;;; Emitting code for MEMBER-PUT. ;;; Emitting code for MEMBER-PUT-PREDICATING. ;;; Emitting code for MEMBER-VECTOR. ;;; Emitting code for MEMBER-VECTOR-GET. ;;; Emitting code for MEMBER-VECTOR-PUT. ;;; Emitting code for MEMBER-VECTOR-PUT-PREDICATING. ;;; Emitting code for MEMBER16-VECTOR-GET. ;;; Emitting code for MEMBER16-VECTOR-PUT. ;;; Emitting code for MEMBER16-VECTOR-PUT-PREDICATING. ;;; Emitting code for MEMBER8-VECTOR-GET. ;;; Emitting code for MEMBER8-VECTOR-PUT. ;;; Emitting code for MEMBER8-VECTOR-PUT-PREDICATING. ;;; Emitting code for BOOLE-CONSTANT-GET. ;;; Emitting code for BOOLE-CONSTANT-PUT. ;;; Emitting code for BOOLE-CONSTANT-PUT-PREDICATING. ;;; Emitting code for NULL-GET. ;;; Emitting code for NULL-PUT. ;;; Emitting code for PAD8-GET. ;;; Emitting code for PAD8-PUT. ;;; Emitting code for PAD16-GET. ;;; Emitting code for PAD16-PUT. ;;; Emitting code for PAD32-GET. ;;; Emitting code for PAD32-PUT. ;;; Emitting code for BIT-VECTOR256-GET. ;;; Emitting code for BIT-VECTOR256-PUT. ;;; Emitting code for STRING-GET. ;;; Emitting code for STRING-PUT. ;;; Emitting code for SEQUENCE-GET. ;;; Emitting code for SEQUENCE-PUT. ;;; Emitting code for MAKER. ;;; Emitting code for CLIENT-MESSAGE-EVENT-GET-SEQUENCE. ;;; Emitting code for CLIENT-MESSAGE-EVENT-PUT-SEQUENCE. ;;; Emitting code for CLIENT-MESSAGE-SEQUENCE-GET. ;;; Emitting code for CLIENT-MESSAGE-SEQUENCE-PUT. ;;; Emitting code for CODE-GET. ;;; Emitting code for CODE-PUT. ;;; Emitting code for CODE-PUT-PREDICATING. ;;; Emitting code for LENGTH-GET. ;;; Emitting code for LENGTH-PUT. ;;; Emitting code for LENGTH-PUT-PREDICATING. ;;; Emitting code for DATA-GET. ;;; Emitting code for DATA-PUT. ;;; Emitting code for DATA-PUT-PREDICATING. ;;; Emitting code for OR-EXPAND. ;;; Emitting code for #:G1043. ;;; Emitting code for #:G1049. ;;; Emitting code for OR-GET. ;;; Emitting code for OR-PUT. ;;; Emitting code for MASK-GET. ;;; Emitting code for #:G1116. ;;; Emitting code for #:G1122. ;;; Emitting code for MASK-PUT. ;;; Emitting code for #:G1125. ;;; Emitting code for PROGN-GET. ;;; Emitting code for PROGN-PUT. ;;; Emitting code for CHECK-PUT. ;;; Emitting code for GET-PUT-ITEMS. ;;; Emitting code for #:G1158. ;;; Emitting code for WITH-BUFFER-REQUEST-INTERNAL. ;;; Emitting code for WITH-BUFFER-REQUEST. ;;; Emitting code for WITH-BUFFER-REQUEST-AND-REPLY. ;;; Emitting code for COMPARE-REQUEST. ;;; Emitting code for PUT-ITEMS. ;;; Emitting code for DECODE-TYPE. ;;; Emitting code for ENCODE-TYPE. ;;; Emitting code for SET-DECODE-TYPE. ;;; Emitting code for THREADED-ATOMIC-PUSH. ;;; Emitting code for THREADED-ATOMIC-POP. ;;; Emitting code for THREADED-NCONC. ;;; Emitting code for THREADED-PUSH. ;;; Emitting code for THREADED-POP. ;;; Emitting code for THREADED-ENQUEUE. ;;; Emitting code for THREADED-DEQUEUE. ;;; Emitting code for THREADED-REQUEUE. ;;; Emitting code for THREADED-DOLIST. ;;; Emitting code for THREADED-DELETE. ;;; Emitting code for THREADED-LENGTH. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/macros.c -o clx/macros.o ;;; Finished compiling SRC:CLX;MACROS.LISP. ;;; (compile-file "src:clx;bufmac.lisp" :output-file #P"BUILD:CLX;BUFMAC.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;BUFMAC.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO WRITE-CARD8 ...). ;;; Compiling (DEFMACRO WRITE-INT8 ...). ;;; Compiling (DEFMACRO WRITE-CARD16 ...). ;;; Compiling (DEFMACRO WRITE-INT16 ...). ;;; Compiling (DEFMACRO WRITE-CARD32 ...). ;;; Compiling (DEFMACRO WRITE-INT32 ...). ;;; Compiling (DEFMACRO WRITE-CARD29 ...). ;;; Compiling (DEFMACRO WRITE-CHAR2B ...). ;;; Compiling (DEFMACRO SET-BUFFER-OFFSET ...). ;;; Compiling (DEFMACRO ADVANCE-BUFFER-OFFSET ...). ;;; Compiling (DEFMACRO WITH-BUFFER-OUTPUT ...). ;;; Compiling (DEFMACRO WRITING-BUFFER-CHUNKS ...). ;;; End of Pass 1. ;;; Emitting code for WRITE-CARD8. ;;; Emitting code for WRITE-INT8. ;;; Emitting code for WRITE-CARD16. ;;; Emitting code for WRITE-INT16. ;;; Emitting code for WRITE-CARD32. ;;; Emitting code for WRITE-INT32. ;;; Emitting code for WRITE-CARD29. ;;; Emitting code for WRITE-CHAR2B. ;;; Emitting code for SET-BUFFER-OFFSET. ;;; Emitting code for ADVANCE-BUFFER-OFFSET. ;;; Emitting code for WITH-BUFFER-OUTPUT. ;;; Emitting code for WRITING-BUFFER-CHUNKS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/bufmac.c -o clx/bufmac.o ;;; Finished compiling SRC:CLX;BUFMAC.LISP. ;;; (compile-file "src:clx;buffer.lisp" :output-file #P"BUILD:CLX;BUFFER.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;BUFFER.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO WITH-BUFFER ...). ;;; Compiling (DEFUN WITH-BUFFER-FUNCTION ...). ;;; Compiling (DEFMACRO READ-CARD8 ...). ;;; Compiling (DEFMACRO READ-INT8 ...). ;;; Compiling (DEFMACRO READ-CARD16 ...). ;;; Compiling (DEFMACRO READ-INT16 ...). ;;; Compiling (DEFMACRO READ-CARD32 ...). ;;; Compiling (DEFMACRO READ-INT32 ...). ;;; Compiling (DEFMACRO READ-CARD29 ...). ;;; Compiling (DEFMACRO EVENT-CODE ...). ;;; Compiling (DEFMACRO READING-EVENT ...). ;;; Compiling (DEFMACRO WITH-BUFFER-INPUT ...). ;;; Compiling (DEFUN MAKE-BUFFER ...). ;;; Compiling (DEFUN MAKE-REPLY-BUFFER ...). ;;; Compiling (DEFUN BUFFER-ENSURE-SIZE ...). ;;; Note: ;;; in file BUFFER.LISP, position 10084 ;;; at (DEFUN BUFFER-ENSURE-SIZE ...) ;;; Checking type of (BUFFER-SIZE BUFFER) to be ARRAY-INDEX ;;; Compiling (DEFUN BUFFER-PAD-REQUEST ...). ;;; Note: ;;; in file BUFFER.LISP, position 10980 ;;; at (DEFUN BUFFER-PAD-REQUEST ...) ;;; Checking type of (BUFFER-BOFFSET BUFFER) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 10980 ;;; at (DEFUN BUFFER-PAD-REQUEST ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (BUFFER-BOFFSET BUFFER)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 10980 ;;; at (DEFUN BUFFER-PAD-REQUEST ...) ;;; Checking type of (BUFFER-BOFFSET BUFFER) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 10980 ;;; at (DEFUN BUFFER-PAD-REQUEST ...) ;;; Checking type of (BUFFER-SIZE BUFFER) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 10980 ;;; at (DEFUN BUFFER-PAD-REQUEST ...) ;;; Checking type of (BUFFER-BOFFSET BUFFER) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 10980 ;;; at (DEFUN BUFFER-PAD-REQUEST ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX (BUFFER-BOFFSET BUFFER)) 4)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 10980 ;;; at (DEFUN BUFFER-PAD-REQUEST ...) ;;; Checking type of (BUFFER-BOFFSET BUFFER) to be ARRAY-INDEX ;;; Compiling (DEFUN BUFFER-NEW-REQUEST-NUMBER ...). ;;; Compiling (DEFUN WITH-BUFFER-REQUEST-FUNCTION ...). ;;; Compiling (DEFUN WITH-BUFFER-REQUEST-FUNCTION-NOLOCK ...). ;;; Compiling (DEFSTRUCT (PENDING-COMMAND # ...) ...). ;;; Compiling (DEFUN WITH-BUFFER-REQUEST-AND-REPLY-FUNCTION ...). ;;; Note: ;;; in file BUFFER.LISP, position 13044 ;;; at (DEFUN WITH-BUFFER-REQUEST-AND-REPLY-FUNCTION ...) ;;; Checking type of (READ-REPLY DISPLAY PENDING-COMMAND) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file BUFFER.LISP, position 13044 ;;; at (DEFUN WITH-BUFFER-REQUEST-AND-REPLY-FUNCTION ...) ;;; Checking type of #:G249 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file BUFFER.LISP, position 13044 ;;; at (DEFUN WITH-BUFFER-REQUEST-AND-REPLY-FUNCTION ...) ;;; Checking type of (READ-REPLY DISPLAY PENDING-COMMAND) to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFUN BUFFER-WRITE ...). ;;; Compiling (DEFUN BUFFER-FLUSH ...). ;;; Note: ;;; in file BUFFER.LISP, position 15039 ;;; at (DEFUN BUFFER-FLUSH ...) ;;; Checking type of (BUFFER-BOFFSET BUFFER) to be ARRAY-INDEX ;;; Compiling (DEFMACRO WITH-BUFFER-FLUSH-INHIBITED ...). ;;; Compiling (DEFUN BUFFER-FORCE-OUTPUT ...). ;;; Compiling (DEFUN CLOSE-BUFFER ...). ;;; Compiling (DEFUN BUFFER-INPUT ...). ;;; Compiling (DEFUN BUFFER-INPUT-WAIT ...). ;;; Compiling (DEFUN BUFFER-LISTEN ...). ;;; Compiling (DEFUN READ-SEQUENCE-STRING ...). ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of "" to be STRING ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX BUFFER-BOFFSET) (THE ARRAY-INDEX INDEX))) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of #:G282 to be BUFFER-BYTES ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of #:G283 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (MAKE-SEQUENCE 'STRING STRING-LENGTH) to be STRING ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX INDEX))) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of #:LET295 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Inlining CARD8->CHAR ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX J))) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (VALUES (+ (THE ARRAY-INDEX INDEX) 1))) (THE ARRAY-INDEX STRING-LENGTH))) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 18746 ;;; at (DEFUN READ-SEQUENCE-STRING ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX COUNT))) to be ARRAY-INDEX ;;; Compiling (DEFMACRO DEFINE-TRANSFORMED-SEQUENCE-READER ...). ;;; Compiling (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-CHAR ...). ;;; Note: ;;; in file BUFFER.LISP, position 20690 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-CHAR ...) ;;; Inlining CARD8->CHAR ;;; Note: ;;; in file BUFFER.LISP, position 20690 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-CHAR ...) ;;; Checking type of #:G354 to be CARD8 ;;; Compiling (DEFMACRO DEFINE-LIST-READERS ...). ;;; Compiling (DEFINE-LIST-READERS (READ-LIST-CARD8 READ-LIST-CARD8-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 22216 ;;; at (DEFINE-LIST-READERS (READ-LIST-CARD8 READ-LIST-CARD8-WITH-TRANSFORM) ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFINE-LIST-READERS (READ-LIST-CARD8 READ-LIST-CARD8-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 22216 ;;; at (DEFINE-LIST-READERS (READ-LIST-CARD8 READ-LIST-CARD8-WITH-TRANSFORM) ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN READ-SIMPLE-ARRAY-CARD8 ...). ;;; Note: ;;; in file BUFFER.LISP, position 22311 ;;; at (DEFUN READ-SIMPLE-ARRAY-CARD8 ...) ;;; Inlining BUFFER-REPLACE ;;; Compiling (DEFUN READ-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 22705 ;;; at (DEFUN READ-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN READ-VECTOR-CARD8 ...). ;;; Note: ;;; in file BUFFER.LISP, position 23558 ;;; at (DEFUN READ-VECTOR-CARD8 ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN READ-VECTOR-CARD8-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 24135 ;;; at (DEFUN READ-VECTOR-CARD8-WITH-TRANSFORM ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFMACRO DEFINE-SEQUENCE-READER ...). ;;; Compiling (DEFINE-SEQUENCE-READER READ-SEQUENCE-CARD8 ...). ;;; Compiling (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT8 ...). ;;; Note: ;;; in file BUFFER.LISP, position 26396 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT8 ...) ;;; Inlining CARD8->INT8 ;;; Note: ;;; in file BUFFER.LISP, position 26396 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT8 ...) ;;; Checking type of #:G449 to be CARD8 ;;; Compiling (DEFINE-LIST-READERS (READ-LIST-CARD16 READ-LIST-CARD16-WITH-TRANSFORM) ...). ;;; Compiling (DEFINE-LIST-READERS (READ-LIST-CARD16 READ-LIST-CARD16-WITH-TRANSFORM) ...). ;;; Compiling (DEFUN READ-SIMPLE-ARRAY-CARD16 ...). ;;; Compiling (DEFUN READ-SIMPLE-ARRAY-CARD16-WITH-TRANSFORM ...). ;;; Compiling (DEFUN READ-VECTOR-CARD16 ...). ;;; Compiling (DEFUN READ-VECTOR-CARD16-WITH-TRANSFORM ...). ;;; Compiling (DEFINE-SEQUENCE-READER READ-SEQUENCE-CARD16 ...). ;;; Compiling (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT16 ...). ;;; Note: ;;; in file BUFFER.LISP, position 30041 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT16 ...) ;;; Inlining CARD16->INT16 ;;; Note: ;;; in file BUFFER.LISP, position 30041 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT16 ...) ;;; Checking type of #:G489 to be CARD16 ;;; Compiling (DEFINE-LIST-READERS (READ-LIST-CARD32 READ-LIST-CARD32-WITH-TRANSFORM) ...). ;;; Compiling (DEFINE-LIST-READERS (READ-LIST-CARD32 READ-LIST-CARD32-WITH-TRANSFORM) ...). ;;; Compiling (DEFUN READ-SIMPLE-ARRAY-CARD32 ...). ;;; Compiling (DEFUN READ-SIMPLE-ARRAY-CARD32-WITH-TRANSFORM ...). ;;; Compiling (DEFUN READ-VECTOR-CARD32 ...). ;;; Compiling (DEFUN READ-VECTOR-CARD32-WITH-TRANSFORM ...). ;;; Compiling (DEFINE-SEQUENCE-READER READ-SEQUENCE-CARD32 ...). ;;; Compiling (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT32 ...). ;;; Note: ;;; in file BUFFER.LISP, position 33691 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT32 ...) ;;; Inlining CARD32->INT32 ;;; Note: ;;; in file BUFFER.LISP, position 33691 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT32 ...) ;;; Checking type of #:G529 to be CARD32 ;;; Compiling (DEFMACRO DEFINE-TRANSFORMED-SEQUENCE-WRITER ...). ;;; Compiling (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-CHAR ...). ;;; Note: ;;; in file BUFFER.LISP, position 34645 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-CHAR ...) ;;; Inlining CHAR->CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 34645 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-CHAR ...) ;;; Checking type of (FUNCALL TRANSFORM X) to be CHARACTER ;;; Note: ;;; in file BUFFER.LISP, position 34645 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-CHAR ...) ;;; Checking type of #:G546 to be BASE-CHAR ;;; Compiling (DEFMACRO DEFINE-LIST-WRITERS ...). ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-CARD8 WRITE-LIST-CARD8-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 36526 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CARD8 WRITE-LIST-CARD8-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 36526 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CARD8 WRITE-LIST-CARD8-WITH-TRANSFORM) ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-CARD8 WRITE-LIST-CARD8-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 36526 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CARD8 WRITE-LIST-CARD8-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 36526 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CARD8 WRITE-LIST-CARD8-WITH-TRANSFORM) ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD8 ...). ;;; Note: ;;; in file BUFFER.LISP, position 36706 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD8 ...) ;;; Checking type of DATA to be (SIMPLE-ARRAY CARD8 (*)) ;;; Note: ;;; in file BUFFER.LISP, position 36706 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD8 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 36706 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD8 ...) ;;; Inlining BUFFER-REPLACE ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 37270 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 37270 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN WRITE-VECTOR-CARD8 ...). ;;; Note: ;;; in file BUFFER.LISP, position 38069 ;;; at (DEFUN WRITE-VECTOR-CARD8 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 38069 ;;; at (DEFUN WRITE-VECTOR-CARD8 ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN WRITE-VECTOR-CARD8-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 38604 ;;; at (DEFUN WRITE-VECTOR-CARD8-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 38604 ;;; at (DEFUN WRITE-VECTOR-CARD8-WITH-TRANSFORM ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFMACRO DEFINE-SEQUENCE-WRITER ...). ;;; Compiling (DEFINE-SEQUENCE-WRITER WRITE-SEQUENCE-CARD8 ...). ;;; Compiling (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT8 ...). ;;; Note: ;;; in file BUFFER.LISP, position 40548 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT8 ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 40548 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT8 ...) ;;; Checking type of (FUNCALL TRANSFORM X) to be INT8 ;;; Note: ;;; in file BUFFER.LISP, position 40548 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT8 ...) ;;; Checking type of #:G711 to be INT8 ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-CARD16 WRITE-LIST-CARD16-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 40683 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CARD16 WRITE-LIST-CARD16-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-CARD16 WRITE-LIST-CARD16-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 40683 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CARD16 WRITE-LIST-CARD16-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD16 ...). ;;; Note: ;;; in file BUFFER.LISP, position 40782 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD16 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD16-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 41702 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD16-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-VECTOR-CARD16 ...). ;;; Note: ;;; in file BUFFER.LISP, position 42616 ;;; at (DEFUN WRITE-VECTOR-CARD16 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-VECTOR-CARD16-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 43536 ;;; at (DEFUN WRITE-VECTOR-CARD16-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFINE-SEQUENCE-WRITER WRITE-SEQUENCE-CARD16 ...). ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-INT16 WRITE-LIST-INT16-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 44720 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-INT16 WRITE-LIST-INT16-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-INT16 WRITE-LIST-INT16-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 44720 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-INT16 WRITE-LIST-INT16-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-INT16 ...). ;;; Note: ;;; in file BUFFER.LISP, position 44815 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-INT16 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-INT16-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 45729 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-INT16-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-VECTOR-INT16 ...). ;;; Note: ;;; in file BUFFER.LISP, position 46635 ;;; at (DEFUN WRITE-VECTOR-INT16 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-VECTOR-INT16-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 47551 ;;; at (DEFUN WRITE-VECTOR-INT16-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFINE-SEQUENCE-WRITER WRITE-SEQUENCE-INT16 ...). ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-CARD32 WRITE-LIST-CARD32-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 48723 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CARD32 WRITE-LIST-CARD32-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-CARD32 WRITE-LIST-CARD32-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 48723 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CARD32 WRITE-LIST-CARD32-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD32 ...). ;;; Note: ;;; in file BUFFER.LISP, position 48822 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD32 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD32-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 49742 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CARD32-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-VECTOR-CARD32 ...). ;;; Note: ;;; in file BUFFER.LISP, position 50656 ;;; at (DEFUN WRITE-VECTOR-CARD32 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFUN WRITE-VECTOR-CARD32-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 51576 ;;; at (DEFUN WRITE-VECTOR-CARD32-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Compiling (DEFINE-SEQUENCE-WRITER WRITE-SEQUENCE-CARD32 ...). ;;; Compiling (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT32 ...). ;;; Note: ;;; in file BUFFER.LISP, position 52725 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT32 ...) ;;; Inlining INT32->CARD32 ;;; Note: ;;; in file BUFFER.LISP, position 52725 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT32 ...) ;;; Checking type of (FUNCALL TRANSFORM X) to be INT32 ;;; Note: ;;; in file BUFFER.LISP, position 52725 ;;; at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT32 ...) ;;; Checking type of #:G954 to be INT32 ;;; Compiling (DEFUN READ-BITVECTOR256 ...). ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (OR DATA (MAKE-ARRAY 256 :ELEMENT-TYPE 'BIT :INITIAL-ELEMENT 0)) to be (SIMPLE-BIT-VECTOR 256) ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX BOFFSET) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of #:LET966 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of #:G976 to be BUFFER-BYTES ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of #:G977 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (VALUES (ASH (THE ARRAY-INDEX BYTE) -1)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (INDEX-ASH BYTE -1) to be CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (VALUES (ASH (THE ARRAY-INDEX BYTE) -1)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX K) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX J) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (+ (THE ARRAY-INDEX K) 1) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of #:G1020 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX K) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (+ (THE ARRAY-INDEX K) 1) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of #:G1032 to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file BUFFER.LISP, position 52829 ;;; at (DEFUN READ-BITVECTOR256 ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX J) 8)) to be ARRAY-INDEX ;;; Compiling (DEFUN WRITE-BITVECTOR256 ...). ;;; Note: ;;; in file BUFFER.LISP, position 53831 ;;; at (DEFUN WRITE-BITVECTOR256 ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 53831 ;;; at (DEFUN WRITE-BITVECTOR256 ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 54564 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 54564 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 54564 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...). ;;; Note: ;;; in file BUFFER.LISP, position 54564 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 54564 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 54564 ;;; at (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B ...). ;;; Note: ;;; in file BUFFER.LISP, position 54663 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 54663 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 54663 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 55257 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 55257 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 55257 ;;; at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN WRITE-VECTOR-CHAR2B ...). ;;; Note: ;;; in file BUFFER.LISP, position 56119 ;;; at (DEFUN WRITE-VECTOR-CHAR2B ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 56119 ;;; at (DEFUN WRITE-VECTOR-CHAR2B ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 56119 ;;; at (DEFUN WRITE-VECTOR-CHAR2B ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM ...). ;;; Note: ;;; in file BUFFER.LISP, position 56713 ;;; at (DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM ...) ;;; Checking type of BUFFER to be DISPLAY ;;; Note: ;;; in file BUFFER.LISP, position 56713 ;;; at (DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file BUFFER.LISP, position 56713 ;;; at (DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-SEQUENCE-WRITER WRITE-SEQUENCE-CHAR2B ...). ;;; End of Pass 1. ;;; Emitting code for WITH-BUFFER. ;;; Emitting code for WITH-BUFFER-FUNCTION. ;;; Emitting code for READ-CARD8. ;;; Emitting code for READ-INT8. ;;; Emitting code for READ-CARD16. ;;; Emitting code for READ-INT16. ;;; Emitting code for READ-CARD32. ;;; Emitting code for READ-INT32. ;;; Emitting code for READ-CARD29. ;;; Emitting code for EVENT-CODE. ;;; Emitting code for READING-EVENT. ;;; Emitting code for WITH-BUFFER-INPUT. ;;; Emitting code for MAKE-BUFFER. ;;; Emitting code for MAKE-REPLY-BUFFER. ;;; Emitting code for BUFFER-ENSURE-SIZE. ;;; Emitting code for BUFFER-PAD-REQUEST. ;;; Emitting code for BUFFER-NEW-REQUEST-NUMBER. ;;; Emitting code for WITH-BUFFER-REQUEST-FUNCTION. ;;; Emitting code for WITH-BUFFER-REQUEST-FUNCTION-NOLOCK. ;;; Emitting code for MAKE-PENDING-COMMAND. ;;; Emitting code for WITH-BUFFER-REQUEST-AND-REPLY-FUNCTION. ;;; Emitting code for BUFFER-WRITE. ;;; Emitting code for BUFFER-FLUSH. ;;; Emitting code for WITH-BUFFER-FLUSH-INHIBITED. ;;; Emitting code for BUFFER-FORCE-OUTPUT. ;;; Emitting code for CLOSE-BUFFER. ;;; Emitting code for BUFFER-INPUT. ;;; Emitting code for BUFFER-INPUT-WAIT. ;;; Emitting code for BUFFER-LISTEN. ;;; Emitting code for READ-SEQUENCE-STRING. ;;; Emitting code for DEFINE-TRANSFORMED-SEQUENCE-READER. ;;; Emitting code for READ-SEQUENCE-CHAR. ;;; Emitting code for #:G353. ;;; Emitting code for DEFINE-LIST-READERS. ;;; Emitting code for READ-LIST-CARD8. ;;; Emitting code for READ-LIST-CARD8-WITH-TRANSFORM. ;;; Emitting code for READ-SIMPLE-ARRAY-CARD8. ;;; Emitting code for READ-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM. ;;; Emitting code for READ-VECTOR-CARD8. ;;; Emitting code for READ-VECTOR-CARD8-WITH-TRANSFORM. ;;; Emitting code for DEFINE-SEQUENCE-READER. ;;; Emitting code for READ-SEQUENCE-CARD8. ;;; Emitting code for READ-SEQUENCE-INT8. ;;; Emitting code for #:G448. ;;; Emitting code for READ-LIST-CARD16. ;;; Emitting code for READ-LIST-CARD16-WITH-TRANSFORM. ;;; Emitting code for READ-SIMPLE-ARRAY-CARD16. ;;; Emitting code for READ-SIMPLE-ARRAY-CARD16-WITH-TRANSFORM. ;;; Emitting code for READ-VECTOR-CARD16. ;;; Emitting code for READ-VECTOR-CARD16-WITH-TRANSFORM. ;;; Emitting code for READ-SEQUENCE-CARD16. ;;; Emitting code for READ-SEQUENCE-INT16. ;;; Emitting code for #:G488. ;;; Emitting code for READ-LIST-CARD32. ;;; Emitting code for READ-LIST-CARD32-WITH-TRANSFORM. ;;; Emitting code for READ-SIMPLE-ARRAY-CARD32. ;;; Emitting code for READ-SIMPLE-ARRAY-CARD32-WITH-TRANSFORM. ;;; Emitting code for READ-VECTOR-CARD32. ;;; Emitting code for READ-VECTOR-CARD32-WITH-TRANSFORM. ;;; Emitting code for READ-SEQUENCE-CARD32. ;;; Emitting code for READ-SEQUENCE-INT32. ;;; Emitting code for #:G528. ;;; Emitting code for DEFINE-TRANSFORMED-SEQUENCE-WRITER. ;;; Emitting code for WRITE-SEQUENCE-CHAR. ;;; Emitting code for #:G545. ;;; Emitting code for DEFINE-LIST-WRITERS. ;;; Emitting code for WRITE-LIST-CARD8. ;;; Emitting code for WRITE-LIST-CARD8-WITH-TRANSFORM. ;;; Emitting code for WRITE-SIMPLE-ARRAY-CARD8. ;;; Emitting code for WRITE-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM. ;;; Emitting code for WRITE-VECTOR-CARD8. ;;; Emitting code for WRITE-VECTOR-CARD8-WITH-TRANSFORM. ;;; Emitting code for DEFINE-SEQUENCE-WRITER. ;;; Emitting code for WRITE-SEQUENCE-CARD8. ;;; Emitting code for WRITE-SEQUENCE-INT8. ;;; Emitting code for #:G710. ;;; Emitting code for WRITE-LIST-CARD16. ;;; Emitting code for WRITE-LIST-CARD16-WITH-TRANSFORM. ;;; Emitting code for WRITE-SIMPLE-ARRAY-CARD16. ;;; Emitting code for WRITE-SIMPLE-ARRAY-CARD16-WITH-TRANSFORM. ;;; Emitting code for WRITE-VECTOR-CARD16. ;;; Emitting code for WRITE-VECTOR-CARD16-WITH-TRANSFORM. ;;; Emitting code for WRITE-SEQUENCE-CARD16. ;;; Emitting code for WRITE-LIST-INT16. ;;; Emitting code for WRITE-LIST-INT16-WITH-TRANSFORM. ;;; Emitting code for WRITE-SIMPLE-ARRAY-INT16. ;;; Emitting code for WRITE-SIMPLE-ARRAY-INT16-WITH-TRANSFORM. ;;; Emitting code for WRITE-VECTOR-INT16. ;;; Emitting code for WRITE-VECTOR-INT16-WITH-TRANSFORM. ;;; Emitting code for WRITE-SEQUENCE-INT16. ;;; Emitting code for WRITE-LIST-CARD32. ;;; Emitting code for WRITE-LIST-CARD32-WITH-TRANSFORM. ;;; Emitting code for WRITE-SIMPLE-ARRAY-CARD32. ;;; Emitting code for WRITE-SIMPLE-ARRAY-CARD32-WITH-TRANSFORM. ;;; Emitting code for WRITE-VECTOR-CARD32. ;;; Emitting code for WRITE-VECTOR-CARD32-WITH-TRANSFORM. ;;; Emitting code for WRITE-SEQUENCE-CARD32. ;;; Emitting code for WRITE-SEQUENCE-INT32. ;;; Emitting code for #:G953. ;;; Emitting code for READ-BITVECTOR256. ;;; Emitting code for WRITE-BITVECTOR256. ;;; Emitting code for WRITE-LIST-CHAR2B. ;;; Emitting code for WRITE-LIST-CHAR2B-WITH-TRANSFORM. ;;; Emitting code for WRITE-SIMPLE-ARRAY-CHAR2B. ;;; Emitting code for WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM. ;;; Emitting code for WRITE-VECTOR-CHAR2B. ;;; Emitting code for WRITE-VECTOR-CHAR2B-WITH-TRANSFORM. ;;; Emitting code for WRITE-SEQUENCE-CHAR2B. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/buffer.c -o clx/buffer.o ;;; Finished compiling SRC:CLX;BUFFER.LISP. ;;; (compile-file "src:clx;display.lisp" :output-file #P"BUILD:CLX;DISPLAY.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;DISPLAY.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *KNOWN-AUTHORIZATIONS* ...). ;;; Compiling (DEFUN READ-XAUTH-ENTRY ...). ;;; Note: ;;; in file DISPLAY.LISP, position 1604 ;;; at (DEFUN READ-XAUTH-ENTRY ...) ;;; Inlining CARD8->CHAR ;;; Note: ;;; in file DISPLAY.LISP, position 1604 ;;; at (DEFUN READ-XAUTH-ENTRY ...) ;;; Checking type of #:G6 to be CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 1604 ;;; at (DEFUN READ-XAUTH-ENTRY ...) ;;; Inlining CARD8->CHAR ;;; Note: ;;; in file DISPLAY.LISP, position 1604 ;;; at (DEFUN READ-XAUTH-ENTRY ...) ;;; Checking type of #:G17 to be CARD8 ;;; Compiling (DEFUN GET-BEST-AUTHORIZATION ...). ;;; Compiling (DEFMACRO WITH-DISPLAY ...). ;;; Compiling (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...). ;;; Note: ;;; in file DISPLAY.LISP, position 7122 ;;; at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...) ;;; Checking type of #:LET65 to be ARRAY-INDEX ;;; Note: ;;; in file DISPLAY.LISP, position 7122 ;;; at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...) ;;; Checking type of #:LET66 to be MASK32 ;;; Note: ;;; in file DISPLAY.LISP, position 7122 ;;; at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX FIRST))) to be ARRAY-INDEX ;;; Note: ;;; in file DISPLAY.LISP, position 7122 ;;; at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...) ;;; Checking type of (ASH MASK -1) to be MASK32 ;;; Warning: ;;; in file DISPLAY.LISP, position 7122 ;;; at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...) ;;; ! Unsupported CONS type C::BYTE-SPECIFIER. Replacing it with T. ;;; Compiling (DEFUN RESOURCEALLOC ...). ;;; Note: ;;; in file DISPLAY.LISP, position 7663 ;;; at (DEFUN RESOURCEALLOC ...) ;;; Checking type of (1+ (DISPLAY-RESOURCE-ID-COUNT DISPLAY)) to be REAL ;;; Note: ;;; in file DISPLAY.LISP, position 7663 ;;; at (DEFUN RESOURCEALLOC ...) ;;; Checking type of #:LET87 to be REAL ;;; Compiling (DEFMACRO ALLOCATE-RESOURCE-ID ...). ;;; Compiling (DEFMACRO DEALLOCATE-RESOURCE-ID ...). ;;; Compiling (DEFUN DEALLOCATE-RESOURCE-ID-INTERNAL ...). ;;; Compiling (DEFUN LOOKUP-RESOURCE-ID ...). ;;; Compiling (DEFUN SAVE-ID ...). ;;; Compiling (GENERATE-LOOKUP-FUNCTIONS IGNORE ...). ;;; Compiling (GENERATE-LOOKUP-FUNCTIONS IGNORE ...). ;;; Compiling (GENERATE-LOOKUP-FUNCTIONS IGNORE ...). ;;; Compiling (GENERATE-LOOKUP-FUNCTIONS IGNORE ...). ;;; Compiling (GENERATE-LOOKUP-FUNCTIONS IGNORE ...). ;;; Compiling (GENERATE-LOOKUP-FUNCTIONS IGNORE ...). ;;; Compiling (GENERATE-LOOKUP-FUNCTIONS IGNORE ...). ;;; Compiling (DEFUN ID-ATOM ...). ;;; Compiling (DEFUN ATOM-ID ...). ;;; Compiling (DEFUN SET-ATOM-ID ...). ;;; Compiling (DEFUN INITIALIZE-PREDEFINED-ATOMS ...). ;;; Note: ;;; in file DISPLAY.LISP, position 13169 ;;; at (DEFUN INITIALIZE-PREDEFINED-ATOMS ...) ;;; Checking type of 0 to be RESOURCE-ID ;;; Compiling (DEFUN VISUAL-INFO ...). ;;; Note: ;;; in file DISPLAY.LISP, position 13355 ;;; at (DEFUN VISUAL-INFO ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G161)) to be SCREEN ;;; Note: ;;; in file DISPLAY.LISP, position 13355 ;;; at (DEFUN VISUAL-INFO ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G164)) to be CONS ;;; Note: ;;; in file DISPLAY.LISP, position 13355 ;;; at (DEFUN VISUAL-INFO ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G167)) to be VISUAL-INFO ;;; Compiling (DEFMACRO WITH-EVENT-QUEUE ...). ;;; Compiling (DEFUN WITH-EVENT-QUEUE-FUNCTION ...). ;;; Note: ;;; in file DISPLAY.LISP, position 15168 ;;; at (DEFUN WITH-EVENT-QUEUE-FUNCTION ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK190) to be FIXNUM ;;; Compiling (DEFMACRO WITH-EVENT-QUEUE-INTERNAL ...). ;;; Compiling (DEFUN OPEN-DEFAULT-DISPLAY ...). ;;; Compiling (DEFUN OPEN-DISPLAY ...). ;;; Compiling (DEFUN DISPLAY-FORCE-OUTPUT ...). ;;; Compiling (DEFUN CLOSE-DISPLAY ...). ;;; Compiling (DEFUN DISPLAY-CONNECT ...). ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Checking type of (ALLOCATE-REPLY-BUFFER 4096) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Checking type of REPLY-BUFFER to be REPLY-BUFFER ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 19672 ;;; at (DEFUN DISPLAY-CONNECT ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN DISPLAY-PROTOCOL-VERSION ...). ;;; Compiling (DEFUN DISPLAY-VENDOR ...). ;;; Compiling (DEFUN DISPLAY-NSCREENS ...). ;;; Compiling (DEFVAR *INSIDE-DISPLAY-AFTER-FUNCTION* ...). ;;; Compiling (DEFUN DISPLAY-INVOKE-AFTER-FUNCTION ...). ;;; Compiling (DEFUN DISPLAY-FINISH-OUTPUT ...). ;;; Note: ;;; in file DISPLAY.LISP, position 30401 ;;; at (DEFUN DISPLAY-FINISH-OUTPUT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DISPLAY.LISP, position 30401 ;;; at (DEFUN DISPLAY-FINISH-OUTPUT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file DISPLAY.LISP, position 30401 ;;; at (DEFUN DISPLAY-FINISH-OUTPUT ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file DISPLAY.LISP, position 30401 ;;; at (DEFUN DISPLAY-FINISH-OUTPUT ...) ;;; Checking type of #:LET602 to be REPLY-BUFFER ;;; Compiling (DEFPARAMETER *REQUEST-NAMES* ...). ;;; End of Pass 1. ;;; Warning: ;;; in file display.lisp, position 7122 ;;; at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...) ;;; ! Unsupported CONS type C::BYTE-SPECIFIER. Replacing it with T. ;;; Emitting code for READ-XAUTH-ENTRY. ;;; Emitting code for READ-SHORT-LENGTH-VECTOR. ;;; Emitting code for READ-SHORT-LENGTH-STRING. ;;; Emitting code for READ-SHORT. ;;; Emitting code for GET-BEST-AUTHORIZATION. ;;; Emitting code for WITH-DISPLAY. ;;; Emitting code for INITIALIZE-RESOURCE-ALLOCATOR. ;;; Emitting code for RESOURCEALLOC. ;;; Emitting code for ALLOCATE-RESOURCE-ID. ;;; Emitting code for DEALLOCATE-RESOURCE-ID. ;;; Emitting code for DEALLOCATE-RESOURCE-ID-INTERNAL. ;;; Emitting code for LOOKUP-RESOURCE-ID. ;;; Emitting code for SAVE-ID. ;;; Emitting code for LOOKUP-DRAWABLE. ;;; Emitting code for LOOKUP-WINDOW. ;;; Emitting code for LOOKUP-PIXMAP. ;;; Emitting code for LOOKUP-GCONTEXT. ;;; Emitting code for LOOKUP-CURSOR. ;;; Emitting code for LOOKUP-COLORMAP. ;;; Emitting code for LOOKUP-FONT. ;;; Emitting code for ID-ATOM. ;;; Emitting code for ATOM-ID. ;;; Emitting code for SET-ATOM-ID. ;;; Emitting code for INITIALIZE-PREDEFINED-ATOMS. ;;; Emitting code for VISUAL-INFO. ;;; Emitting code for WITH-EVENT-QUEUE. ;;; Emitting code for WITH-EVENT-QUEUE-FUNCTION. ;;; Emitting code for WITH-EVENT-QUEUE-INTERNAL. ;;; Emitting code for OPEN-DEFAULT-DISPLAY. ;;; Emitting code for OPEN-DISPLAY. ;;; Emitting code for DISPLAY-FORCE-OUTPUT. ;;; Emitting code for CLOSE-DISPLAY. ;;; Emitting code for DISPLAY-CONNECT. ;;; Emitting code for DISPLAY-PROTOCOL-VERSION. ;;; Emitting code for DISPLAY-VENDOR. ;;; Emitting code for DISPLAY-NSCREENS. ;;; Emitting code for DISPLAY-INVOKE-AFTER-FUNCTION. ;;; Emitting code for DISPLAY-FINISH-OUTPUT. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/display.c -o clx/display.o ;;; Finished compiling SRC:CLX;DISPLAY.LISP. ;;; (compile-file "src:clx;gcontext.lisp" :output-file #P"BUILD:CLX;GCONTEXT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;GCONTEXT.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEF-GC-INTERNALS IGNORE ...). ;;; Compiling (DEFSTRUCT (GCONTEXT-EXTENSION # ...) ...). ;;; Compiling (DEFVAR *GCONTEXT-EXTENSIONS* ...). ;;; Compiling (DEFVAR *GCONTEXT-LOCAL-STATE-CACHE* ...). ;;; Compiling (DEFMACRO GCONTEXT-STATE-NEXT ...). ;;; Compiling (DEFUN ALLOCATE-GCONTEXT-STATE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 5032 ;;; at (DEFUN ALLOCATE-GCONTEXT-STATE ...) ;;; Checking type of *GCONTEXT-DATA-LENGTH* to be ARRAY-INDEX ;;; Note: ;;; in file GCONTEXT.LISP, position 5032 ;;; at (DEFUN ALLOCATE-GCONTEXT-STATE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX *GCONTEXT-DATA-LENGTH*) (THE ARRAY-INDEX (LENGTH *GCONTEXT-EXTENSIONS*)))) to be ARRAY-INDEX ;;; Note: ;;; in file GCONTEXT.LISP, position 5032 ;;; at (DEFUN ALLOCATE-GCONTEXT-STATE ...) ;;; Checking type of *GCONTEXT-DATA-LENGTH* to be ARRAY-INDEX ;;; Note: ;;; in file GCONTEXT.LISP, position 5032 ;;; at (DEFUN ALLOCATE-GCONTEXT-STATE ...) ;;; Checking type of *GCONTEXT-LOCAL-STATE-CACHE* to be (OR NULL GCONTEXT-STATE) ;;; Note: ;;; in file GCONTEXT.LISP, position 5032 ;;; at (DEFUN ALLOCATE-GCONTEXT-STATE ...) ;;; Checking type of (OR (THREADED-ATOMIC-POP *GCONTEXT-LOCAL-STATE-CACHE* GCONTEXT-STATE-NEXT GCONTEXT-STATE) (MAKE-ARRAY LENGTH :INITIAL-ELEMENT NIL)) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 5032 ;;; at (DEFUN ALLOCATE-GCONTEXT-STATE ...) ;;; Checking type of *GCONTEXT-LOCAL-STATE-CACHE* to be (OR NULL GCONTEXT-STATE) ;;; Compiling (DEFUN DEALLOCATE-GCONTEXT-STATE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 5674 ;;; at (DEFUN DEALLOCATE-GCONTEXT-STATE ...) ;;; Checking type of *GCONTEXT-LOCAL-STATE-CACHE* to be (OR NULL GCONTEXT-STATE) ;;; Compiling (DEFVAR *TEMP-GCONTEXT-CACHE* ...). ;;; Compiling (DEFUN ALLOCATE-TEMP-GCONTEXT ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 5986 ;;; at (DEFUN ALLOCATE-TEMP-GCONTEXT ...) ;;; Checking type of *TEMP-GCONTEXT-CACHE* to be (OR NULL GCONTEXT) ;;; Compiling (DEFUN DEALLOCATE-TEMP-GCONTEXT ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 6153 ;;; at (DEFUN DEALLOCATE-TEMP-GCONTEXT ...) ;;; Checking type of *TEMP-GCONTEXT-CACHE* to be (OR NULL GCONTEXT) ;;; Compiling (DEFMACRO XGCMASK->GCMASK ...). ;;; Compiling (DEFMACRO ACCESS-GCONTEXT ...). ;;; Compiling (DEFMACRO MODIFY-GCONTEXT ...). ;;; Compiling (DEFMACRO DEF-GC-ACCESSOR ...). ;;; Compiling (DEFMACRO INCF-INTERNAL-TIMESTAMP ...). ;;; Compiling (DEF-GC-ACCESSOR FUNCTION ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9510 ;;; at (DEF-GC-ACCESSOR FUNCTION ...) ;;; Checking type of (GCONTEXT-INTERNAL-FUNCTION (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9510 ;;; at (DEF-GC-ACCESSOR FUNCTION ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 9510 ;;; at (DEF-GC-ACCESSOR FUNCTION ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (16)) ;;; Compiling (DEF-GC-ACCESSOR FUNCTION ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9510 ;;; at (DEF-GC-ACCESSOR FUNCTION ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 9510 ;;; at (DEF-GC-ACCESSOR FUNCTION ...) ;;; Checking type of +BOOLE-VECTOR+ to be SIMPLE-VECTOR ;;; Compiling (DEF-GC-ACCESSOR PLANE-MASK ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9553 ;;; at (DEF-GC-ACCESSOR PLANE-MASK ...) ;;; Checking type of (GCONTEXT-INTERNAL-PLANE-MASK (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9553 ;;; at (DEF-GC-ACCESSOR PLANE-MASK ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Compiling (DEF-GC-ACCESSOR PLANE-MASK ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9553 ;;; at (DEF-GC-ACCESSOR PLANE-MASK ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEF-GC-ACCESSOR FOREGROUND ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9589 ;;; at (DEF-GC-ACCESSOR FOREGROUND ...) ;;; Checking type of (GCONTEXT-INTERNAL-FOREGROUND (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9589 ;;; at (DEF-GC-ACCESSOR FOREGROUND ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Compiling (DEF-GC-ACCESSOR FOREGROUND ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9589 ;;; at (DEF-GC-ACCESSOR FOREGROUND ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEF-GC-ACCESSOR BACKGROUND ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9625 ;;; at (DEF-GC-ACCESSOR BACKGROUND ...) ;;; Checking type of (GCONTEXT-INTERNAL-BACKGROUND (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9625 ;;; at (DEF-GC-ACCESSOR BACKGROUND ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Compiling (DEF-GC-ACCESSOR BACKGROUND ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9625 ;;; at (DEF-GC-ACCESSOR BACKGROUND ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEF-GC-ACCESSOR LINE-WIDTH ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9661 ;;; at (DEF-GC-ACCESSOR LINE-WIDTH ...) ;;; Checking type of (GCONTEXT-INTERNAL-LINE-WIDTH (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9661 ;;; at (DEF-GC-ACCESSOR LINE-WIDTH ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Compiling (DEF-GC-ACCESSOR LINE-WIDTH ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9661 ;;; at (DEF-GC-ACCESSOR LINE-WIDTH ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEF-GC-ACCESSOR LINE-STYLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9697 ;;; at (DEF-GC-ACCESSOR LINE-STYLE ...) ;;; Checking type of (GCONTEXT-INTERNAL-LINE-STYLE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9697 ;;; at (DEF-GC-ACCESSOR LINE-STYLE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 9697 ;;; at (DEF-GC-ACCESSOR LINE-STYLE ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (3)) ;;; Compiling (DEF-GC-ACCESSOR LINE-STYLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9697 ;;; at (DEF-GC-ACCESSOR LINE-STYLE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 9697 ;;; at (DEF-GC-ACCESSOR LINE-STYLE ...) ;;; Checking type of '#(:SOLID :DASH :DOUBLE-DASH) to be SIMPLE-VECTOR ;;; Compiling (DEF-GC-ACCESSOR CAP-STYLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9761 ;;; at (DEF-GC-ACCESSOR CAP-STYLE ...) ;;; Checking type of (GCONTEXT-INTERNAL-CAP-STYLE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9761 ;;; at (DEF-GC-ACCESSOR CAP-STYLE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 9761 ;;; at (DEF-GC-ACCESSOR CAP-STYLE ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (4)) ;;; Compiling (DEF-GC-ACCESSOR CAP-STYLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9761 ;;; at (DEF-GC-ACCESSOR CAP-STYLE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 9761 ;;; at (DEF-GC-ACCESSOR CAP-STYLE ...) ;;; Checking type of '#(:NOT-LAST :BUTT :ROUND :PROJECTING) to be SIMPLE-VECTOR ;;; Compiling (DEF-GC-ACCESSOR JOIN-STYLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9833 ;;; at (DEF-GC-ACCESSOR JOIN-STYLE ...) ;;; Checking type of (GCONTEXT-INTERNAL-JOIN-STYLE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9833 ;;; at (DEF-GC-ACCESSOR JOIN-STYLE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 9833 ;;; at (DEF-GC-ACCESSOR JOIN-STYLE ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (3)) ;;; Compiling (DEF-GC-ACCESSOR JOIN-STYLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9833 ;;; at (DEF-GC-ACCESSOR JOIN-STYLE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 9833 ;;; at (DEF-GC-ACCESSOR JOIN-STYLE ...) ;;; Checking type of '#(:MITER :ROUND :BEVEL) to be SIMPLE-VECTOR ;;; Compiling (DEF-GC-ACCESSOR FILL-STYLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9892 ;;; at (DEF-GC-ACCESSOR FILL-STYLE ...) ;;; Checking type of (GCONTEXT-INTERNAL-FILL-STYLE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9892 ;;; at (DEF-GC-ACCESSOR FILL-STYLE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 9892 ;;; at (DEF-GC-ACCESSOR FILL-STYLE ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (4)) ;;; Compiling (DEF-GC-ACCESSOR FILL-STYLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9892 ;;; at (DEF-GC-ACCESSOR FILL-STYLE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 9892 ;;; at (DEF-GC-ACCESSOR FILL-STYLE ...) ;;; Checking type of '#(:SOLID :TILED :STIPPLED :OPAQUE-STIPPLED) to be SIMPLE-VECTOR ;;; Compiling (DEF-GC-ACCESSOR FILL-RULE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9971 ;;; at (DEF-GC-ACCESSOR FILL-RULE ...) ;;; Checking type of (GCONTEXT-INTERNAL-FILL-RULE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 9971 ;;; at (DEF-GC-ACCESSOR FILL-RULE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 9971 ;;; at (DEF-GC-ACCESSOR FILL-RULE ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (2)) ;;; Compiling (DEF-GC-ACCESSOR FILL-RULE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 9971 ;;; at (DEF-GC-ACCESSOR FILL-RULE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 9971 ;;; at (DEF-GC-ACCESSOR FILL-RULE ...) ;;; Checking type of '#(:EVEN-ODD :WINDING) to be SIMPLE-VECTOR ;;; Compiling (DEF-GC-ACCESSOR TILE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10027 ;;; at (DEF-GC-ACCESSOR TILE ...) ;;; Checking type of (GCONTEXT-INTERNAL-TILE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10027 ;;; at (DEF-GC-ACCESSOR TILE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Compiling (DEF-GC-ACCESSOR TILE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10027 ;;; at (DEF-GC-ACCESSOR TILE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEF-GC-ACCESSOR STIPPLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10057 ;;; at (DEF-GC-ACCESSOR STIPPLE ...) ;;; Checking type of (GCONTEXT-INTERNAL-STIPPLE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10057 ;;; at (DEF-GC-ACCESSOR STIPPLE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Compiling (DEF-GC-ACCESSOR STIPPLE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10057 ;;; at (DEF-GC-ACCESSOR STIPPLE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEF-GC-ACCESSOR TS-X ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10090 ;;; at (DEF-GC-ACCESSOR TS-X ...) ;;; Checking type of (GCONTEXT-INTERNAL-TS-X (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10090 ;;; at (DEF-GC-ACCESSOR TS-X ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 10090 ;;; at (DEF-GC-ACCESSOR TS-X ...) ;;; Inlining CARD16->INT16 ;;; Note: ;;; in file GCONTEXT.LISP, position 10090 ;;; at (DEF-GC-ACCESSOR TS-X ...) ;;; Checking type of #:G1148 to be CARD16 ;;; Compiling (DEF-GC-ACCESSOR TS-X ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10090 ;;; at (DEF-GC-ACCESSOR TS-X ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 10090 ;;; at (DEF-GC-ACCESSOR TS-X ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file GCONTEXT.LISP, position 10090 ;;; at (DEF-GC-ACCESSOR TS-X ...) ;;; Checking type of #:G1178 to be INT16 ;;; Compiling (DEF-GC-ACCESSOR TS-Y ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10145 ;;; at (DEF-GC-ACCESSOR TS-Y ...) ;;; Checking type of (GCONTEXT-INTERNAL-TS-Y (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10145 ;;; at (DEF-GC-ACCESSOR TS-Y ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 10145 ;;; at (DEF-GC-ACCESSOR TS-Y ...) ;;; Inlining CARD16->INT16 ;;; Note: ;;; in file GCONTEXT.LISP, position 10145 ;;; at (DEF-GC-ACCESSOR TS-Y ...) ;;; Checking type of #:G1214 to be CARD16 ;;; Compiling (DEF-GC-ACCESSOR TS-Y ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10145 ;;; at (DEF-GC-ACCESSOR TS-Y ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 10145 ;;; at (DEF-GC-ACCESSOR TS-Y ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file GCONTEXT.LISP, position 10145 ;;; at (DEF-GC-ACCESSOR TS-Y ...) ;;; Checking type of #:G1244 to be INT16 ;;; Compiling (DEF-GC-ACCESSOR SUBWINDOW-MODE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10243 ;;; at (DEF-GC-ACCESSOR SUBWINDOW-MODE ...) ;;; Checking type of (GCONTEXT-INTERNAL-SUBWINDOW-MODE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10243 ;;; at (DEF-GC-ACCESSOR SUBWINDOW-MODE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 10243 ;;; at (DEF-GC-ACCESSOR SUBWINDOW-MODE ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (2)) ;;; Compiling (DEF-GC-ACCESSOR SUBWINDOW-MODE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10243 ;;; at (DEF-GC-ACCESSOR SUBWINDOW-MODE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 10243 ;;; at (DEF-GC-ACCESSOR SUBWINDOW-MODE ...) ;;; Checking type of '#(:CLIP-BY-CHILDREN :INCLUDE-INFERIORS) to be SIMPLE-VECTOR ;;; Compiling (DEF-GC-ACCESSOR EXPOSURES ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10321 ;;; at (DEF-GC-ACCESSOR EXPOSURES ...) ;;; Checking type of (GCONTEXT-INTERNAL-EXPOSURES (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10321 ;;; at (DEF-GC-ACCESSOR EXPOSURES ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 10321 ;;; at (DEF-GC-ACCESSOR EXPOSURES ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (2)) ;;; Compiling (DEF-GC-ACCESSOR EXPOSURES ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10321 ;;; at (DEF-GC-ACCESSOR EXPOSURES ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 10321 ;;; at (DEF-GC-ACCESSOR EXPOSURES ...) ;;; Checking type of '#(:OFF :ON) to be SIMPLE-VECTOR ;;; Compiling (DEF-GC-ACCESSOR CLIP-X ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10367 ;;; at (DEF-GC-ACCESSOR CLIP-X ...) ;;; Checking type of (GCONTEXT-INTERNAL-CLIP-X (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10367 ;;; at (DEF-GC-ACCESSOR CLIP-X ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 10367 ;;; at (DEF-GC-ACCESSOR CLIP-X ...) ;;; Inlining CARD16->INT16 ;;; Note: ;;; in file GCONTEXT.LISP, position 10367 ;;; at (DEF-GC-ACCESSOR CLIP-X ...) ;;; Checking type of #:G1402 to be CARD16 ;;; Compiling (DEF-GC-ACCESSOR CLIP-X ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10367 ;;; at (DEF-GC-ACCESSOR CLIP-X ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 10367 ;;; at (DEF-GC-ACCESSOR CLIP-X ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file GCONTEXT.LISP, position 10367 ;;; at (DEF-GC-ACCESSOR CLIP-X ...) ;;; Checking type of #:G1432 to be INT16 ;;; Compiling (DEF-GC-ACCESSOR CLIP-Y ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10398 ;;; at (DEF-GC-ACCESSOR CLIP-Y ...) ;;; Checking type of (GCONTEXT-INTERNAL-CLIP-Y (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10398 ;;; at (DEF-GC-ACCESSOR CLIP-Y ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 10398 ;;; at (DEF-GC-ACCESSOR CLIP-Y ...) ;;; Inlining CARD16->INT16 ;;; Note: ;;; in file GCONTEXT.LISP, position 10398 ;;; at (DEF-GC-ACCESSOR CLIP-Y ...) ;;; Checking type of #:G1468 to be CARD16 ;;; Compiling (DEF-GC-ACCESSOR CLIP-Y ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10398 ;;; at (DEF-GC-ACCESSOR CLIP-Y ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 10398 ;;; at (DEF-GC-ACCESSOR CLIP-Y ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file GCONTEXT.LISP, position 10398 ;;; at (DEF-GC-ACCESSOR CLIP-Y ...) ;;; Checking type of #:G1498 to be INT16 ;;; Compiling (DEF-GC-ACCESSOR DASH-OFFSET ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10474 ;;; at (DEF-GC-ACCESSOR DASH-OFFSET ...) ;;; Checking type of (GCONTEXT-INTERNAL-DASH-OFFSET (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10474 ;;; at (DEF-GC-ACCESSOR DASH-OFFSET ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Compiling (DEF-GC-ACCESSOR DASH-OFFSET ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10474 ;;; at (DEF-GC-ACCESSOR DASH-OFFSET ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEF-GC-ACCESSOR ARC-MODE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10553 ;;; at (DEF-GC-ACCESSOR ARC-MODE ...) ;;; Checking type of (GCONTEXT-INTERNAL-ARC-MODE (GCONTEXT-LOCAL-STATE GCONTEXT)) to be (OR NULL CARD32) ;;; Note: ;;; in file GCONTEXT.LISP, position 10553 ;;; at (DEF-GC-ACCESSOR ARC-MODE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 10553 ;;; at (DEF-GC-ACCESSOR ARC-MODE ...) ;;; Checking type of (READ-CARD29 VALUE) to be (INTEGER 0 (2)) ;;; Compiling (DEF-GC-ACCESSOR ARC-MODE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10553 ;;; at (DEF-GC-ACCESSOR ARC-MODE ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 10553 ;;; at (DEF-GC-ACCESSOR ARC-MODE ...) ;;; Checking type of '#(:CHORD :PIE-SLICE) to be SIMPLE-VECTOR ;;; Compiling (DEFUN GCONTEXT-CLIP-MASK ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 10606 ;;; at (DEFUN GCONTEXT-CLIP-MASK ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 10606 ;;; at (DEFUN GCONTEXT-CLIP-MASK ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 10606 ;;; at (DEFUN GCONTEXT-CLIP-MASK ...) ;;; Checking type of (READ-CARD29 CLIP-MASK) to be (INTEGER 0 (1)) ;;; Note: ;;; in file GCONTEXT.LISP, position 10606 ;;; at (DEFUN GCONTEXT-CLIP-MASK ...) ;;; Checking type of (READ-CARD29 (FIRST CLIP)) to be (INTEGER 0 (4)) ;;; Compiling (DEFUN SET-GCONTEXT-CLIP-MASK ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 11687 ;;; at (DEFUN SET-GCONTEXT-CLIP-MASK ...) ;;; Checking type of '#(:UNSORTED :Y-SORTED :YX-SORTED :YX-BANDED) to be SIMPLE-VECTOR ;;; Note: ;;; in file GCONTEXT.LISP, position 11687 ;;; at (DEFUN SET-GCONTEXT-CLIP-MASK ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 11687 ;;; at (DEFUN SET-GCONTEXT-CLIP-MASK ...) ;;; Checking type of (GCONTEXT-SERVER-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEFUN GCONTEXT-DASHES ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 13392 ;;; at (DEFUN GCONTEXT-DASHES ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEFUN SET-GCONTEXT-DASHES ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 13841 ;;; at (DEFUN SET-GCONTEXT-DASHES ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 13841 ;;; at (DEFUN SET-GCONTEXT-DASHES ...) ;;; Checking type of (GCONTEXT-SERVER-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEFUN GCONTEXT-FONT ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 14738 ;;; at (DEFUN GCONTEXT-FONT ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEFUN SET-GCONTEXT-FONT ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 15704 ;;; at (DEFUN SET-GCONTEXT-FONT ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 15704 ;;; at (DEFUN SET-GCONTEXT-FONT ...) ;;; Checking type of (GCONTEXT-SERVER-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Compiling (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 16556 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 16556 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GCONTEXT.LISP, position 16556 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 16556 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 16556 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GCONTEXT.LISP, position 16556 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 16556 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN FORCE-GCONTEXT-CHANGES ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 21534 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES ...) ;;; Checking type of #:LET1998 to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 21534 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES ...) ;;; Checking type of #:LET1999 to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 21534 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES ...) ;;; Checking type of (GCONTEXT-INTERNAL-TIMESTAMP LOCAL-STATE) to be FIXNUM ;;; Note: ;;; in file GCONTEXT.LISP, position 21534 ;;; at (DEFUN FORCE-GCONTEXT-CHANGES ...) ;;; Checking type of (GCONTEXT-INTERNAL-TIMESTAMP SERVER-STATE) to be FIXNUM ;;; Compiling (DEFMACRO WITH-GCONTEXT ...). ;;; Compiling (DEFUN COPY-GCONTEXT-LOCAL-STATE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Checking type of #:LET2103 to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Checking type of #:LET2104 to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Checking type of #:LET2109 to be XGCMASK ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Checking type of (SVREF *GCONTEXT-MASKS* I) to be XGCMASK ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Checking type of (LOGIOR TEMP-MASK (THE XGCMASK (SVREF *GCONTEXT-MASKS* I))) to be XGCMASK ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Checking type of (SVREF *GCONTEXT-MASKS* I) to be XGCMASK ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Checking type of (LOGIOR EXTENSION-MASK (ASH 1 I)) to be XGCMASK ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 25602 ;;; at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 28704 ;;; at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 28704 ;;; at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 28704 ;;; at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GCONTEXT.LISP, position 28704 ;;; at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 28704 ;;; at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CREATE-GCONTEXT ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of (MAKE-GCONTEXT :DISPLAY DISPLAY :DRAWABLE DRAWABLE :CACHE-P CACHE-P) to be GCONTEXT ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of (GCONTEXT-SERVER-STATE GCONTEXT) to be GCONTEXT-STATE ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of (ALLOCATE-RESOURCE-ID DISPLAY GCONTEXT 'GCONTEXT) to be RESOURCE-ID ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of #:LET2495 to be LIST ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of #:LET2496 to be ARRAY-INDEX ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of (CDR EXTENSIONS) to be LIST ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of OPTIONS to be LIST ;;; Note: ;;; in file GCONTEXT.LISP, position 30289 ;;; at (DEFUN CREATE-GCONTEXT ...) ;;; Checking type of (CDDR OPTION-LIST) to be LIST ;;; Compiling (DEFUN COPY-GCONTEXT-COMPONENTS ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 39129 ;;; at (DEFUN COPY-GCONTEXT-COMPONENTS ...) ;;; Checking type of #:LET2529 to be XGCMASK ;;; Note: ;;; in file GCONTEXT.LISP, position 39129 ;;; at (DEFUN COPY-GCONTEXT-COMPONENTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 39129 ;;; at (DEFUN COPY-GCONTEXT-COMPONENTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN COPY-GCONTEXT ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 41561 ;;; at (DEFUN COPY-GCONTEXT ...) ;;; Checking type of I to be ARRAY-INDEX ;;; Note: ;;; in file GCONTEXT.LISP, position 41561 ;;; at (DEFUN COPY-GCONTEXT ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file GCONTEXT.LISP, position 41561 ;;; at (DEFUN COPY-GCONTEXT ...) ;;; Checking type of I to be ARRAY-INDEX ;;; Compiling (DEFUN FREE-GCONTEXT ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 41983 ;;; at (DEFUN FREE-GCONTEXT ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GCONTEXT.LISP, position 41983 ;;; at (DEFUN FREE-GCONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GCONTEXT.LISP, position 41983 ;;; at (DEFUN FREE-GCONTEXT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFMACRO DEFINE-GCONTEXT-ACCESSOR ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 42393 ;;; at (FSET 'DEFINE-GCONTEXT-ACCESSOR ...) ;;; Checking type of (PROGN (IF (NULL #:G2671) (SI::DM-TOO-FEW-ARGUMENTS #:G2670)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G2671)) (SETQ #:G2671 (CDR (EXT:TRULY-THE CONS #:G2671))))) to be SYMBOL ;;; Note: ;;; in file GCONTEXT.LISP, position 42393 ;;; at (FSET 'DEFINE-GCONTEXT-ACCESSOR ...) ;;; Checking type of (IF (EQ #:G2673 'SI:MISSING-KEYWORD) NIL #:G2673) to be SYMBOL ;;; Note: ;;; in file GCONTEXT.LISP, position 42393 ;;; at (FSET 'DEFINE-GCONTEXT-ACCESSOR ...) ;;; Checking type of (IF (EQ #:G2674 'SI:MISSING-KEYWORD) NIL #:G2674) to be (OR SYMBOL LIST) ;;; Compiling (DEFUN ADD-GCONTEXT-EXTENSION ...). ;;; Note: ;;; in file GCONTEXT.LISP, position 46134 ;;; at (DEFUN ADD-GCONTEXT-EXTENSION ...) ;;; Checking type of (NTHCDR #:G2680 #:G2681) to be CONS ;;; End of Pass 1. ;;; Emitting code for GCONTEXT-INTERNAL-FUNCTION. ;;; Emitting code for GCONTEXT-INTERNAL-PLANE-MASK. ;;; Emitting code for GCONTEXT-INTERNAL-FOREGROUND. ;;; Emitting code for GCONTEXT-INTERNAL-BACKGROUND. ;;; Emitting code for GCONTEXT-INTERNAL-LINE-WIDTH. ;;; Emitting code for GCONTEXT-INTERNAL-LINE-STYLE. ;;; Emitting code for GCONTEXT-INTERNAL-CAP-STYLE. ;;; Emitting code for GCONTEXT-INTERNAL-JOIN-STYLE. ;;; Emitting code for GCONTEXT-INTERNAL-FILL-STYLE. ;;; Emitting code for GCONTEXT-INTERNAL-FILL-RULE. ;;; Emitting code for GCONTEXT-INTERNAL-TILE. ;;; Emitting code for GCONTEXT-INTERNAL-STIPPLE. ;;; Emitting code for GCONTEXT-INTERNAL-TS-X. ;;; Emitting code for GCONTEXT-INTERNAL-TS-Y. ;;; Emitting code for GCONTEXT-INTERNAL-FONT. ;;; Emitting code for GCONTEXT-INTERNAL-SUBWINDOW-MODE. ;;; Emitting code for GCONTEXT-INTERNAL-EXPOSURES. ;;; Emitting code for GCONTEXT-INTERNAL-CLIP-X. ;;; Emitting code for GCONTEXT-INTERNAL-CLIP-Y. ;;; Emitting code for GCONTEXT-INTERNAL-CLIP-MASK. ;;; Emitting code for GCONTEXT-INTERNAL-DASH-OFFSET. ;;; Emitting code for GCONTEXT-INTERNAL-DASHES. ;;; Emitting code for GCONTEXT-INTERNAL-ARC-MODE. ;;; Emitting code for GCONTEXT-INTERNAL-CLIP. ;;; Emitting code for GCONTEXT-INTERNAL-DASH. ;;; Emitting code for GCONTEXT-INTERNAL-FONT-OBJ. ;;; Emitting code for GCONTEXT-INTERNAL-TIMESTAMP. ;;; Emitting code for MAKE-GCONTEXT-EXTENSION. ;;; Emitting code for #:G260. ;;; Emitting code for #:G261. ;;; Emitting code for GCONTEXT-STATE-NEXT. ;;; Emitting code for ALLOCATE-GCONTEXT-STATE. ;;; Emitting code for DEALLOCATE-GCONTEXT-STATE. ;;; Emitting code for ALLOCATE-TEMP-GCONTEXT. ;;; Emitting code for DEALLOCATE-TEMP-GCONTEXT. ;;; Emitting code for XGCMASK->GCMASK. ;;; Emitting code for ACCESS-GCONTEXT. ;;; Emitting code for MODIFY-GCONTEXT. ;;; Emitting code for DEF-GC-ACCESSOR. ;;; Emitting code for INCF-INTERNAL-TIMESTAMP. ;;; Emitting code for GCONTEXT-FUNCTION. ;;; Emitting code for SET-GCONTEXT-FUNCTION. ;;; Emitting code for GCONTEXT-PLANE-MASK. ;;; Emitting code for SET-GCONTEXT-PLANE-MASK. ;;; Emitting code for GCONTEXT-FOREGROUND. ;;; Emitting code for SET-GCONTEXT-FOREGROUND. ;;; Emitting code for GCONTEXT-BACKGROUND. ;;; Emitting code for SET-GCONTEXT-BACKGROUND. ;;; Emitting code for GCONTEXT-LINE-WIDTH. ;;; Emitting code for SET-GCONTEXT-LINE-WIDTH. ;;; Emitting code for GCONTEXT-LINE-STYLE. ;;; Emitting code for SET-GCONTEXT-LINE-STYLE. ;;; Emitting code for GCONTEXT-CAP-STYLE. ;;; Emitting code for SET-GCONTEXT-CAP-STYLE. ;;; Emitting code for GCONTEXT-JOIN-STYLE. ;;; Emitting code for SET-GCONTEXT-JOIN-STYLE. ;;; Emitting code for GCONTEXT-FILL-STYLE. ;;; Emitting code for SET-GCONTEXT-FILL-STYLE. ;;; Emitting code for GCONTEXT-FILL-RULE. ;;; Emitting code for SET-GCONTEXT-FILL-RULE. ;;; Emitting code for GCONTEXT-TILE. ;;; Emitting code for SET-GCONTEXT-TILE. ;;; Emitting code for GCONTEXT-STIPPLE. ;;; Emitting code for SET-GCONTEXT-STIPPLE. ;;; Emitting code for GCONTEXT-TS-X. ;;; Emitting code for SET-GCONTEXT-TS-X. ;;; Emitting code for GCONTEXT-TS-Y. ;;; Emitting code for SET-GCONTEXT-TS-Y. ;;; Emitting code for GCONTEXT-SUBWINDOW-MODE. ;;; Emitting code for SET-GCONTEXT-SUBWINDOW-MODE. ;;; Emitting code for GCONTEXT-EXPOSURES. ;;; Emitting code for SET-GCONTEXT-EXPOSURES. ;;; Emitting code for GCONTEXT-CLIP-X. ;;; Emitting code for SET-GCONTEXT-CLIP-X. ;;; Emitting code for GCONTEXT-CLIP-Y. ;;; Emitting code for SET-GCONTEXT-CLIP-Y. ;;; Emitting code for GCONTEXT-DASH-OFFSET. ;;; Emitting code for SET-GCONTEXT-DASH-OFFSET. ;;; Emitting code for GCONTEXT-ARC-MODE. ;;; Emitting code for SET-GCONTEXT-ARC-MODE. ;;; Emitting code for GCONTEXT-CLIP-MASK. ;;; Emitting code for GCONTEXT-CLIP-MASK. ;;; Emitting code for SET-GCONTEXT-CLIP-MASK. ;;; Emitting code for GCONTEXT-DASHES. ;;; Emitting code for SET-GCONTEXT-DASHES. ;;; Emitting code for GCONTEXT-FONT. ;;; Emitting code for SET-GCONTEXT-FONT. ;;; Emitting code for FORCE-GCONTEXT-CHANGES-INTERNAL. ;;; Emitting code for FORCE-GCONTEXT-CHANGES. ;;; Emitting code for WITH-GCONTEXT. ;;; Emitting code for COPY-GCONTEXT-LOCAL-STATE. ;;; Emitting code for RESTORE-GCONTEXT-TEMP-STATE. ;;; Emitting code for CREATE-GCONTEXT. ;;; Emitting code for COPY-GCONTEXT-COMPONENTS. ;;; Emitting code for COPY-GCONTEXT. ;;; Emitting code for FREE-GCONTEXT. ;;; Emitting code for DEFINE-GCONTEXT-ACCESSOR. ;;; Emitting code for ADD-GCONTEXT-EXTENSION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/gcontext.c -o clx/gcontext.o ;;; Finished compiling SRC:CLX;GCONTEXT.LISP. ;;; (compile-file "src:clx;input.lisp" :output-file #P"BUILD:CLX;INPUT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;INPUT.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *EVENT-FREE-LIST* ...). ;;; Compiling (DEFVAR *EVENT-KEY-VECTOR* ...). ;;; Compiling (DEFVAR *EVENT-MACRO-VECTOR* ...). ;;; Compiling (DEFVAR *EVENT-HANDLER-VECTOR* ...). ;;; Compiling (DEFVAR *EVENT-SEND-VECTOR* ...). ;;; Compiling (DEFUN ALLOCATE-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 1758 ;;; at (DEFUN ALLOCATE-EVENT ...) ;;; Checking type of *EVENT-FREE-LIST* to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFUN DEALLOCATE-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 1894 ;;; at (DEFUN DEALLOCATE-EVENT ...) ;;; Checking type of *EVENT-FREE-LIST* to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFPARAMETER *FIRST-EXTENSION-EVENT-CODE* ...). ;;; Compiling (DEFVAR *EXTENSIONS* ...). ;;; Compiling (DEFMACRO DEFINE-EXTENSION ...). ;;; Note: ;;; in file INPUT.LISP, position 3569 ;;; at (FSET 'DEFINE-EXTENSION ...) ;;; Checking type of (PROGN (IF (NULL #:G48) (SI::DM-TOO-FEW-ARGUMENTS #:G47)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G48)) (SETQ #:G48 (CDR (EXT:TRULY-THE CONS #:G48))))) to be STRINGABLE ;;; Note: ;;; in file INPUT.LISP, position 3569 ;;; at (FSET 'DEFINE-EXTENSION ...) ;;; Checking type of (IF (EQ #:G49 'SI:MISSING-KEYWORD) NIL #:G49) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 3569 ;;; at (FSET 'DEFINE-EXTENSION ...) ;;; Checking type of (IF (EQ #:G50 'SI:MISSING-KEYWORD) NIL #:G50) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 3569 ;;; at (FSET 'DEFINE-EXTENSION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST58) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 3569 ;;; at (FSET 'DEFINE-EXTENSION ...) ;;; Checking type of #:LOOP-LIST-TAIL60 to be CONS ;;; Compiling (DEFUN CANONICALIZE-EVENT-NAME ...). ;;; Compiling (DEFUN EXTENSION-EVENT-KEY-P ...). ;;; Compiling (DEFUN ALLOCATE-EXTENSION-EVENT-CODE ...). ;;; Note: ;;; in file INPUT.LISP, position 4825 ;;; at (DEFUN ALLOCATE-EXTENSION-EVENT-CODE ...) ;;; Checking type of (GET NAME 'EVENT-CODE) to be (OR NULL CARD8) ;;; Note: ;;; in file INPUT.LISP, position 4825 ;;; at (DEFUN ALLOCATE-EXTENSION-EVENT-CODE ...) ;;; Checking type of (POSITION NIL *EVENT-KEY-VECTOR* :START *FIRST-EXTENSION-EVENT-CODE*) to be (OR NULL CARD8) ;;; Compiling (DEFUN GET-INTERNAL-EVENT-CODE ...). ;;; Note: ;;; in file INPUT.LISP, position 5764 ;;; at (DEFUN GET-INTERNAL-EVENT-CODE ...) ;;; Checking type of (LOGAND 127 CODE) to be CARD8 ;;; Note: ;;; in file INPUT.LISP, position 5764 ;;; at (DEFUN GET-INTERNAL-EVENT-CODE ...) ;;; Checking type of (- CODE *FIRST-EXTENSION-EVENT-CODE*) to be CARD8 ;;; Note: ;;; in file INPUT.LISP, position 5764 ;;; at (DEFUN GET-INTERNAL-EVENT-CODE ...) ;;; Checking type of (IF (< CODE-OFFSET (LENGTH EVENT-EXTENSIONS)) (AREF EVENT-EXTENSIONS CODE-OFFSET) 0) to be CARD8 ;;; Compiling (DEFUN GET-EXTERNAL-EVENT-CODE ...). ;;; Note: ;;; in file INPUT.LISP, position 6757 ;;; at (DEFUN GET-EXTERNAL-EVENT-CODE ...) ;;; Checking type of (GET-EVENT-CODE EVENT) to be (OR NULL CARD8) ;;; Note: ;;; in file INPUT.LISP, position 6757 ;;; at (DEFUN GET-EXTERNAL-EVENT-CODE ...) ;;; Checking type of (+ *FIRST-EXTENSION-EVENT-CODE* (OR (POSITION CODE (DISPLAY-EVENT-EXTENSIONS DISPLAY)) (X-ERROR 'UNDEFINED-EVENT :DISPLAY DISPLAY :EVENT-NAME EVENT))) to be (OR NULL CARD8) ;;; Compiling (DEFMACRO EXTENSION-OPCODE ...). ;;; Compiling (DEFUN INITIALIZE-EXTENSIONS ...). ;;; Note: ;;; in file INPUT.LISP, position 7762 ;;; at (DEFUN INITIALIZE-EXTENSIONS ...) ;;; Checking type of #:LET136 to be KEYWORD ;;; Note: ;;; in file INPUT.LISP, position 7762 ;;; at (DEFUN INITIALIZE-EXTENSIONS ...) ;;; Checking type of #:LET137 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 7762 ;;; at (DEFUN INITIALIZE-EXTENSIONS ...) ;;; Checking type of (- (+ FIRST-EVENT (LENGTH EVENTS)) *FIRST-EXTENSION-EVENT-CODE*) to be CARD8 ;;; Note: ;;; in file INPUT.LISP, position 7762 ;;; at (DEFUN INITIALIZE-EXTENSIONS ...) ;;; Checking type of (MAKE-ARRAY (+ MAX-EVENT 16) :ELEMENT-TYPE 'CARD8 :INITIAL-ELEMENT 0) to be VECTOR ;;; Note: ;;; in file INPUT.LISP, position 7762 ;;; at (DEFUN INITIALIZE-EXTENSIONS ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G144)) to be SYMBOL ;;; Note: ;;; in file INPUT.LISP, position 7762 ;;; at (DEFUN INITIALIZE-EXTENSIONS ...) ;;; Checking type of (+ FIRST-EVENT #:G152) to be (OR NULL CARD8) ;;; Compiling (DEFVAR *PENDING-COMMAND-FREE-LIST* ...). ;;; Compiling (DEFUN START-PENDING-COMMAND ...). ;;; Note: ;;; in file INPUT.LISP, position 9748 ;;; at (DEFUN START-PENDING-COMMAND ...) ;;; Checking type of *PENDING-COMMAND-FREE-LIST* to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 9748 ;;; at (DEFUN START-PENDING-COMMAND ...) ;;; Checking type of (OR (THREADED-ATOMIC-POP *PENDING-COMMAND-FREE-LIST* PENDING-COMMAND-NEXT PENDING-COMMAND) (MAKE-PENDING-COMMAND)) to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 9748 ;;; at (DEFUN START-PENDING-COMMAND ...) ;;; Checking type of *PENDING-COMMAND-FREE-LIST* to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 9748 ;;; at (DEFUN START-PENDING-COMMAND ...) ;;; Inlining CURRENT-PROCESS ;;; Note: ;;; in file INPUT.LISP, position 9748 ;;; at (DEFUN START-PENDING-COMMAND ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK207) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 9748 ;;; at (DEFUN START-PENDING-COMMAND ...) ;;; Checking type of #:LET228 to be (OR NULL PENDING-COMMAND) ;;; Compiling (DEFUN STOP-PENDING-COMMAND ...). ;;; Note: ;;; in file INPUT.LISP, position 10653 ;;; at (DEFUN STOP-PENDING-COMMAND ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK238) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 10653 ;;; at (DEFUN STOP-PENDING-COMMAND ...) ;;; Checking type of #:LET259 to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 10653 ;;; at (DEFUN STOP-PENDING-COMMAND ...) ;;; Checking type of (PENDING-COMMAND-REPLY-BUFFER PENDING-COMMAND) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 10653 ;;; at (DEFUN STOP-PENDING-COMMAND ...) ;;; Checking type of *PENDING-COMMAND-FREE-LIST* to be (OR NULL PENDING-COMMAND) ;;; Compiling (DEFVAR *REPLY-BUFFER-FREE-LISTS* ...). ;;; Compiling (DEFUN ALLOCATE-REPLY-BUFFER ...). ;;; Note: ;;; in file INPUT.LISP, position 11811 ;;; at (DEFUN ALLOCATE-REPLY-BUFFER ...) ;;; Checking type of (VALUES (1- (THE ARRAY-INDEX SIZE))) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 11811 ;;; at (DEFUN ALLOCATE-REPLY-BUFFER ...) ;;; Checking type of (SVREF *REPLY-BUFFER-FREE-LISTS* INDEX) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 11811 ;;; at (DEFUN ALLOCATE-REPLY-BUFFER ...) ;;; Checking type of (VALUES (ASH 1 (THE ARRAY-INDEX INDEX))) to be ARRAY-INDEX ;;; Compiling (DEFUN DEALLOCATE-REPLY-BUFFER ...). ;;; Note: ;;; in file INPUT.LISP, position 12213 ;;; at (DEFUN DEALLOCATE-REPLY-BUFFER ...) ;;; Checking type of (REPLY-SIZE REPLY-BUFFER) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 12213 ;;; at (DEFUN DEALLOCATE-REPLY-BUFFER ...) ;;; Checking type of (VALUES (1- (THE ARRAY-INDEX SIZE))) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 12213 ;;; at (DEFUN DEALLOCATE-REPLY-BUFFER ...) ;;; Checking type of (SVREF *REPLY-BUFFER-FREE-LISTS* INDEX) to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFUN READ-ERROR-INPUT ...). ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK368) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of PENDING-COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of (PENDING-COMMAND-NEXT (THE PENDING-COMMAND PENDING-COMMAND)) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of PENDING-COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of (THREADED-DOLIST (PENDING-COMMAND (DISPLAY-PENDING-COMMANDS DISPLAY) PENDING-COMMAND-NEXT PENDING-COMMAND) (WHEN (= (PENDING-COMMAND-SEQUENCE PENDING-COMMAND) SEQUENCE) (RETURN PENDING-COMMAND))) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of PENDING-COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of (PENDING-COMMAND-NEXT (THE PENDING-COMMAND PENDING-COMMAND)) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of PENDING-COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of #:LET398 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Inlining PROCESS-WAKEUP ;;; Style warning: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; ! The variable #:G408 is not used. ;;; Note: ;;; in file INPUT.LISP, position 12704 ;;; at (DEFUN READ-ERROR-INPUT ...) ;;; Checking type of #:LET414 to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFUN READ-REPLY-INPUT ...). ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of (ALLOCATE-REPLY-BUFFER LENGTH) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Inlining BUFFER-REPLACE ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of #:G426 to be BUFFER-BYTES ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of #:G427 to be BUFFER-BYTES ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of +REPLYSIZE+ to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of #:G429 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of #:G428 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK435) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of PENDING-COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of (PENDING-COMMAND-NEXT (THE PENDING-COMMAND PENDING-COMMAND)) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of PENDING-COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of (THREADED-DOLIST (PENDING-COMMAND (DISPLAY-PENDING-COMMANDS DISPLAY) PENDING-COMMAND-NEXT PENDING-COMMAND) (WHEN (= (PENDING-COMMAND-SEQUENCE PENDING-COMMAND) SEQUENCE) (RETURN PENDING-COMMAND))) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of PENDING-COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of (PENDING-COMMAND-NEXT (THE PENDING-COMMAND PENDING-COMMAND)) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of PENDING-COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of #:G466 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of #:LET464 to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Checking type of #:LET465 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; Inlining PROCESS-WAKEUP ;;; Style warning: ;;; in file INPUT.LISP, position 14432 ;;; at (DEFUN READ-REPLY-INPUT ...) ;;; ! The variable #:G478 is not used. ;;; Compiling (DEFUN READ-EVENT-INPUT ...). ;;; Compiling (DEFUN NOTE-INPUT-COMPLETE ...). ;;; Note: ;;; in file INPUT.LISP, position 16683 ;;; at (DEFUN NOTE-INPUT-COMPLETE ...) ;;; Inlining PROCESS-WAKEUP ;;; Note: ;;; in file INPUT.LISP, position 16683 ;;; at (DEFUN NOTE-INPUT-COMPLETE ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK484) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 16683 ;;; at (DEFUN NOTE-INPUT-COMPLETE ...) ;;; Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 16683 ;;; at (DEFUN NOTE-INPUT-COMPLETE ...) ;;; Inlining PROCESS-WAKEUP ;;; Style warning: ;;; in file INPUT.LISP, position 16683 ;;; at (DEFUN NOTE-INPUT-COMPLETE ...) ;;; ! The variable #:G503 is not used. ;;; Note: ;;; in file INPUT.LISP, position 16683 ;;; at (DEFUN NOTE-INPUT-COMPLETE ...) ;;; Checking type of COMMAND to be PENDING-COMMAND ;;; Note: ;;; in file INPUT.LISP, position 16683 ;;; at (DEFUN NOTE-INPUT-COMPLETE ...) ;;; Checking type of (PENDING-COMMAND-NEXT (THE PENDING-COMMAND COMMAND)) to be (OR NULL PENDING-COMMAND) ;;; Note: ;;; in file INPUT.LISP, position 16683 ;;; at (DEFUN NOTE-INPUT-COMPLETE ...) ;;; Checking type of COMMAND to be PENDING-COMMAND ;;; Compiling (DEFUN READ-INPUT ...). ;;; Note: ;;; in file INPUT.LISP, position 17467 ;;; at (DEFUN READ-INPUT ...) ;;; Inlining CURRENT-PROCESS ;;; Note: ;;; in file INPUT.LISP, position 17467 ;;; at (DEFUN READ-INPUT ...) ;;; Checking type of (ALLOCATE-EVENT) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 17467 ;;; at (DEFUN READ-INPUT ...) ;;; Checking type of REPLY-BUFFER to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 17467 ;;; at (DEFUN READ-INPUT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 17467 ;;; at (DEFUN READ-INPUT ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...). ;;; Note: ;;; in file INPUT.LISP, position 22239 ;;; at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK554) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 22239 ;;; at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...) ;;; Checking type of (DISPLAY-ASYNCHRONOUS-ERRORS DISPLAY) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 22239 ;;; at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...) ;;; Checking type of (WITH-EVENT-QUEUE-INTERNAL (DISPLAY) (THREADED-POP (DISPLAY-ASYNCHRONOUS-ERRORS DISPLAY) REPLY-NEXT REPLY-BUFFER)) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 22239 ;;; at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK579) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 22239 ;;; at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...) ;;; Checking type of (DISPLAY-ASYNCHRONOUS-ERRORS DISPLAY) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 22239 ;;; at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK606) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 22239 ;;; at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...) ;;; Checking type of (DISPLAY-ASYNCHRONOUS-ERRORS DISPLAY) to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFUN WAIT-FOR-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 23548 ;;; at (DEFUN WAIT-FOR-EVENT ...) ;;; Inlining CURRENT-PROCESS ;;; Note: ;;; in file INPUT.LISP, position 23548 ;;; at (DEFUN WAIT-FOR-EVENT ...) ;;; Inlining CURRENT-PROCESS ;;; Compiling (DEFUN READ-REPLY ...). ;;; Note: ;;; in file INPUT.LISP, position 25022 ;;; at (DEFUN READ-REPLY ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK652) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 25022 ;;; at (DEFUN READ-REPLY ...) ;;; Checking type of (PENDING-COMMAND-REPLY-BUFFER PENDING-COMMAND) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 25022 ;;; at (DEFUN READ-REPLY ...) ;;; Checking type of (WITH-EVENT-QUEUE-INTERNAL (DISPLAY) (THREADED-POP (PENDING-COMMAND-REPLY-BUFFER PENDING-COMMAND) REPLY-NEXT REPLY-BUFFER)) to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 25022 ;;; at (DEFUN READ-REPLY ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK677) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 25022 ;;; at (DEFUN READ-REPLY ...) ;;; Checking type of (PENDING-COMMAND-REPLY-BUFFER PENDING-COMMAND) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 25022 ;;; at (DEFUN READ-REPLY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN EVENT-LISTEN ...). ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of (CAR (DISPLAY-CURRENT-EVENT-SYMBOL DISPLAY)) to be SYMBOL ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of (AND (BOUNDP CURRENT-EVENT-SYMBOL) (SYMBOL-VALUE CURRENT-EVENT-SYMBOL)) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of CURRENT-EVENT to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of (IF CURRENT-EVENT (REPLY-NEXT (THE REPLY-BUFFER CURRENT-EVENT)) (DISPLAY-EVENT-QUEUE-HEAD DISPLAY)) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of CURRENT-EVENT to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK709) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of #:LET728 to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK737) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK753) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of #:LET771 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 26072 ;;; at (DEFUN EVENT-LISTEN ...) ;;; Checking type of #:LET772 to be ARRAY-INDEX ;;; Compiling (DEFUN QUEUE-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 27516 ;;; at (DEFUN QUEUE-EVENT ...) ;;; Unknown type SYMBOL. Assuming it is T. ;;; Note: ;;; in file INPUT.LISP, position 27516 ;;; at (DEFUN QUEUE-EVENT ...) ;;; Checking type of (ALLOCATE-EVENT) to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 27516 ;;; at (DEFUN QUEUE-EVENT ...) ;;; Checking type of (REPLY-IBUF8 EVENT) to be BUFFER-BYTES ;;; Note: ;;; in file INPUT.LISP, position 27516 ;;; at (DEFUN QUEUE-EVENT ...) ;;; Checking type of (GET EVENT-KEY 'EVENT-CODE) to be (OR NULL CARD8) ;;; Note: ;;; in file INPUT.LISP, position 27516 ;;; at (DEFUN QUEUE-EVENT ...) ;;; Inlining BUFFER-REPLACE ;;; Note: ;;; in file INPUT.LISP, position 27516 ;;; at (DEFUN QUEUE-EVENT ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK824) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 27516 ;;; at (DEFUN QUEUE-EVENT ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK840) to be FIXNUM ;;; Compiling (DEFUN ENQUEUE-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 29268 ;;; at (DEFUN ENQUEUE-EVENT ...) ;;; Checking type of (EVENT-CODE NEW-EVENT) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 29268 ;;; at (DEFUN ENQUEUE-EVENT ...) ;;; Checking type of (AND (INDEX< EVENT-CODE (LENGTH *EVENT-KEY-VECTOR*)) (SVREF *EVENT-KEY-VECTOR* EVENT-CODE)) to be (OR NULL KEYWORD) ;;; Note: ;;; in file INPUT.LISP, position 29268 ;;; at (DEFUN ENQUEUE-EVENT ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK876) to be FIXNUM ;;; Compiling (DEFMACRO DEFINE-EVENT ...). ;;; Compiling (DEFMACRO DECLARE-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of (PROGN (IF (NULL #:G1104) (SI::DM-TOO-FEW-ARGUMENTS #:G1103)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G1104)) (SETQ #:G1104 (CDR (EXT:TRULY-THE CONS #:G1104))))) to be (OR KEYWORD LIST) ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:G1104 to be (ALIST (FIELD-TYPE SYMBOL) (FIELD-NAMES LIST)) ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LET1116 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1112) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LOOP-LIST-TAIL1114 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of (MAPCAR #'CANONICALIZE-EVENT-NAME EVENT-CODES) to be (OR KEYWORD LIST) ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LET1123 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1119) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LOOP-LIST-TAIL1121 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LET1134 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1129) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:G1135 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LET1147 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1142) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LOOP-LIST-TAIL1144 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LET1155 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1150) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LOOP-LIST-TAIL1152 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LET1163 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1158) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 31734 ;;; at (FSET 'DECLARE-EVENT ...) ;;; Checking type of #:LOOP-LIST-TAIL1160 to be CONS ;;; Compiling (DEFUN CHECK-CONSISTENCY ...). ;;; Note: ;;; in file INPUT.LISP, position 37221 ;;; at (DEFUN CHECK-CONSISTENCY ...) ;;; Checking type of #:LET1175 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 37221 ;;; at (DEFUN CHECK-CONSISTENCY ...) ;;; Checking type of #:LET1177 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 37221 ;;; at (DEFUN CHECK-CONSISTENCY ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1170) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 37221 ;;; at (DEFUN CHECK-CONSISTENCY ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1171) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 37221 ;;; at (DEFUN CHECK-CONSISTENCY ...) ;;; Checking type of #:G1178 to be CONS ;;; Compiling (DECLARE-EVENT (:KEY-PRESS :KEY-RELEASE ...) ...). ;;; Compiling (DECLARE-EVENT (:KEY-PRESS :KEY-RELEASE ...) ...). ;;; Note: ;;; in file INPUT.LISP, position 37629 ;;; at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 37629 ;;; at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 37629 ;;; at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 37629 ;;; at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT (:KEY-PRESS :KEY-RELEASE ...) ...). ;;; Note: ;;; in file INPUT.LISP, position 37629 ;;; at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 37629 ;;; at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :MOTION-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :MOTION-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 38025 ;;; at (DECLARE-EVENT MOTION-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38025 ;;; at (DECLARE-EVENT MOTION-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38025 ;;; at (DECLARE-EVENT MOTION-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38025 ;;; at (DECLARE-EVENT MOTION-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :MOTION-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 38025 ;;; at (DECLARE-EVENT MOTION-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38025 ;;; at (DECLARE-EVENT MOTION-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT (:ENTER-NOTIFY :LEAVE-NOTIFY) ...). ;;; Compiling (DECLARE-EVENT (:ENTER-NOTIFY :LEAVE-NOTIFY) ...). ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT (:ENTER-NOTIFY :LEAVE-NOTIFY) ...). ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38265 ;;; at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT (:FOCUS-IN :FOCUS-OUT) ...). ;;; Compiling (DECLARE-EVENT (:FOCUS-IN :FOCUS-OUT) ...). ;;; Note: ;;; in file INPUT.LISP, position 38640 ;;; at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38640 ;;; at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38640 ;;; at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38640 ;;; at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT (:FOCUS-IN :FOCUS-OUT) ...). ;;; Note: ;;; in file INPUT.LISP, position 38640 ;;; at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38640 ;;; at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38640 ;;; at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :KEYMAP-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :KEYMAP-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 38924 ;;; at (DECLARE-EVENT KEYMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38924 ;;; at (DECLARE-EVENT KEYMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :KEYMAP-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :EXPOSURE ...). ;;; Compiling (DECLARE-EVENT :EXPOSURE ...). ;;; Note: ;;; in file INPUT.LISP, position 38985 ;;; at (DECLARE-EVENT EXPOSURE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 38985 ;;; at (DECLARE-EVENT EXPOSURE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :EXPOSURE ...). ;;; Compiling (DECLARE-EVENT :GRAPHICS-EXPOSURE ...). ;;; Compiling (DECLARE-EVENT :GRAPHICS-EXPOSURE ...). ;;; Note: ;;; in file INPUT.LISP, position 39099 ;;; at (DECLARE-EVENT GRAPHICS-EXPOSURE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39099 ;;; at (DECLARE-EVENT GRAPHICS-EXPOSURE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39099 ;;; at (DECLARE-EVENT GRAPHICS-EXPOSURE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :GRAPHICS-EXPOSURE ...). ;;; Note: ;;; in file INPUT.LISP, position 39099 ;;; at (DECLARE-EVENT GRAPHICS-EXPOSURE ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :NO-EXPOSURE ...). ;;; Compiling (DECLARE-EVENT :NO-EXPOSURE ...). ;;; Note: ;;; in file INPUT.LISP, position 39287 ;;; at (DECLARE-EVENT NO-EXPOSURE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39287 ;;; at (DECLARE-EVENT NO-EXPOSURE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39287 ;;; at (DECLARE-EVENT NO-EXPOSURE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :NO-EXPOSURE ...). ;;; Note: ;;; in file INPUT.LISP, position 39287 ;;; at (DECLARE-EVENT NO-EXPOSURE ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :VISIBILITY-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :VISIBILITY-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39408 ;;; at (DECLARE-EVENT VISIBILITY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39408 ;;; at (DECLARE-EVENT VISIBILITY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39408 ;;; at (DECLARE-EVENT VISIBILITY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :VISIBILITY-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39408 ;;; at (DECLARE-EVENT VISIBILITY-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :CREATE-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :CREATE-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39565 ;;; at (DECLARE-EVENT CREATE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39565 ;;; at (DECLARE-EVENT CREATE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39565 ;;; at (DECLARE-EVENT CREATE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :CREATE-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39565 ;;; at (DECLARE-EVENT CREATE-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :DESTROY-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :DESTROY-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39740 ;;; at (DECLARE-EVENT DESTROY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39740 ;;; at (DECLARE-EVENT DESTROY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :DESTROY-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :UNMAP-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :UNMAP-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39824 ;;; at (DECLARE-EVENT UNMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39824 ;;; at (DECLARE-EVENT UNMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39824 ;;; at (DECLARE-EVENT UNMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :UNMAP-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39824 ;;; at (DECLARE-EVENT UNMAP-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :MAP-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :MAP-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39930 ;;; at (DECLARE-EVENT MAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39930 ;;; at (DECLARE-EVENT MAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 39930 ;;; at (DECLARE-EVENT MAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :MAP-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 39930 ;;; at (DECLARE-EVENT MAP-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :MAP-REQUEST ...). ;;; Compiling (DECLARE-EVENT :MAP-REQUEST ...). ;;; Note: ;;; in file INPUT.LISP, position 40042 ;;; at (DECLARE-EVENT MAP-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40042 ;;; at (DECLARE-EVENT MAP-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :MAP-REQUEST ...). ;;; Compiling (DECLARE-EVENT :REPARENT-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :REPARENT-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 40132 ;;; at (DECLARE-EVENT REPARENT-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40132 ;;; at (DECLARE-EVENT REPARENT-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40132 ;;; at (DECLARE-EVENT REPARENT-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :REPARENT-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 40132 ;;; at (DECLARE-EVENT REPARENT-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :CONFIGURE-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :CONFIGURE-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 40270 ;;; at (DECLARE-EVENT CONFIGURE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40270 ;;; at (DECLARE-EVENT CONFIGURE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40270 ;;; at (DECLARE-EVENT CONFIGURE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :CONFIGURE-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 40270 ;;; at (DECLARE-EVENT CONFIGURE-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :CONFIGURE-REQUEST ...). ;;; Compiling (DECLARE-EVENT :CONFIGURE-REQUEST ...). ;;; Note: ;;; in file INPUT.LISP, position 40474 ;;; at (DECLARE-EVENT CONFIGURE-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40474 ;;; at (DECLARE-EVENT CONFIGURE-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40474 ;;; at (DECLARE-EVENT CONFIGURE-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :CONFIGURE-REQUEST ...). ;;; Note: ;;; in file INPUT.LISP, position 40474 ;;; at (DECLARE-EVENT CONFIGURE-REQUEST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40474 ;;; at (DECLARE-EVENT CONFIGURE-REQUEST ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :GRAVITY-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :GRAVITY-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 40742 ;;; at (DECLARE-EVENT GRAVITY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40742 ;;; at (DECLARE-EVENT GRAVITY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :GRAVITY-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :RESIZE-REQUEST ...). ;;; Compiling (DECLARE-EVENT :RESIZE-REQUEST ...). ;;; Note: ;;; in file INPUT.LISP, position 40840 ;;; at (DECLARE-EVENT RESIZE-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40840 ;;; at (DECLARE-EVENT RESIZE-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :RESIZE-REQUEST ...). ;;; Compiling (DECLARE-EVENT :CIRCULATE-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :CIRCULATE-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 40950 ;;; at (DECLARE-EVENT CIRCULATE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40950 ;;; at (DECLARE-EVENT CIRCULATE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 40950 ;;; at (DECLARE-EVENT CIRCULATE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :CIRCULATE-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 40950 ;;; at (DECLARE-EVENT CIRCULATE-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :CIRCULATE-REQUEST ...). ;;; Compiling (DECLARE-EVENT :CIRCULATE-REQUEST ...). ;;; Note: ;;; in file INPUT.LISP, position 41076 ;;; at (DECLARE-EVENT CIRCULATE-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41076 ;;; at (DECLARE-EVENT CIRCULATE-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41076 ;;; at (DECLARE-EVENT CIRCULATE-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :CIRCULATE-REQUEST ...). ;;; Note: ;;; in file INPUT.LISP, position 41076 ;;; at (DECLARE-EVENT CIRCULATE-REQUEST ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :PROPERTY-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :PROPERTY-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 41219 ;;; at (DECLARE-EVENT PROPERTY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41219 ;;; at (DECLARE-EVENT PROPERTY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41219 ;;; at (DECLARE-EVENT PROPERTY-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :PROPERTY-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 41219 ;;; at (DECLARE-EVENT PROPERTY-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :SELECTION-CLEAR ...). ;;; Compiling (DECLARE-EVENT :SELECTION-CLEAR ...). ;;; Note: ;;; in file INPUT.LISP, position 41400 ;;; at (DECLARE-EVENT SELECTION-CLEAR ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41400 ;;; at (DECLARE-EVENT SELECTION-CLEAR ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :SELECTION-CLEAR ...). ;;; Compiling (DECLARE-EVENT :SELECTION-REQUEST ...). ;;; Compiling (DECLARE-EVENT :SELECTION-REQUEST ...). ;;; Note: ;;; in file INPUT.LISP, position 41550 ;;; at (DECLARE-EVENT SELECTION-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41550 ;;; at (DECLARE-EVENT SELECTION-REQUEST ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :SELECTION-REQUEST ...). ;;; Compiling (DECLARE-EVENT :SELECTION-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :SELECTION-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 41738 ;;; at (DECLARE-EVENT SELECTION-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41738 ;;; at (DECLARE-EVENT SELECTION-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :SELECTION-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :COLORMAP-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :COLORMAP-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 41915 ;;; at (DECLARE-EVENT COLORMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41915 ;;; at (DECLARE-EVENT COLORMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41915 ;;; at (DECLARE-EVENT COLORMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41915 ;;; at (DECLARE-EVENT COLORMAP-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :COLORMAP-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 41915 ;;; at (DECLARE-EVENT COLORMAP-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 41915 ;;; at (DECLARE-EVENT COLORMAP-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :CLIENT-MESSAGE ...). ;;; Compiling (DECLARE-EVENT :CLIENT-MESSAGE ...). ;;; Note: ;;; in file INPUT.LISP, position 42064 ;;; at (DECLARE-EVENT CLIENT-MESSAGE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42064 ;;; at (DECLARE-EVENT CLIENT-MESSAGE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42064 ;;; at (DECLARE-EVENT CLIENT-MESSAGE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42064 ;;; at (DECLARE-EVENT CLIENT-MESSAGE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42064 ;;; at (DECLARE-EVENT CLIENT-MESSAGE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :CLIENT-MESSAGE ...). ;;; Note: ;;; in file INPUT.LISP, position 42064 ;;; at (DECLARE-EVENT CLIENT-MESSAGE ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DECLARE-EVENT :MAPPING-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :MAPPING-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 42225 ;;; at (DECLARE-EVENT MAPPING-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42225 ;;; at (DECLARE-EVENT MAPPING-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42225 ;;; at (DECLARE-EVENT MAPPING-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42225 ;;; at (DECLARE-EVENT MAPPING-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42225 ;;; at (DECLARE-EVENT MAPPING-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :MAPPING-NOTIFY ...). ;;; Note: ;;; in file INPUT.LISP, position 42225 ;;; at (DECLARE-EVENT MAPPING-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42225 ;;; at (DECLARE-EVENT MAPPING-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file INPUT.LISP, position 42225 ;;; at (DECLARE-EVENT MAPPING-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN EVENT-LOOP-SETUP ...). ;;; Note: ;;; in file INPUT.LISP, position 42403 ;;; at (DEFUN EVENT-LOOP-SETUP ...) ;;; Checking type of (DISPLAY-CURRENT-EVENT-SYMBOL DISPLAY) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 42403 ;;; at (DEFUN EVENT-LOOP-SETUP ...) ;;; Checking type of (FIRST PROGV-VARS) to be SYMBOL ;;; Note: ;;; in file INPUT.LISP, position 42403 ;;; at (DEFUN EVENT-LOOP-SETUP ...) ;;; Checking type of (SECOND PROGV-VARS) to be SYMBOL ;;; Note: ;;; in file INPUT.LISP, position 42403 ;;; at (DEFUN EVENT-LOOP-SETUP ...) ;;; Checking type of (SYMBOL-VALUE CURRENT-EVENT-SYMBOL) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 42403 ;;; at (DEFUN EVENT-LOOP-SETUP ...) ;;; Checking type of EVENT to be REPLY-BUFFER ;;; Compiling (DEFUN EVENT-LOOP-STEP-BEFORE ...). ;;; Note: ;;; in file INPUT.LISP, position 43510 ;;; at (DEFUN EVENT-LOOP-STEP-BEFORE ...) ;;; Checking type of (SYMBOL-VALUE CURRENT-EVENT-SYMBOL) to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 43510 ;;; at (DEFUN EVENT-LOOP-STEP-BEFORE ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK2166) to be FIXNUM ;;; Compiling (DEFUN DEQUEUE-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 44394 ;;; at (DEFUN DEQUEUE-EVENT ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK2184) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 44394 ;;; at (DEFUN DEQUEUE-EVENT ...) ;;; Checking type of #:LET2200 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 44394 ;;; at (DEFUN DEQUEUE-EVENT ...) ;;; Checking type of #:LET2201 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 44394 ;;; at (DEFUN DEQUEUE-EVENT ...) ;;; Checking type of (DISPLAY-EVENT-QUEUE-HEAD DISPLAY) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 44394 ;;; at (DEFUN DEQUEUE-EVENT ...) ;;; Checking type of HEAD to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 44394 ;;; at (DEFUN DEQUEUE-EVENT ...) ;;; Checking type of (REPLY-NEXT PREVIOUS) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 44394 ;;; at (DEFUN DEQUEUE-EVENT ...) ;;; Checking type of CURRENT to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 44394 ;;; at (DEFUN DEQUEUE-EVENT ...) ;;; Checking type of (REPLY-NEXT PREVIOUS) to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFUN EVENT-LOOP-STEP-AFTER ...). ;;; Note: ;;; in file INPUT.LISP, position 45717 ;;; at (DEFUN EVENT-LOOP-STEP-AFTER ...) ;;; Checking type of (REPLY-NEXT EVENT) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 45717 ;;; at (DEFUN EVENT-LOOP-STEP-AFTER ...) ;;; Checking type of (DEQUEUE-EVENT DISPLAY EVENT) to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFMACRO EVENT-LOOP ...). ;;; Compiling (DEFUN DISCARD-CURRENT-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 48344 ;;; at (DEFUN DISCARD-CURRENT-EVENT ...) ;;; Checking type of (DISPLAY-CURRENT-EVENT-SYMBOL DISPLAY) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 48344 ;;; at (DEFUN DISCARD-CURRENT-EVENT ...) ;;; Checking type of (FIRST SYMBOLS) to be SYMBOL ;;; Note: ;;; in file INPUT.LISP, position 48344 ;;; at (DEFUN DISCARD-CURRENT-EVENT ...) ;;; Checking type of (LET ((CURRENT-EVENT-SYMBOL (FIRST SYMBOLS))) (DECLARE (TYPE SYMBOL CURRENT-EVENT-SYMBOL)) (WHEN (BOUNDP CURRENT-EVENT-SYMBOL) (SYMBOL-VALUE CURRENT-EVENT-SYMBOL))) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file INPUT.LISP, position 48344 ;;; at (DEFUN DISCARD-CURRENT-EVENT ...) ;;; Checking type of (FIRST SYMBOLS) to be SYMBOL ;;; Note: ;;; in file INPUT.LISP, position 48344 ;;; at (DEFUN DISCARD-CURRENT-EVENT ...) ;;; Checking type of (SECOND SYMBOLS) to be SYMBOL ;;; Note: ;;; in file INPUT.LISP, position 48344 ;;; at (DEFUN DISCARD-CURRENT-EVENT ...) ;;; Checking type of EVENT to be REPLY-BUFFER ;;; Compiling (DEFUN PROCESS-EVENT ...). ;;; Note: ;;; in file INPUT.LISP, position 49629 ;;; at (DEFUN PROCESS-EVENT ...) ;;; Checking type of (MP:LOCK-COUNT #:LOCK2257) to be FIXNUM ;;; Note: ;;; in file INPUT.LISP, position 49629 ;;; at (DEFUN PROCESS-EVENT ...) ;;; Checking type of .EVENT. to be REPLY-BUFFER ;;; Note: ;;; in file INPUT.LISP, position 49629 ;;; at (DEFUN PROCESS-EVENT ...) ;;; Checking type of (EVENT-CODE EVENT) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 49629 ;;; at (DEFUN PROCESS-EVENT ...) ;;; Checking type of (AND (INDEX< EVENT-CODE (LENGTH *EVENT-HANDLER-VECTOR*)) (SVREF *EVENT-HANDLER-VECTOR* EVENT-CODE)) to be (OR NULL FUNCTION) ;;; Compiling (DEFUN MAKE-EVENT-HANDLERS ...). ;;; Compiling (DEFUN EVENT-HANDLER ...). ;;; Note: ;;; in file INPUT.LISP, position 52947 ;;; at (DEFUN EVENT-HANDLER ...) ;;; Unknown type T. Assuming it is T. ;;; Compiling (DEFUN SET-EVENT-HANDLER ...). ;;; Compiling (DEFMACRO EVENT-CASE ...). ;;; Note: ;;; in file INPUT.LISP, position 53555 ;;; at (FSET 'EVENT-CASE ...) ;;; Checking type of #:LET2303 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 53555 ;;; at (FSET 'EVENT-CASE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2298) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 53555 ;;; at (FSET 'EVENT-CASE ...) ;;; Checking type of #:LOOP-LIST-TAIL2300 to be CONS ;;; Compiling (DEFMACRO EVENT-COND ...). ;;; Compiling (DEFUN GET-EVENT-CODE ...). ;;; Compiling (DEFUN UNIVERSAL-EVENT-GET-MACRO ...). ;;; Compiling (DEFMACRO EVENT-DISPATCH ...). ;;; Note: ;;; in file INPUT.LISP, position 58552 ;;; at (FSET 'EVENT-DISPATCH ...) ;;; Checking type of #:LET2410 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 58552 ;;; at (FSET 'EVENT-DISPATCH ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2406) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 58552 ;;; at (FSET 'EVENT-DISPATCH ...) ;;; Checking type of #:LOOP-LIST-TAIL2408 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 58552 ;;; at (FSET 'EVENT-DISPATCH ...) ;;; Checking type of #:LET2424 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 58552 ;;; at (FSET 'EVENT-DISPATCH ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2393) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 58552 ;;; at (FSET 'EVENT-DISPATCH ...) ;;; Checking type of #:LOOP-LIST-TAIL2395 to be CONS ;;; Compiling (DEFMACRO BINDING-EVENT-VALUES ...). ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of #:LET2639 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2635) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of #:LOOP-LIST-TAIL2637 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of (CAR #:G2653) to be CONS ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of #:G2656 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of #:LET2666 to be LIST ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST2661) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of #:LOOP-LIST-TAIL2663 to be CONS ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of (CAR #:G2690) to be CONS ;;; Note: ;;; in file INPUT.LISP, position 61895 ;;; at (FSET 'BINDING-EVENT-VALUES ...) ;;; Checking type of #:G2697 to be CONS ;;; Compiling (DEFPARAMETER *XERROR-VECTOR* ...). ;;; Compiling (DEFUN MAKE-ERROR ...). ;;; Note: ;;; in file INPUT.LISP, position 67202 ;;; at (DEFUN MAKE-ERROR ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN REPORT-ERROR ...). ;;; Compiling (DEFUN REQUEST-NAME ...). ;;; Compiling (DEFUN REPORT-REQUEST-ERROR ...). ;;; Compiling (DEFINE-CONDITION REQUEST-ERROR ...). ;;; Compiling (DEFINE-CONDITION RESOURCE-ERROR ...). ;;; Compiling (DEFINE-CONDITION UNKNOWN-ERROR ...). ;;; Compiling (DEFINE-CONDITION ACCESS-ERROR ...). ;;; Compiling (DEFINE-CONDITION ALLOC-ERROR ...). ;;; Compiling (DEFINE-CONDITION ATOM-ERROR ...). ;;; Compiling (DEFINE-CONDITION COLORMAP-ERROR ...). ;;; Compiling (DEFINE-CONDITION CURSOR-ERROR ...). ;;; Compiling (DEFINE-CONDITION DRAWABLE-ERROR ...). ;;; Compiling (DEFINE-CONDITION FONT-ERROR ...). ;;; Compiling (DEFINE-CONDITION GCONTEXT-ERROR ...). ;;; Compiling (DEFINE-CONDITION ID-CHOICE-ERROR ...). ;;; Compiling (DEFINE-CONDITION ILLEGAL-REQUEST-ERROR ...). ;;; Compiling (DEFINE-CONDITION LENGTH-ERROR ...). ;;; Compiling (DEFINE-CONDITION MATCH-ERROR ...). ;;; Compiling (DEFINE-CONDITION NAME-ERROR ...). ;;; Compiling (DEFINE-CONDITION PIXMAP-ERROR ...). ;;; Compiling (DEFINE-CONDITION VALUE-ERROR ...). ;;; Compiling (DEFINE-CONDITION WINDOW-ERROR ...). ;;; Compiling (DEFINE-CONDITION IMPLEMENTATION-ERROR ...). ;;; Compiling (DEFINE-CONDITION X-TYPE-ERROR ...). ;;; Compiling (DEFINE-CONDITION CLOSED-DISPLAY ...). ;;; Compiling (DEFINE-CONDITION LOOKUP-ERROR ...). ;;; Compiling (DEFINE-CONDITION CONNECTION-FAILURE ...). ;;; Compiling (DEFINE-CONDITION REPLY-LENGTH-ERROR ...). ;;; Compiling (DEFINE-CONDITION REPLY-TIMEOUT ...). ;;; Compiling (DEFINE-CONDITION SEQUENCE-ERROR ...). ;;; Compiling (DEFINE-CONDITION UNEXPECTED-REPLY ...). ;;; Compiling (DEFINE-CONDITION MISSING-PARAMETER ...). ;;; Compiling (DEFINE-CONDITION INVALID-FONT ...). ;;; Compiling (DEFINE-CONDITION DEVICE-BUSY ...). ;;; Compiling (DEFINE-CONDITION UNIMPLEMENTED-EVENT ...). ;;; Compiling (DEFINE-CONDITION UNDEFINED-EVENT ...). ;;; Compiling (DEFINE-CONDITION ABSENT-EXTENSION ...). ;;; Compiling (DEFINE-CONDITION INCONSISTENT-PARAMETERS ...). ;;; Compiling (DEFINE-CONDITION RESOURCE-IDS-EXHAUSTED ...). ;;; Compiling (DEFUN GET-ERROR-KEY ...). ;;; Note: ;;; in file INPUT.LISP, position 80305 ;;; at (DEFUN GET-ERROR-KEY ...) ;;; Checking type of (FIRST ENTRY) to be KEYWORD ;;; Note: ;;; in file INPUT.LISP, position 80305 ;;; at (DEFUN GET-ERROR-KEY ...) ;;; Checking type of (FOURTH ENTRY) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 80305 ;;; at (DEFUN GET-ERROR-KEY ...) ;;; Checking type of (THIRD (ASSOC EVENT-NAME *EXTENSIONS*)) to be LIST ;;; Note: ;;; in file INPUT.LISP, position 80305 ;;; at (DEFUN GET-ERROR-KEY ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (LENGTH ERRORS)) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 80305 ;;; at (DEFUN GET-ERROR-KEY ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX FIRST-ERROR) (THE ARRAY-INDEX (INDEX- (LENGTH ERRORS) 1)))) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 80305 ;;; at (DEFUN GET-ERROR-KEY ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (LENGTH ERRORS)) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file INPUT.LISP, position 80305 ;;; at (DEFUN GET-ERROR-KEY ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX ERROR-CODE) (THE ARRAY-INDEX FIRST-ERROR))) to be ARRAY-INDEX ;;; Compiling (DEFMACRO DEFINE-ERROR ...). ;;; Note: ;;; in file INPUT.LISP, position 81173 ;;; at (FSET 'DEFINE-ERROR ...) ;;; Checking type of (PROGN (IF (NULL #:G2784) (SI::DM-TOO-FEW-ARGUMENTS #:G2783)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G2784)) (SETQ #:G2784 (CDR (EXT:TRULY-THE CONS #:G2784))))) to be SYMBOL ;;; Note: ;;; in file INPUT.LISP, position 81173 ;;; at (FSET 'DEFINE-ERROR ...) ;;; Checking type of (PROGN (IF (NULL #:G2784) (SI::DM-TOO-FEW-ARGUMENTS #:G2783)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G2784)) (SETQ #:G2784 (CDR (EXT:TRULY-THE CONS #:G2784))))) to be (OR SYMBOL LIST) ;;; Compiling (DEFUN DECODE-CORE-ERROR ...). ;;; Note: ;;; in file INPUT.LISP, position 82191 ;;; at (DEFUN DECODE-CORE-ERROR ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN DECODE-RESOURCE-ERROR ...). ;;; End of Pass 1. ;;; Emitting code for ALLOCATE-EVENT. ;;; Emitting code for DEALLOCATE-EVENT. ;;; Emitting code for DEFINE-EXTENSION. ;;; Emitting code for CANONICALIZE-EVENT-NAME. ;;; Emitting code for EXTENSION-EVENT-KEY-P. ;;; Emitting code for ALLOCATE-EXTENSION-EVENT-CODE. ;;; Emitting code for GET-INTERNAL-EVENT-CODE. ;;; Emitting code for GET-EXTERNAL-EVENT-CODE. ;;; Emitting code for EXTENSION-OPCODE. ;;; Emitting code for INITIALIZE-EXTENSIONS. ;;; Emitting code for START-PENDING-COMMAND. ;;; Emitting code for STOP-PENDING-COMMAND. ;;; Emitting code for ALLOCATE-REPLY-BUFFER. ;;; Emitting code for DEALLOCATE-REPLY-BUFFER. ;;; Emitting code for READ-ERROR-INPUT. ;;; Emitting code for READ-REPLY-INPUT. ;;; Emitting code for READ-EVENT-INPUT. ;;; Emitting code for NOTE-INPUT-COMPLETE. ;;; Emitting code for READ-INPUT. ;;; Emitting code for #:G535. ;;; Emitting code for REPORT-ASYNCHRONOUS-ERRORS. ;;; Emitting code for WAIT-FOR-EVENT. ;;; Emitting code for #:G647. ;;; Emitting code for READ-REPLY. ;;; Emitting code for #:G651. ;;; Emitting code for EVENT-LISTEN. ;;; Emitting code for QUEUE-EVENT. ;;; Emitting code for ENQUEUE-EVENT. ;;; Emitting code for DEFINE-EVENT. ;;; Emitting code for DECLARE-EVENT. ;;; Emitting code for #:G1125. ;;; Emitting code for #:G1137. ;;; Emitting code for #:G1153. ;;; Emitting code for #:G1161. ;;; Emitting code for EVENT-GET. ;;; Emitting code for #:G1132. ;;; Emitting code for #:G1145. ;;; Emitting code for CHECK-CONSISTENCY. ;;; Emitting code for KEY-PRESS-EVENT-GET-MACRO. ;;; Emitting code for KEY-PRESS-EVENT-GET. ;;; Emitting code for KEY-PRESS-EVENT-PUT. ;;; Emitting code for MOTION-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for MOTION-NOTIFY-EVENT-GET. ;;; Emitting code for MOTION-NOTIFY-EVENT-PUT. ;;; Emitting code for ENTER-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for ENTER-NOTIFY-EVENT-GET. ;;; Emitting code for ENTER-NOTIFY-EVENT-PUT. ;;; Emitting code for FOCUS-IN-EVENT-GET-MACRO. ;;; Emitting code for FOCUS-IN-EVENT-GET. ;;; Emitting code for FOCUS-IN-EVENT-PUT. ;;; Emitting code for KEYMAP-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for KEYMAP-NOTIFY-EVENT-GET. ;;; Emitting code for KEYMAP-NOTIFY-EVENT-PUT. ;;; Emitting code for EXPOSURE-EVENT-GET-MACRO. ;;; Emitting code for EXPOSURE-EVENT-GET. ;;; Emitting code for EXPOSURE-EVENT-PUT. ;;; Emitting code for GRAPHICS-EXPOSURE-EVENT-GET-MACRO. ;;; Emitting code for GRAPHICS-EXPOSURE-EVENT-GET. ;;; Emitting code for GRAPHICS-EXPOSURE-EVENT-PUT. ;;; Emitting code for NO-EXPOSURE-EVENT-GET-MACRO. ;;; Emitting code for NO-EXPOSURE-EVENT-GET. ;;; Emitting code for NO-EXPOSURE-EVENT-PUT. ;;; Emitting code for VISIBILITY-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for VISIBILITY-NOTIFY-EVENT-GET. ;;; Emitting code for VISIBILITY-NOTIFY-EVENT-PUT. ;;; Emitting code for CREATE-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for CREATE-NOTIFY-EVENT-GET. ;;; Emitting code for CREATE-NOTIFY-EVENT-PUT. ;;; Emitting code for DESTROY-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for DESTROY-NOTIFY-EVENT-GET. ;;; Emitting code for DESTROY-NOTIFY-EVENT-PUT. ;;; Emitting code for UNMAP-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for UNMAP-NOTIFY-EVENT-GET. ;;; Emitting code for UNMAP-NOTIFY-EVENT-PUT. ;;; Emitting code for MAP-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for MAP-NOTIFY-EVENT-GET. ;;; Emitting code for MAP-NOTIFY-EVENT-PUT. ;;; Emitting code for MAP-REQUEST-EVENT-GET-MACRO. ;;; Emitting code for MAP-REQUEST-EVENT-GET. ;;; Emitting code for MAP-REQUEST-EVENT-PUT. ;;; Emitting code for REPARENT-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for REPARENT-NOTIFY-EVENT-GET. ;;; Emitting code for REPARENT-NOTIFY-EVENT-PUT. ;;; Emitting code for CONFIGURE-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for CONFIGURE-NOTIFY-EVENT-GET. ;;; Emitting code for CONFIGURE-NOTIFY-EVENT-PUT. ;;; Emitting code for CONFIGURE-REQUEST-EVENT-GET-MACRO. ;;; Emitting code for CONFIGURE-REQUEST-EVENT-GET. ;;; Emitting code for CONFIGURE-REQUEST-EVENT-PUT. ;;; Emitting code for GRAVITY-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for GRAVITY-NOTIFY-EVENT-GET. ;;; Emitting code for GRAVITY-NOTIFY-EVENT-PUT. ;;; Emitting code for RESIZE-REQUEST-EVENT-GET-MACRO. ;;; Emitting code for RESIZE-REQUEST-EVENT-GET. ;;; Emitting code for RESIZE-REQUEST-EVENT-PUT. ;;; Emitting code for CIRCULATE-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for CIRCULATE-NOTIFY-EVENT-GET. ;;; Emitting code for CIRCULATE-NOTIFY-EVENT-PUT. ;;; Emitting code for CIRCULATE-REQUEST-EVENT-GET-MACRO. ;;; Emitting code for CIRCULATE-REQUEST-EVENT-GET. ;;; Emitting code for CIRCULATE-REQUEST-EVENT-PUT. ;;; Emitting code for PROPERTY-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for PROPERTY-NOTIFY-EVENT-GET. ;;; Emitting code for PROPERTY-NOTIFY-EVENT-PUT. ;;; Warning: ;;; in file INPUT.LISP, position 41219 ;;; at (DECLARE-EVENT PROPERTY-NOTIFY ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Emitting code for SELECTION-CLEAR-EVENT-GET-MACRO. ;;; Emitting code for SELECTION-CLEAR-EVENT-GET. ;;; Emitting code for SELECTION-CLEAR-EVENT-PUT. ;;; Warning: ;;; in file INPUT.LISP, position 41400 ;;; at (DECLARE-EVENT SELECTION-CLEAR ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Emitting code for SELECTION-REQUEST-EVENT-GET-MACRO. ;;; Emitting code for SELECTION-REQUEST-EVENT-GET. ;;; Emitting code for SELECTION-REQUEST-EVENT-PUT. ;;; Warning: ;;; in file INPUT.LISP, position 41550 ;;; at (DECLARE-EVENT SELECTION-REQUEST ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Warning: ;;; in file INPUT.LISP, position 41550 ;;; at (DECLARE-EVENT SELECTION-REQUEST ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Warning: ;;; in file INPUT.LISP, position 41550 ;;; at (DECLARE-EVENT SELECTION-REQUEST ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Emitting code for SELECTION-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for SELECTION-NOTIFY-EVENT-GET. ;;; Emitting code for SELECTION-NOTIFY-EVENT-PUT. ;;; Warning: ;;; in file INPUT.LISP, position 41738 ;;; at (DECLARE-EVENT SELECTION-NOTIFY ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Warning: ;;; in file INPUT.LISP, position 41738 ;;; at (DECLARE-EVENT SELECTION-NOTIFY ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Warning: ;;; in file INPUT.LISP, position 41738 ;;; at (DECLARE-EVENT SELECTION-NOTIFY ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Emitting code for COLORMAP-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for COLORMAP-NOTIFY-EVENT-GET. ;;; Emitting code for COLORMAP-NOTIFY-EVENT-PUT. ;;; Emitting code for CLIENT-MESSAGE-EVENT-GET-MACRO. ;;; Emitting code for CLIENT-MESSAGE-EVENT-GET. ;;; Emitting code for CLIENT-MESSAGE-EVENT-PUT. ;;; Warning: ;;; in file INPUT.LISP, position 42064 ;;; at (DECLARE-EVENT CLIENT-MESSAGE ...) ;;; ! Unable to coerce lisp object from type (NULL,:OBJECT) ;;; to C/C++ type ((SIGNED-BYTE 62),:FIXNUM) ;;; Emitting code for MAPPING-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for MAPPING-NOTIFY-EVENT-GET. ;;; Emitting code for MAPPING-NOTIFY-EVENT-PUT. ;;; Emitting code for EVENT-LOOP-SETUP. ;;; Emitting code for EVENT-LOOP-STEP-BEFORE. ;;; Emitting code for DEQUEUE-EVENT. ;;; Emitting code for EVENT-LOOP-STEP-AFTER. ;;; Emitting code for EVENT-LOOP. ;;; Emitting code for DISCARD-CURRENT-EVENT. ;;; Emitting code for PROCESS-EVENT. ;;; Emitting code for MAKE-EVENT-HANDLERS. ;;; Emitting code for EVENT-HANDLER. ;;; Emitting code for SET-EVENT-HANDLER. ;;; Emitting code for EVENT-CASE. ;;; Emitting code for #:G2301. ;;; Emitting code for EVENT-COND. ;;; Emitting code for GET-EVENT-CODE. ;;; Emitting code for UNIVERSAL-EVENT-GET-MACRO. ;;; Emitting code for EVENT-DISPATCH. ;;; Emitting code for #:G2396. ;;; Emitting code for EVENT-CLAUSE. ;;; Emitting code for BINDING-EVENT-VALUES. ;;; Emitting code for VAR-SYMBOL. ;;; Emitting code for VAR-KEY. ;;; Emitting code for #:G2664. ;;; Emitting code for MAKE-ERROR. ;;; Emitting code for REPORT-ERROR. ;;; Emitting code for REQUEST-NAME. ;;; Emitting code for REPORT-REQUEST-ERROR. ;;; Emitting code for #:G2711. ;;; Emitting code for #:G2712. ;;; Emitting code for #:G2713. ;;; Emitting code for #:G2714. ;;; Emitting code for #:G2715. ;;; Emitting code for #:G2716. ;;; Emitting code for #:G2717. ;;; Emitting code for #:G2718. ;;; Emitting code for #:G2719. ;;; Emitting code for #:G2720. ;;; Emitting code for #:G2721. ;;; Emitting code for #:G2722. ;;; Emitting code for #:G2723. ;;; Emitting code for #:G2724. ;;; Emitting code for #:G2725. ;;; Emitting code for #:G2726. ;;; Emitting code for #:G2727. ;;; Emitting code for #:G2728. ;;; Emitting code for #:G2729. ;;; Emitting code for #:G2730. ;;; Emitting code for #:G2731. ;;; Emitting code for #:G2732. ;;; Emitting code for #:G2733. ;;; Emitting code for #:G2734. ;;; Emitting code for #:G2735. ;;; Emitting code for #:G2736. ;;; Emitting code for #:G2737. ;;; Emitting code for #:G2738. ;;; Emitting code for #:G2739. ;;; Emitting code for #:G2740. ;;; Emitting code for #:G2741. ;;; Emitting code for #:G2742. ;;; Emitting code for #:G2743. ;;; Emitting code for #:G2744. ;;; Emitting code for #:G2745. ;;; Emitting code for #:G2746. ;;; Emitting code for #:G2747. ;;; Emitting code for #:G2748. ;;; Emitting code for #:G2749. ;;; Emitting code for #:G2750. ;;; Emitting code for GET-ERROR-KEY. ;;; Emitting code for DEFINE-ERROR. ;;; Emitting code for DECODE-CORE-ERROR. ;;; Emitting code for DECODE-RESOURCE-ERROR. ;;; Emitting code for #:G2806. ;;; Emitting code for #:G2813. ;;; Emitting code for #:G2823. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/input.c -o clx/input.o ;;; Finished compiling SRC:CLX;INPUT.LISP. ;;; (compile-file "src:clx;requests.lisp" :output-file #P"BUILD:CLX;REQUESTS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;REQUESTS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN CREATE-WINDOW ...). ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of (WINDOW-DISPLAY PARENT) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of (OR WINDOW (MAKE-WINDOW :DISPLAY DISPLAY)) to be WINDOW ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of (ALLOCATE-RESOURCE-ID DISPLAY WINDOW 'WINDOW) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of 0 to be (OR NULL RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of 1 to be (OR NULL RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of (PIXMAP-ID BACKGROUND) to be (OR NULL RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of BACKGROUND to be (OR NULL PIXEL) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of 0 to be (OR NULL RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of (PIXMAP-ID BORDER) to be (OR NULL RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of BORDER to be (OR NULL PIXEL) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of (ENCODE-EVENT-MASK EVENT-MASK) to be (OR NULL EVENT-MASK) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Checking type of (ENCODE-DEVICE-EVENT-MASK DO-NOT-PROPAGATE-MASK) to be (OR NULL DEVICE-EVENT-MASK) ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 692 ;;; at (DEFUN CREATE-WINDOW ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DESTROY-WINDOW ...). ;;; Note: ;;; in file REQUESTS.LISP, position 5231 ;;; at (DEFUN DESTROY-WINDOW ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 5231 ;;; at (DEFUN DESTROY-WINDOW ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 5231 ;;; at (DEFUN DESTROY-WINDOW ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DESTROY-SUBWINDOWS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 5385 ;;; at (DEFUN DESTROY-SUBWINDOWS ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 5385 ;;; at (DEFUN DESTROY-SUBWINDOWS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 5385 ;;; at (DEFUN DESTROY-SUBWINDOWS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN ADD-TO-SAVE-SET ...). ;;; Note: ;;; in file REQUESTS.LISP, position 5547 ;;; at (DEFUN ADD-TO-SAVE-SET ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 5547 ;;; at (DEFUN ADD-TO-SAVE-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 5547 ;;; at (DEFUN ADD-TO-SAVE-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 5547 ;;; at (DEFUN ADD-TO-SAVE-SET ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN REMOVE-FROM-SAVE-SET ...). ;;; Note: ;;; in file REQUESTS.LISP, position 5715 ;;; at (DEFUN REMOVE-FROM-SAVE-SET ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 5715 ;;; at (DEFUN REMOVE-FROM-SAVE-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 5715 ;;; at (DEFUN REMOVE-FROM-SAVE-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 5715 ;;; at (DEFUN REMOVE-FROM-SAVE-SET ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN REPARENT-WINDOW ...). ;;; Note: ;;; in file REQUESTS.LISP, position 5888 ;;; at (DEFUN REPARENT-WINDOW ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 5888 ;;; at (DEFUN REPARENT-WINDOW ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 5888 ;;; at (DEFUN REPARENT-WINDOW ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN MAP-WINDOW ...). ;;; Note: ;;; in file REQUESTS.LISP, position 6113 ;;; at (DEFUN MAP-WINDOW ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 6113 ;;; at (DEFUN MAP-WINDOW ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 6113 ;;; at (DEFUN MAP-WINDOW ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN MAP-SUBWINDOWS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 6259 ;;; at (DEFUN MAP-SUBWINDOWS ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 6259 ;;; at (DEFUN MAP-SUBWINDOWS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 6259 ;;; at (DEFUN MAP-SUBWINDOWS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN UNMAP-WINDOW ...). ;;; Note: ;;; in file REQUESTS.LISP, position 6413 ;;; at (DEFUN UNMAP-WINDOW ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 6413 ;;; at (DEFUN UNMAP-WINDOW ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 6413 ;;; at (DEFUN UNMAP-WINDOW ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN UNMAP-SUBWINDOWS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 6563 ;;; at (DEFUN UNMAP-SUBWINDOWS ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 6563 ;;; at (DEFUN UNMAP-SUBWINDOWS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 6563 ;;; at (DEFUN UNMAP-SUBWINDOWS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CIRCULATE-WINDOW-UP ...). ;;; Note: ;;; in file REQUESTS.LISP, position 6721 ;;; at (DEFUN CIRCULATE-WINDOW-UP ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 6721 ;;; at (DEFUN CIRCULATE-WINDOW-UP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 6721 ;;; at (DEFUN CIRCULATE-WINDOW-UP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 6721 ;;; at (DEFUN CIRCULATE-WINDOW-UP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CIRCULATE-WINDOW-DOWN ...). ;;; Note: ;;; in file REQUESTS.LISP, position 6895 ;;; at (DEFUN CIRCULATE-WINDOW-DOWN ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 6895 ;;; at (DEFUN CIRCULATE-WINDOW-DOWN ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 6895 ;;; at (DEFUN CIRCULATE-WINDOW-DOWN ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 6895 ;;; at (DEFUN CIRCULATE-WINDOW-DOWN ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN QUERY-TREE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 7071 ;;; at (DEFUN QUERY-TREE ...) ;;; Checking type of #:LET708 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 7071 ;;; at (DEFUN QUERY-TREE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 7071 ;;; at (DEFUN QUERY-TREE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 7071 ;;; at (DEFUN QUERY-TREE ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 7071 ;;; at (DEFUN QUERY-TREE ...) ;;; Checking type of #:LET751 to be REPLY-BUFFER ;;; Compiling (DEFUN INTERN-ATOM ...). ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Checking type of (IF (OR (NULL NAME) (KEYWORDP NAME)) NAME (KINTERN (STRING NAME))) to be SYMBOL ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Checking type of #:LET812 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Checking type of (WITH-BUFFER-REQUEST-AND-REPLY (DISPLAY +X-INTERNATOM+ 12 :SIZES 32) ((DATA 0) (CARD16 (LENGTH STRING)) (PAD16 NIL) (STRING STRING)) (VALUES (RESOURCE-ID-GET 8))) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 8139 ;;; at (DEFUN INTERN-ATOM ...) ;;; Checking type of #:LET867 to be REPLY-BUFFER ;;; Compiling (DEFUN FIND-ATOM ...). ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Checking type of (IF (OR (NULL NAME) (KEYWORDP NAME)) NAME (KINTERN (STRING NAME))) to be SYMBOL ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Checking type of #:LET930 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Checking type of (WITH-BUFFER-REQUEST-AND-REPLY (DISPLAY +X-INTERNATOM+ 12 :SIZES 32) ((DATA 1) (CARD16 (LENGTH STRING)) (PAD16 NIL) (STRING STRING)) (VALUES (OR-GET 8 NULL RESOURCE-ID))) to be (OR NULL RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 8974 ;;; at (DEFUN FIND-ATOM ...) ;;; Checking type of #:LET993 to be REPLY-BUFFER ;;; Compiling (DEFUN ATOM-NAME ...). ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Checking type of #:LET1055 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Checking type of (KINTERN (WITH-BUFFER-REQUEST-AND-REPLY (DISPLAY +X-GETATOMNAME+ NIL :SIZES (16)) ((RESOURCE-ID ATOM-ID)) (VALUES (STRING-GET (CARD16-GET 8) +REPLYSIZE+)))) to be KEYWORD ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 9925 ;;; at (DEFUN ATOM-NAME ...) ;;; Checking type of #:LET1100 to be REPLY-BUFFER ;;; Compiling (DEFUN LOOKUP-XATOM ...). ;;; Compiling (DEFUN CHANGE-PROPERTY ...). ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX END) (THE ARRAY-INDEX START))) to be ARRAY-INDEX ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Checking type of (INTERN-ATOM DISPLAY PROPERTY) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Checking type of (INTERN-ATOM DISPLAY TYPE) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 10725 ;;; at (DEFUN CHANGE-PROPERTY ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DELETE-PROPERTY ...). ;;; Note: ;;; in file REQUESTS.LISP, position 12281 ;;; at (DEFUN DELETE-PROPERTY ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 12281 ;;; at (DEFUN DELETE-PROPERTY ...) ;;; Checking type of (INTERN-ATOM DISPLAY PROPERTY) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 12281 ;;; at (DEFUN DELETE-PROPERTY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 12281 ;;; at (DEFUN DELETE-PROPERTY ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GET-PROPERTY ...). ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Checking type of (INTERN-ATOM DISPLAY PROPERTY) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Checking type of (AND TYPE (INTERN-ATOM DISPLAY TYPE)) to be (OR NULL RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Checking type of #:LET1316 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 12679 ;;; at (DEFUN GET-PROPERTY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN ROTATE-PROPERTIES ...). ;;; Note: ;;; in file REQUESTS.LISP, position 15179 ;;; at (DEFUN ROTATE-PROPERTIES ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 15179 ;;; at (DEFUN ROTATE-PROPERTIES ...) ;;; Checking type of SEQUENCE to be VECTOR ;;; Note: ;;; in file REQUESTS.LISP, position 15179 ;;; at (DEFUN ROTATE-PROPERTIES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 15179 ;;; at (DEFUN ROTATE-PROPERTIES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN LIST-PROPERTIES ...). ;;; Note: ;;; in file REQUESTS.LISP, position 16104 ;;; at (DEFUN LIST-PROPERTIES ...) ;;; Checking type of #:LET1381 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 16104 ;;; at (DEFUN LIST-PROPERTIES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 16104 ;;; at (DEFUN LIST-PROPERTIES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 16104 ;;; at (DEFUN LIST-PROPERTIES ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 16104 ;;; at (DEFUN LIST-PROPERTIES ...) ;;; Checking type of #:LET1424 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 16104 ;;; at (DEFUN LIST-PROPERTIES ...) ;;; Checking type of #:G1428 to be CONS ;;; Compiling (DEFUN SELECTION-OWNER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 16918 ;;; at (DEFUN SELECTION-OWNER ...) ;;; Checking type of (INTERN-ATOM DISPLAY SELECTION) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 16918 ;;; at (DEFUN SELECTION-OWNER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 16918 ;;; at (DEFUN SELECTION-OWNER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 16918 ;;; at (DEFUN SELECTION-OWNER ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 16918 ;;; at (DEFUN SELECTION-OWNER ...) ;;; Checking type of #:LET1485 to be REPLY-BUFFER ;;; Compiling (DEFUN SET-SELECTION-OWNER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 17447 ;;; at (DEFUN SET-SELECTION-OWNER ...) ;;; Checking type of (INTERN-ATOM DISPLAY SELECTION) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 17447 ;;; at (DEFUN SET-SELECTION-OWNER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 17447 ;;; at (DEFUN SET-SELECTION-OWNER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CONVERT-SELECTION ...). ;;; Note: ;;; in file REQUESTS.LISP, position 18096 ;;; at (DEFUN CONVERT-SELECTION ...) ;;; Checking type of (WINDOW-DISPLAY REQUESTOR) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 18096 ;;; at (DEFUN CONVERT-SELECTION ...) ;;; Checking type of (INTERN-ATOM DISPLAY SELECTION) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 18096 ;;; at (DEFUN CONVERT-SELECTION ...) ;;; Checking type of (INTERN-ATOM DISPLAY TYPE) to be RESOURCE-ID ;;; Note: ;;; in file REQUESTS.LISP, position 18096 ;;; at (DEFUN CONVERT-SELECTION ...) ;;; Checking type of (AND PROPERTY (INTERN-ATOM DISPLAY PROPERTY)) to be (OR NULL RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 18096 ;;; at (DEFUN CONVERT-SELECTION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 18096 ;;; at (DEFUN CONVERT-SELECTION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN SEND-EVENT ...). ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Checking type of 0 to be (OR NULL EVENT-MASK) ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be (OR NULL DISPLAY) ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Checking type of #:LET1605 to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Checking type of #:LET1606 to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 18883 ;;; at (DEFUN SEND-EVENT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GRAB-POINTER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Checking type of #:LET1682 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Checking type of #:LET1759 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 20924 ;;; at (DEFUN GRAB-POINTER ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN UNGRAB-POINTER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 21883 ;;; at (DEFUN UNGRAB-POINTER ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 21883 ;;; at (DEFUN UNGRAB-POINTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 21883 ;;; at (DEFUN UNGRAB-POINTER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GRAB-BUTTON ...). ;;; Note: ;;; in file REQUESTS.LISP, position 22041 ;;; at (DEFUN GRAB-BUTTON ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 22041 ;;; at (DEFUN GRAB-BUTTON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 22041 ;;; at (DEFUN GRAB-BUTTON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 22041 ;;; at (DEFUN GRAB-BUTTON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 22041 ;;; at (DEFUN GRAB-BUTTON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 22041 ;;; at (DEFUN GRAB-BUTTON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 22041 ;;; at (DEFUN GRAB-BUTTON ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN UNGRAB-BUTTON ...). ;;; Note: ;;; in file REQUESTS.LISP, position 22940 ;;; at (DEFUN UNGRAB-BUTTON ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 22940 ;;; at (DEFUN UNGRAB-BUTTON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 22940 ;;; at (DEFUN UNGRAB-BUTTON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 22940 ;;; at (DEFUN UNGRAB-BUTTON ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CHANGE-ACTIVE-POINTER-GRAB ...). ;;; Note: ;;; in file REQUESTS.LISP, position 23301 ;;; at (DEFUN CHANGE-ACTIVE-POINTER-GRAB ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 23301 ;;; at (DEFUN CHANGE-ACTIVE-POINTER-GRAB ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GRAB-KEYBOARD ...). ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Checking type of #:LET2002 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Checking type of #:LET2074 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 23710 ;;; at (DEFUN GRAB-KEYBOARD ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN UNGRAB-KEYBOARD ...). ;;; Note: ;;; in file REQUESTS.LISP, position 24351 ;;; at (DEFUN UNGRAB-KEYBOARD ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 24351 ;;; at (DEFUN UNGRAB-KEYBOARD ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GRAB-KEY ...). ;;; Note: ;;; in file REQUESTS.LISP, position 24545 ;;; at (DEFUN GRAB-KEY ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 24545 ;;; at (DEFUN GRAB-KEY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 24545 ;;; at (DEFUN GRAB-KEY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 24545 ;;; at (DEFUN GRAB-KEY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 24545 ;;; at (DEFUN GRAB-KEY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 24545 ;;; at (DEFUN GRAB-KEY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 24545 ;;; at (DEFUN GRAB-KEY ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN UNGRAB-KEY ...). ;;; Note: ;;; in file REQUESTS.LISP, position 25084 ;;; at (DEFUN UNGRAB-KEY ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 25084 ;;; at (DEFUN UNGRAB-KEY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 25084 ;;; at (DEFUN UNGRAB-KEY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 25084 ;;; at (DEFUN UNGRAB-KEY ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN ALLOW-EVENTS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 25424 ;;; at (DEFUN ALLOW-EVENTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 25424 ;;; at (DEFUN ALLOW-EVENTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 25424 ;;; at (DEFUN ALLOW-EVENTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GRAB-SERVER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 26023 ;;; at (DEFUN GRAB-SERVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 26023 ;;; at (DEFUN GRAB-SERVER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN UNGRAB-SERVER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 26138 ;;; at (DEFUN UNGRAB-SERVER ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 26138 ;;; at (DEFUN UNGRAB-SERVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 26138 ;;; at (DEFUN UNGRAB-SERVER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFMACRO WITH-SERVER-GRABBED ...). ;;; Compiling (DEFUN QUERY-POINTER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 26580 ;;; at (DEFUN QUERY-POINTER ...) ;;; Checking type of #:LET2409 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 26580 ;;; at (DEFUN QUERY-POINTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 26580 ;;; at (DEFUN QUERY-POINTER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 26580 ;;; at (DEFUN QUERY-POINTER ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 26580 ;;; at (DEFUN QUERY-POINTER ...) ;;; Checking type of #:LET2452 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 26580 ;;; at (DEFUN QUERY-POINTER ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN POINTER-POSITION ...). ;;; Note: ;;; in file REQUESTS.LISP, position 27082 ;;; at (DEFUN POINTER-POSITION ...) ;;; Checking type of #:LET2464 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 27082 ;;; at (DEFUN POINTER-POSITION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 27082 ;;; at (DEFUN POINTER-POSITION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 27082 ;;; at (DEFUN POINTER-POSITION ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 27082 ;;; at (DEFUN POINTER-POSITION ...) ;;; Checking type of #:LET2507 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 27082 ;;; at (DEFUN POINTER-POSITION ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN GLOBAL-POINTER-POSITION ...). ;;; Note: ;;; in file REQUESTS.LISP, position 27429 ;;; at (DEFUN GLOBAL-POINTER-POSITION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 27429 ;;; at (DEFUN GLOBAL-POINTER-POSITION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 27429 ;;; at (DEFUN GLOBAL-POINTER-POSITION ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 27429 ;;; at (DEFUN GLOBAL-POINTER-POSITION ...) ;;; Checking type of #:LET2554 to be REPLY-BUFFER ;;; Compiling (DEFUN MOTION-EVENTS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 27770 ;;; at (DEFUN MOTION-EVENTS ...) ;;; Checking type of #:LET2556 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 27770 ;;; at (DEFUN MOTION-EVENTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 27770 ;;; at (DEFUN MOTION-EVENTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 27770 ;;; at (DEFUN MOTION-EVENTS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 27770 ;;; at (DEFUN MOTION-EVENTS ...) ;;; Checking type of #:LET2609 to be REPLY-BUFFER ;;; Compiling (DEFUN TRANSLATE-COORDINATES ...). ;;; Note: ;;; in file REQUESTS.LISP, position 28370 ;;; at (DEFUN TRANSLATE-COORDINATES ...) ;;; Checking type of #:LET2611 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 28370 ;;; at (DEFUN TRANSLATE-COORDINATES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 28370 ;;; at (DEFUN TRANSLATE-COORDINATES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 28370 ;;; at (DEFUN TRANSLATE-COORDINATES ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 28370 ;;; at (DEFUN TRANSLATE-COORDINATES ...) ;;; Checking type of #:LET2654 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 28370 ;;; at (DEFUN TRANSLATE-COORDINATES ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN WARP-POINTER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 28931 ;;; at (DEFUN WARP-POINTER ...) ;;; Checking type of (WINDOW-DISPLAY DST) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 28931 ;;; at (DEFUN WARP-POINTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 28931 ;;; at (DEFUN WARP-POINTER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN WARP-POINTER-RELATIVE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 29202 ;;; at (DEFUN WARP-POINTER-RELATIVE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 29202 ;;; at (DEFUN WARP-POINTER-RELATIVE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN WARP-POINTER-IF-INSIDE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 29489 ;;; at (DEFUN WARP-POINTER-IF-INSIDE ...) ;;; Checking type of (WINDOW-DISPLAY DST) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 29489 ;;; at (DEFUN WARP-POINTER-IF-INSIDE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 29489 ;;; at (DEFUN WARP-POINTER-IF-INSIDE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 30147 ;;; at (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...) ;;; Checking type of (WINDOW-DISPLAY SRC) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 30147 ;;; at (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 30147 ;;; at (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN SET-INPUT-FOCUS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 30841 ;;; at (DEFUN SET-INPUT-FOCUS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 30841 ;;; at (DEFUN SET-INPUT-FOCUS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 30841 ;;; at (DEFUN SET-INPUT-FOCUS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN INPUT-FOCUS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 31298 ;;; at (DEFUN INPUT-FOCUS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 31298 ;;; at (DEFUN INPUT-FOCUS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 31298 ;;; at (DEFUN INPUT-FOCUS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 31298 ;;; at (DEFUN INPUT-FOCUS ...) ;;; Checking type of #:LET2946 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 31298 ;;; at (DEFUN INPUT-FOCUS ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN QUERY-KEYMAP ...). ;;; Note: ;;; in file REQUESTS.LISP, position 31610 ;;; at (DEFUN QUERY-KEYMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 31610 ;;; at (DEFUN QUERY-KEYMAP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 31610 ;;; at (DEFUN QUERY-KEYMAP ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 31610 ;;; at (DEFUN QUERY-KEYMAP ...) ;;; Checking type of #:LET3004 to be REPLY-BUFFER ;;; Compiling (DEFUN CREATE-PIXMAP ...). ;;; Note: ;;; in file REQUESTS.LISP, position 31932 ;;; at (DEFUN CREATE-PIXMAP ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 31932 ;;; at (DEFUN CREATE-PIXMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 31932 ;;; at (DEFUN CREATE-PIXMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 31932 ;;; at (DEFUN CREATE-PIXMAP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN FREE-PIXMAP ...). ;;; Note: ;;; in file REQUESTS.LISP, position 32784 ;;; at (DEFUN FREE-PIXMAP ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 32784 ;;; at (DEFUN FREE-PIXMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 32784 ;;; at (DEFUN FREE-PIXMAP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CLEAR-AREA ...). ;;; Note: ;;; in file REQUESTS.LISP, position 33028 ;;; at (DEFUN CLEAR-AREA ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 33028 ;;; at (DEFUN CLEAR-AREA ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 33028 ;;; at (DEFUN CLEAR-AREA ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 33028 ;;; at (DEFUN CLEAR-AREA ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN COPY-AREA ...). ;;; Note: ;;; in file REQUESTS.LISP, position 33627 ;;; at (DEFUN COPY-AREA ...) ;;; Checking type of (DRAWABLE-DISPLAY SRC) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 33627 ;;; at (DEFUN COPY-AREA ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 33627 ;;; at (DEFUN COPY-AREA ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN COPY-PLANE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 34050 ;;; at (DEFUN COPY-PLANE ...) ;;; Checking type of (DRAWABLE-DISPLAY SRC) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 34050 ;;; at (DEFUN COPY-PLANE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 34050 ;;; at (DEFUN COPY-PLANE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CREATE-COLORMAP ...). ;;; Note: ;;; in file REQUESTS.LISP, position 34530 ;;; at (DEFUN CREATE-COLORMAP ...) ;;; Checking type of (VISUAL-INFO DISPLAY VISUAL-INFO) to be (OR VISUAL-INFO RESOURCE-ID) ;;; Note: ;;; in file REQUESTS.LISP, position 34530 ;;; at (DEFUN CREATE-COLORMAP ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 34530 ;;; at (DEFUN CREATE-COLORMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 34530 ;;; at (DEFUN CREATE-COLORMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 34530 ;;; at (DEFUN CREATE-COLORMAP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN FREE-COLORMAP ...). ;;; Note: ;;; in file REQUESTS.LISP, position 35295 ;;; at (DEFUN FREE-COLORMAP ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 35295 ;;; at (DEFUN FREE-COLORMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 35295 ;;; at (DEFUN FREE-COLORMAP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN COPY-COLORMAP-AND-FREE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 35563 ;;; at (DEFUN COPY-COLORMAP-AND-FREE ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 35563 ;;; at (DEFUN COPY-COLORMAP-AND-FREE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 35563 ;;; at (DEFUN COPY-COLORMAP-AND-FREE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN INSTALL-COLORMAP ...). ;;; Note: ;;; in file REQUESTS.LISP, position 36101 ;;; at (DEFUN INSTALL-COLORMAP ...) ;;; Checking type of (COLORMAP-DISPLAY COLORMAP) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 36101 ;;; at (DEFUN INSTALL-COLORMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 36101 ;;; at (DEFUN INSTALL-COLORMAP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN UNINSTALL-COLORMAP ...). ;;; Note: ;;; in file REQUESTS.LISP, position 36273 ;;; at (DEFUN UNINSTALL-COLORMAP ...) ;;; Checking type of (COLORMAP-DISPLAY COLORMAP) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 36273 ;;; at (DEFUN UNINSTALL-COLORMAP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 36273 ;;; at (DEFUN UNINSTALL-COLORMAP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN INSTALLED-COLORMAPS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 36449 ;;; at (DEFUN INSTALLED-COLORMAPS ...) ;;; Checking type of #:LET3543 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 36449 ;;; at (DEFUN INSTALLED-COLORMAPS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 36449 ;;; at (DEFUN INSTALLED-COLORMAPS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 36449 ;;; at (DEFUN INSTALLED-COLORMAPS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 36449 ;;; at (DEFUN INSTALLED-COLORMAPS ...) ;;; Checking type of #:LET3586 to be REPLY-BUFFER ;;; Compiling (DEFUN ALLOC-COLOR ...). ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Checking type of #:LET3589 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Checking type of #:LET3647 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Checking type of #:LET3650 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 37033 ;;; at (DEFUN ALLOC-COLOR ...) ;;; Checking type of #:LET3696 to be REPLY-BUFFER ;;; Compiling (DEFUN ALLOC-COLOR-CELLS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 38436 ;;; at (DEFUN ALLOC-COLOR-CELLS ...) ;;; Checking type of #:LET3698 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 38436 ;;; at (DEFUN ALLOC-COLOR-CELLS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 38436 ;;; at (DEFUN ALLOC-COLOR-CELLS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 38436 ;;; at (DEFUN ALLOC-COLOR-CELLS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 38436 ;;; at (DEFUN ALLOC-COLOR-CELLS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 38436 ;;; at (DEFUN ALLOC-COLOR-CELLS ...) ;;; Checking type of #:LET3749 to be REPLY-BUFFER ;;; Compiling (DEFUN ALLOC-COLOR-PLANES ...). ;;; Note: ;;; in file REQUESTS.LISP, position 39337 ;;; at (DEFUN ALLOC-COLOR-PLANES ...) ;;; Checking type of #:LET3753 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 39337 ;;; at (DEFUN ALLOC-COLOR-PLANES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 39337 ;;; at (DEFUN ALLOC-COLOR-PLANES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 39337 ;;; at (DEFUN ALLOC-COLOR-PLANES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 39337 ;;; at (DEFUN ALLOC-COLOR-PLANES ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 39337 ;;; at (DEFUN ALLOC-COLOR-PLANES ...) ;;; Checking type of #:LET3804 to be REPLY-BUFFER ;;; Compiling (DEFUN FREE-COLORS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 40282 ;;; at (DEFUN FREE-COLORS ...) ;;; Checking type of (COLORMAP-DISPLAY COLORMAP) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 40282 ;;; at (DEFUN FREE-COLORS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40282 ;;; at (DEFUN FREE-COLORS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN STORE-COLOR ...). ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Checking type of #:LET3847 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Checking type of #:LET3848 to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Checking type of 1 to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Checking type of (+ FLAGS #:G3850) to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Checking type of (+ FLAGS #:G3857) to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 40615 ;;; at (DEFUN STORE-COLOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN STORE-COLORS ...). ;;; Compiling (DEFUN QUERY-COLORS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 42578 ;;; at (DEFUN QUERY-COLORS ...) ;;; Checking type of #:LET3984 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 42578 ;;; at (DEFUN QUERY-COLORS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 42578 ;;; at (DEFUN QUERY-COLORS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 42578 ;;; at (DEFUN QUERY-COLORS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 42578 ;;; at (DEFUN QUERY-COLORS ...) ;;; Checking type of #:LET4025 to be REPLY-BUFFER ;;; Compiling (DEFUN LOOKUP-COLOR ...). ;;; Note: ;;; in file REQUESTS.LISP, position 43406 ;;; at (DEFUN LOOKUP-COLOR ...) ;;; Checking type of #:LET4033 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 43406 ;;; at (DEFUN LOOKUP-COLOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 43406 ;;; at (DEFUN LOOKUP-COLOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 43406 ;;; at (DEFUN LOOKUP-COLOR ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 43406 ;;; at (DEFUN LOOKUP-COLOR ...) ;;; Checking type of #:LET4079 to be REPLY-BUFFER ;;; Compiling (DEFUN CREATE-CURSOR ...). ;;; Note: ;;; in file REQUESTS.LISP, position 44133 ;;; at (DEFUN CREATE-CURSOR ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 44133 ;;; at (DEFUN CREATE-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 44133 ;;; at (DEFUN CREATE-CURSOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CREATE-GLYPH-CURSOR ...). ;;; Note: ;;; in file REQUESTS.LISP, position 45261 ;;; at (DEFUN CREATE-GLYPH-CURSOR ...) ;;; Checking type of 0 to be (OR NULL CARD16) ;;; Note: ;;; in file REQUESTS.LISP, position 45261 ;;; at (DEFUN CREATE-GLYPH-CURSOR ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 45261 ;;; at (DEFUN CREATE-GLYPH-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 45261 ;;; at (DEFUN CREATE-GLYPH-CURSOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN FREE-CURSOR ...). ;;; Note: ;;; in file REQUESTS.LISP, position 46672 ;;; at (DEFUN FREE-CURSOR ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 46672 ;;; at (DEFUN FREE-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 46672 ;;; at (DEFUN FREE-CURSOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RECOLOR-CURSOR ...). ;;; Note: ;;; in file REQUESTS.LISP, position 46916 ;;; at (DEFUN RECOLOR-CURSOR ...) ;;; Checking type of (CURSOR-DISPLAY CURSOR) to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 46916 ;;; at (DEFUN RECOLOR-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 46916 ;;; at (DEFUN RECOLOR-CURSOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN QUERY-BEST-CURSOR ...). ;;; Note: ;;; in file REQUESTS.LISP, position 47367 ;;; at (DEFUN QUERY-BEST-CURSOR ...) ;;; Checking type of #:LET4404 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 47367 ;;; at (DEFUN QUERY-BEST-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 47367 ;;; at (DEFUN QUERY-BEST-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 47367 ;;; at (DEFUN QUERY-BEST-CURSOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 47367 ;;; at (DEFUN QUERY-BEST-CURSOR ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 47367 ;;; at (DEFUN QUERY-BEST-CURSOR ...) ;;; Checking type of #:LET4454 to be REPLY-BUFFER ;;; Compiling (DEFUN QUERY-BEST-TILE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 48031 ;;; at (DEFUN QUERY-BEST-TILE ...) ;;; Checking type of #:LET4456 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 48031 ;;; at (DEFUN QUERY-BEST-TILE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 48031 ;;; at (DEFUN QUERY-BEST-TILE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 48031 ;;; at (DEFUN QUERY-BEST-TILE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 48031 ;;; at (DEFUN QUERY-BEST-TILE ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 48031 ;;; at (DEFUN QUERY-BEST-TILE ...) ;;; Checking type of #:LET4506 to be REPLY-BUFFER ;;; Compiling (DEFUN QUERY-BEST-STIPPLE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 48462 ;;; at (DEFUN QUERY-BEST-STIPPLE ...) ;;; Checking type of #:LET4508 to be DISPLAY ;;; Note: ;;; in file REQUESTS.LISP, position 48462 ;;; at (DEFUN QUERY-BEST-STIPPLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 48462 ;;; at (DEFUN QUERY-BEST-STIPPLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 48462 ;;; at (DEFUN QUERY-BEST-STIPPLE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 48462 ;;; at (DEFUN QUERY-BEST-STIPPLE ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 48462 ;;; at (DEFUN QUERY-BEST-STIPPLE ...) ;;; Checking type of #:LET4558 to be REPLY-BUFFER ;;; Compiling (DEFUN QUERY-EXTENSION ...). ;;; Note: ;;; in file REQUESTS.LISP, position 48896 ;;; at (DEFUN QUERY-EXTENSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 48896 ;;; at (DEFUN QUERY-EXTENSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 48896 ;;; at (DEFUN QUERY-EXTENSION ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 48896 ;;; at (DEFUN QUERY-EXTENSION ...) ;;; Checking type of #:LET4606 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 48896 ;;; at (DEFUN QUERY-EXTENSION ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 48896 ;;; at (DEFUN QUERY-EXTENSION ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 48896 ;;; at (DEFUN QUERY-EXTENSION ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 48896 ;;; at (DEFUN QUERY-EXTENSION ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN LIST-EXTENSIONS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 49409 ;;; at (DEFUN LIST-EXTENSIONS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 49409 ;;; at (DEFUN LIST-EXTENSIONS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 49409 ;;; at (DEFUN LIST-EXTENSIONS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 49409 ;;; at (DEFUN LIST-EXTENSIONS ...) ;;; Checking type of .REPLY-BUFFER. to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 49409 ;;; at (DEFUN LIST-EXTENSIONS ...) ;;; Checking type of (REPLY-DATA-SIZE (THE REPLY-BUFFER .REPLY-BUFFER.)) to be ARRAY-INDEX ;;; Note: ;;; in file REQUESTS.LISP, position 49409 ;;; at (DEFUN LIST-EXTENSIONS ...) ;;; Checking type of .REPLY-BUFFER. to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 49409 ;;; at (DEFUN LIST-EXTENSIONS ...) ;;; Checking type of #:LET4664 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 49409 ;;; at (DEFUN LIST-EXTENSIONS ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN CHANGE-KEYBOARD-CONTROL ...). ;;; Note: ;;; in file REQUESTS.LISP, position 49807 ;;; at (DEFUN CHANGE-KEYBOARD-CONTROL ...) ;;; Checking type of -1 to be (OR NULL (MEMBER :DEFAULT) INT16) ;;; Note: ;;; in file REQUESTS.LISP, position 49807 ;;; at (DEFUN CHANGE-KEYBOARD-CONTROL ...) ;;; Checking type of -1 to be (OR NULL (MEMBER :DEFAULT) INT16) ;;; Note: ;;; in file REQUESTS.LISP, position 49807 ;;; at (DEFUN CHANGE-KEYBOARD-CONTROL ...) ;;; Checking type of -1 to be (OR NULL (MEMBER :DEFAULT) INT16) ;;; Note: ;;; in file REQUESTS.LISP, position 49807 ;;; at (DEFUN CHANGE-KEYBOARD-CONTROL ...) ;;; Checking type of -1 to be (OR NULL (MEMBER :DEFAULT) INT16) ;;; Note: ;;; in file REQUESTS.LISP, position 49807 ;;; at (DEFUN CHANGE-KEYBOARD-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 49807 ;;; at (DEFUN CHANGE-KEYBOARD-CONTROL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN KEYBOARD-CONTROL ...). ;;; Note: ;;; in file REQUESTS.LISP, position 50896 ;;; at (DEFUN KEYBOARD-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 50896 ;;; at (DEFUN KEYBOARD-CONTROL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 50896 ;;; at (DEFUN KEYBOARD-CONTROL ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 50896 ;;; at (DEFUN KEYBOARD-CONTROL ...) ;;; Checking type of #:LET4784 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 50896 ;;; at (DEFUN KEYBOARD-CONTROL ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 50896 ;;; at (DEFUN KEYBOARD-CONTROL ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 50896 ;;; at (DEFUN KEYBOARD-CONTROL ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN BELL ...). ;;; Note: ;;; in file REQUESTS.LISP, position 51861 ;;; at (DEFUN BELL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 51861 ;;; at (DEFUN BELL ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 51861 ;;; at (DEFUN BELL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 51861 ;;; at (DEFUN BELL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN POINTER-MAPPING ...). ;;; Note: ;;; in file REQUESTS.LISP, position 52177 ;;; at (DEFUN POINTER-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 52177 ;;; at (DEFUN POINTER-MAPPING ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 52177 ;;; at (DEFUN POINTER-MAPPING ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 52177 ;;; at (DEFUN POINTER-MAPPING ...) ;;; Checking type of #:LET4889 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 52177 ;;; at (DEFUN POINTER-MAPPING ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SET-POINTER-MAPPING ...). ;;; Note: ;;; in file REQUESTS.LISP, position 52592 ;;; at (DEFUN SET-POINTER-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 52592 ;;; at (DEFUN SET-POINTER-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 52592 ;;; at (DEFUN SET-POINTER-MAPPING ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 52592 ;;; at (DEFUN SET-POINTER-MAPPING ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 52592 ;;; at (DEFUN SET-POINTER-MAPPING ...) ;;; Checking type of #:LET4946 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 52592 ;;; at (DEFUN SET-POINTER-MAPPING ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN CHANGE-POINTER-CONTROL ...). ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of #:LET4953 to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of #:LET4954 to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of #:LET4955 to be INT16 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of #:LET4956 to be INT16 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of -1 to be INT16 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of #:G4959 to be NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of #:G4958 to be INT16 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of #:G4957 to be INT16 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of 0 to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Checking type of 0 to be CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 53059 ;;; at (DEFUN CHANGE-POINTER-CONTROL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN POINTER-CONTROL ...). ;;; Note: ;;; in file REQUESTS.LISP, position 54766 ;;; at (DEFUN POINTER-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 54766 ;;; at (DEFUN POINTER-CONTROL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 54766 ;;; at (DEFUN POINTER-CONTROL ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 54766 ;;; at (DEFUN POINTER-CONTROL ...) ;;; Checking type of #:LET5076 to be REPLY-BUFFER ;;; Compiling (DEFUN SET-SCREEN-SAVER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Checking type of :ON to be (MEMBER :ON :OFF :DEFAULT :YES :NO) ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Checking type of :OFF to be (MEMBER :ON :OFF :DEFAULT :YES :NO) ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Checking type of :ON to be (MEMBER :ON :OFF :DEFAULT :YES :NO) ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Checking type of :OFF to be (MEMBER :ON :OFF :DEFAULT :YES :NO) ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Checking type of -1 to be (OR (MEMBER :DEFAULT) INT16) ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Checking type of -1 to be (OR (MEMBER :DEFAULT) INT16) ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 55080 ;;; at (DEFUN SET-SCREEN-SAVER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN SCREEN-SAVER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 55776 ;;; at (DEFUN SCREEN-SAVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 55776 ;;; at (DEFUN SCREEN-SAVER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 55776 ;;; at (DEFUN SCREEN-SAVER ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 55776 ;;; at (DEFUN SCREEN-SAVER ...) ;;; Checking type of #:LET5189 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 55776 ;;; at (DEFUN SCREEN-SAVER ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 55776 ;;; at (DEFUN SCREEN-SAVER ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN ACTIVATE-SCREEN-SAVER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 56178 ;;; at (DEFUN ACTIVATE-SCREEN-SAVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 56178 ;;; at (DEFUN ACTIVATE-SCREEN-SAVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 56178 ;;; at (DEFUN ACTIVATE-SCREEN-SAVER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RESET-SCREEN-SAVER ...). ;;; Note: ;;; in file REQUESTS.LISP, position 56322 ;;; at (DEFUN RESET-SCREEN-SAVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 56322 ;;; at (DEFUN RESET-SCREEN-SAVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 56322 ;;; at (DEFUN RESET-SCREEN-SAVER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN ADD-ACCESS-HOST ...). ;;; Compiling (DEFUN REMOVE-ACCESS-HOST ...). ;;; Compiling (DEFUN CHANGE-ACCESS-HOST ...). ;;; Note: ;;; in file REQUESTS.LISP, position 57602 ;;; at (DEFUN CHANGE-ACCESS-HOST ...) ;;; Checking type of (HOST-ADDRESS HOST FAMILY) to be (OR STRINGABLE LIST) ;;; Note: ;;; in file REQUESTS.LISP, position 57602 ;;; at (DEFUN CHANGE-ACCESS-HOST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 57602 ;;; at (DEFUN CHANGE-ACCESS-HOST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 57602 ;;; at (DEFUN CHANGE-ACCESS-HOST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 57602 ;;; at (DEFUN CHANGE-ACCESS-HOST ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN ACCESS-HOSTS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 58184 ;;; at (DEFUN ACCESS-HOSTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 58184 ;;; at (DEFUN ACCESS-HOSTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 58184 ;;; at (DEFUN ACCESS-HOSTS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 58184 ;;; at (DEFUN ACCESS-HOSTS ...) ;;; Checking type of #:LET5430 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 58184 ;;; at (DEFUN ACCESS-HOSTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 58184 ;;; at (DEFUN ACCESS-HOSTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 58184 ;;; at (DEFUN ACCESS-HOSTS ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN ACCESS-CONTROL ...). ;;; Note: ;;; in file REQUESTS.LISP, position 59468 ;;; at (DEFUN ACCESS-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 59468 ;;; at (DEFUN ACCESS-CONTROL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file REQUESTS.LISP, position 59468 ;;; at (DEFUN ACCESS-CONTROL ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file REQUESTS.LISP, position 59468 ;;; at (DEFUN ACCESS-CONTROL ...) ;;; Checking type of #:LET5496 to be REPLY-BUFFER ;;; Note: ;;; in file REQUESTS.LISP, position 59468 ;;; at (DEFUN ACCESS-CONTROL ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SET-ACCESS-CONTROL ...). ;;; Note: ;;; in file REQUESTS.LISP, position 59720 ;;; at (DEFUN SET-ACCESS-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 59720 ;;; at (DEFUN SET-ACCESS-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 59720 ;;; at (DEFUN SET-ACCESS-CONTROL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CLOSE-DOWN-MODE ...). ;;; Compiling (DEFUN SET-CLOSE-DOWN-MODE ...). ;;; Note: ;;; in file REQUESTS.LISP, position 60242 ;;; at (DEFUN SET-CLOSE-DOWN-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 60242 ;;; at (DEFUN SET-CLOSE-DOWN-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 60242 ;;; at (DEFUN SET-CLOSE-DOWN-MODE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN KILL-CLIENT ...). ;;; Note: ;;; in file REQUESTS.LISP, position 60681 ;;; at (DEFUN KILL-CLIENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 60681 ;;; at (DEFUN KILL-CLIENT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN KILL-TEMPORARY-CLIENTS ...). ;;; Note: ;;; in file REQUESTS.LISP, position 60880 ;;; at (DEFUN KILL-TEMPORARY-CLIENTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 60880 ;;; at (DEFUN KILL-TEMPORARY-CLIENTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN NO-OPERATION ...). ;;; Note: ;;; in file REQUESTS.LISP, position 61026 ;;; at (DEFUN NO-OPERATION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file REQUESTS.LISP, position 61026 ;;; at (DEFUN NO-OPERATION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; End of Pass 1. ;;; Emitting code for CREATE-WINDOW. ;;; Emitting code for DESTROY-WINDOW. ;;; Emitting code for DESTROY-SUBWINDOWS. ;;; Emitting code for ADD-TO-SAVE-SET. ;;; Emitting code for REMOVE-FROM-SAVE-SET. ;;; Emitting code for REPARENT-WINDOW. ;;; Emitting code for MAP-WINDOW. ;;; Emitting code for MAP-SUBWINDOWS. ;;; Emitting code for UNMAP-WINDOW. ;;; Emitting code for UNMAP-SUBWINDOWS. ;;; Emitting code for CIRCULATE-WINDOW-UP. ;;; Emitting code for CIRCULATE-WINDOW-DOWN. ;;; Emitting code for QUERY-TREE. ;;; Emitting code for INTERN-ATOM. ;;; Emitting code for FIND-ATOM. ;;; Emitting code for ATOM-NAME. ;;; Emitting code for LOOKUP-XATOM. ;;; Emitting code for CHANGE-PROPERTY. ;;; Emitting code for DELETE-PROPERTY. ;;; Emitting code for GET-PROPERTY. ;;; Emitting code for ROTATE-PROPERTIES. ;;; Emitting code for LIST-PROPERTIES. ;;; Emitting code for SELECTION-OWNER. ;;; Emitting code for SET-SELECTION-OWNER. ;;; Emitting code for SELECTION-OWNER. ;;; Emitting code for CONVERT-SELECTION. ;;; Emitting code for SEND-EVENT. ;;; Emitting code for GRAB-POINTER. ;;; Emitting code for UNGRAB-POINTER. ;;; Emitting code for GRAB-BUTTON. ;;; Emitting code for UNGRAB-BUTTON. ;;; Emitting code for CHANGE-ACTIVE-POINTER-GRAB. ;;; Emitting code for GRAB-KEYBOARD. ;;; Emitting code for UNGRAB-KEYBOARD. ;;; Emitting code for GRAB-KEY. ;;; Emitting code for UNGRAB-KEY. ;;; Emitting code for ALLOW-EVENTS. ;;; Emitting code for GRAB-SERVER. ;;; Emitting code for UNGRAB-SERVER. ;;; Emitting code for WITH-SERVER-GRABBED. ;;; Emitting code for QUERY-POINTER. ;;; Emitting code for POINTER-POSITION. ;;; Emitting code for GLOBAL-POINTER-POSITION. ;;; Emitting code for MOTION-EVENTS. ;;; Emitting code for TRANSLATE-COORDINATES. ;;; Emitting code for WARP-POINTER. ;;; Emitting code for WARP-POINTER-RELATIVE. ;;; Emitting code for WARP-POINTER-IF-INSIDE. ;;; Emitting code for WARP-POINTER-RELATIVE-IF-INSIDE. ;;; Emitting code for SET-INPUT-FOCUS. ;;; Emitting code for INPUT-FOCUS. ;;; Emitting code for QUERY-KEYMAP. ;;; Emitting code for CREATE-PIXMAP. ;;; Emitting code for FREE-PIXMAP. ;;; Emitting code for CLEAR-AREA. ;;; Emitting code for COPY-AREA. ;;; Emitting code for COPY-PLANE. ;;; Emitting code for CREATE-COLORMAP. ;;; Emitting code for FREE-COLORMAP. ;;; Emitting code for COPY-COLORMAP-AND-FREE. ;;; Emitting code for INSTALL-COLORMAP. ;;; Emitting code for UNINSTALL-COLORMAP. ;;; Emitting code for INSTALLED-COLORMAPS. ;;; Emitting code for GET-COLORMAP. ;;; Emitting code for ALLOC-COLOR. ;;; Emitting code for ALLOC-COLOR-CELLS. ;;; Emitting code for ALLOC-COLOR-PLANES. ;;; Emitting code for FREE-COLORS. ;;; Emitting code for STORE-COLOR. ;;; Emitting code for STORE-COLORS. ;;; Emitting code for QUERY-COLORS. ;;; Emitting code for LOOKUP-COLOR. ;;; Emitting code for CREATE-CURSOR. ;;; Emitting code for CREATE-GLYPH-CURSOR. ;;; Emitting code for FREE-CURSOR. ;;; Emitting code for RECOLOR-CURSOR. ;;; Emitting code for QUERY-BEST-CURSOR. ;;; Emitting code for QUERY-BEST-TILE. ;;; Emitting code for QUERY-BEST-STIPPLE. ;;; Emitting code for QUERY-EXTENSION. ;;; Emitting code for LIST-EXTENSIONS. ;;; Emitting code for CHANGE-KEYBOARD-CONTROL. ;;; Emitting code for KEYBOARD-CONTROL. ;;; Emitting code for BELL. ;;; Emitting code for POINTER-MAPPING. ;;; Emitting code for SET-POINTER-MAPPING. ;;; Emitting code for CHANGE-POINTER-CONTROL. ;;; Emitting code for RATIONALIZE16. ;;; Emitting code for POINTER-CONTROL. ;;; Emitting code for SET-SCREEN-SAVER. ;;; Emitting code for SCREEN-SAVER. ;;; Emitting code for ACTIVATE-SCREEN-SAVER. ;;; Emitting code for RESET-SCREEN-SAVER. ;;; Emitting code for ADD-ACCESS-HOST. ;;; Emitting code for REMOVE-ACCESS-HOST. ;;; Emitting code for CHANGE-ACCESS-HOST. ;;; Emitting code for ACCESS-HOSTS. ;;; Emitting code for ACCESS-CONTROL. ;;; Emitting code for SET-ACCESS-CONTROL. ;;; Emitting code for CLOSE-DOWN-MODE. ;;; Emitting code for SET-CLOSE-DOWN-MODE. ;;; Emitting code for KILL-CLIENT. ;;; Emitting code for KILL-TEMPORARY-CLIENTS. ;;; Emitting code for NO-OPERATION. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/requests.c -o clx/requests.o ;;; Finished compiling SRC:CLX;REQUESTS.LISP. ;;; (compile-file "src:clx;fonts.lisp" :output-file #P"BUILD:CLX;FONTS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;FONTS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of #:G21 to be INT16 ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of #:G27 to be INT16 ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of #:G43 to be INT16 ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC ;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...). ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Checking type of (MAKE-ARRAY 6 :ELEMENT-TYPE 'INT16) to be CHAR-INFO-VEC ;;; Note: ;;; in file FONTS.LISP, position 1725 ;;; at (DEF-CHAR-INFO-ACCESSORS IGNORE ...) ;;; Inlining CARD16->INT16 ;;; Compiling (DEFUN OPEN-FONT ...). ;;; Note: ;;; in file FONTS.LISP, position 6585 ;;; at (DEFUN OPEN-FONT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 6585 ;;; at (DEFUN OPEN-FONT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN OPEN-FONT-INTERNAL ...). ;;; Note: ;;; in file FONTS.LISP, position 7712 ;;; at (DEFUN OPEN-FONT-INTERNAL ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file FONTS.LISP, position 7712 ;;; at (DEFUN OPEN-FONT-INTERNAL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 7712 ;;; at (DEFUN OPEN-FONT-INTERNAL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DISCARD-FONT-INFO ...). ;;; Compiling (DEFUN QUERY-FONT ...). ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Checking type of #:LET284 to be DISPLAY ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Checking type of #:LET332 to be REPLY-BUFFER ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 8568 ;;; at (DEFUN QUERY-FONT ...) ;;; Checking type of #:G351 to be CONS ;;; Compiling (DEFUN CLOSE-FONT ...). ;;; Note: ;;; in file FONTS.LISP, position 10636 ;;; at (DEFUN CLOSE-FONT ...) ;;; Checking type of #:LET358 to be DISPLAY ;;; Note: ;;; in file FONTS.LISP, position 10636 ;;; at (DEFUN CLOSE-FONT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 10636 ;;; at (DEFUN CLOSE-FONT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN LIST-FONT-NAMES ...). ;;; Note: ;;; in file FONTS.LISP, position 11226 ;;; at (DEFUN LIST-FONT-NAMES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 11226 ;;; at (DEFUN LIST-FONT-NAMES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file FONTS.LISP, position 11226 ;;; at (DEFUN LIST-FONT-NAMES ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file FONTS.LISP, position 11226 ;;; at (DEFUN LIST-FONT-NAMES ...) ;;; Checking type of .REPLY-BUFFER. to be REPLY-BUFFER ;;; Note: ;;; in file FONTS.LISP, position 11226 ;;; at (DEFUN LIST-FONT-NAMES ...) ;;; Checking type of (REPLY-DATA-SIZE (THE REPLY-BUFFER .REPLY-BUFFER.)) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 11226 ;;; at (DEFUN LIST-FONT-NAMES ...) ;;; Checking type of .REPLY-BUFFER. to be REPLY-BUFFER ;;; Note: ;;; in file FONTS.LISP, position 11226 ;;; at (DEFUN LIST-FONT-NAMES ...) ;;; Checking type of #:LET458 to be REPLY-BUFFER ;;; Compiling (DEFUN LIST-FONTS ...). ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Checking type of #:LET509 to be REPLY-BUFFER ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Checking type of #:G528 to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file FONTS.LISP, position 11825 ;;; at (DEFUN LIST-FONTS ...) ;;; Checking type of #:G536 to be CONS ;;; Compiling (DEFUN FONT-PATH ...). ;;; Note: ;;; in file FONTS.LISP, position 14643 ;;; at (DEFUN FONT-PATH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 14643 ;;; at (DEFUN FONT-PATH ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file FONTS.LISP, position 14643 ;;; at (DEFUN FONT-PATH ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file FONTS.LISP, position 14643 ;;; at (DEFUN FONT-PATH ...) ;;; Checking type of .REPLY-BUFFER. to be REPLY-BUFFER ;;; Note: ;;; in file FONTS.LISP, position 14643 ;;; at (DEFUN FONT-PATH ...) ;;; Checking type of (REPLY-DATA-SIZE (THE REPLY-BUFFER .REPLY-BUFFER.)) to be ARRAY-INDEX ;;; Note: ;;; in file FONTS.LISP, position 14643 ;;; at (DEFUN FONT-PATH ...) ;;; Checking type of .REPLY-BUFFER. to be REPLY-BUFFER ;;; Note: ;;; in file FONTS.LISP, position 14643 ;;; at (DEFUN FONT-PATH ...) ;;; Checking type of #:LET586 to be REPLY-BUFFER ;;; Compiling (DEFUN SET-FONT-PATH ...). ;;; Note: ;;; in file FONTS.LISP, position 15052 ;;; at (DEFUN SET-FONT-PATH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 15052 ;;; at (DEFUN SET-FONT-PATH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 15052 ;;; at (DEFUN SET-FONT-PATH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file FONTS.LISP, position 15052 ;;; at (DEFUN SET-FONT-PATH ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; End of Pass 1. ;;; Emitting code for MAX-CHAR-ATTRIBUTES. ;;; Emitting code for MIN-CHAR-ATTRIBUTES. ;;; Emitting code for CHAR-ATTRIBUTES. ;;; Emitting code for MAX-CHAR-DESCENT. ;;; Emitting code for MIN-CHAR-DESCENT. ;;; Emitting code for CHAR-DESCENT. ;;; Emitting code for MAX-CHAR-ASCENT. ;;; Emitting code for MIN-CHAR-ASCENT. ;;; Emitting code for CHAR-ASCENT. ;;; Emitting code for MAX-CHAR-WIDTH. ;;; Emitting code for MIN-CHAR-WIDTH. ;;; Emitting code for CHAR-WIDTH. ;;; Emitting code for MAX-CHAR-RIGHT-BEARING. ;;; Emitting code for MIN-CHAR-RIGHT-BEARING. ;;; Emitting code for CHAR-RIGHT-BEARING. ;;; Emitting code for MAX-CHAR-LEFT-BEARING. ;;; Emitting code for MIN-CHAR-LEFT-BEARING. ;;; Emitting code for CHAR-LEFT-BEARING. ;;; Emitting code for MAKE-CHAR-INFO. ;;; Emitting code for OPEN-FONT. ;;; Emitting code for OPEN-FONT-INTERNAL. ;;; Emitting code for DISCARD-FONT-INFO. ;;; Emitting code for QUERY-FONT. ;;; Emitting code for CLOSE-FONT. ;;; Emitting code for LIST-FONT-NAMES. ;;; Emitting code for LIST-FONTS. ;;; Emitting code for FONT-PATH. ;;; Emitting code for SET-FONT-PATH. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/fonts.c -o clx/fonts.o ;;; Finished compiling SRC:CLX;FONTS.LISP. ;;; (compile-file "src:clx;graphics.lisp" :output-file #P"BUILD:CLX;GRAPHICS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;GRAPHICS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *INHIBIT-APPENDING* ...). ;;; Compiling (DEFUN DRAW-POINT ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 752 ;;; at (DEFUN DRAW-POINT ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 752 ;;; at (DEFUN DRAW-POINT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 752 ;;; at (DEFUN DRAW-POINT ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 752 ;;; at (DEFUN DRAW-POINT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 752 ;;; at (DEFUN DRAW-POINT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 752 ;;; at (DEFUN DRAW-POINT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-POINTS ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 3096 ;;; at (DEFUN DRAW-POINTS ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 3096 ;;; at (DEFUN DRAW-POINTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 3096 ;;; at (DEFUN DRAW-POINTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 3096 ;;; at (DEFUN DRAW-POINTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-LINE ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 3580 ;;; at (DEFUN DRAW-LINE ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 3580 ;;; at (DEFUN DRAW-LINE ...) ;;; Checking type of (+ X2 #:G127) to be INT16 ;;; Note: ;;; in file GRAPHICS.LISP, position 3580 ;;; at (DEFUN DRAW-LINE ...) ;;; Checking type of (+ Y2 #:G134) to be INT16 ;;; Note: ;;; in file GRAPHICS.LISP, position 3580 ;;; at (DEFUN DRAW-LINE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 3580 ;;; at (DEFUN DRAW-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 3580 ;;; at (DEFUN DRAW-LINE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-LINES ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 5993 ;;; at (DEFUN DRAW-LINES ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 5993 ;;; at (DEFUN DRAW-LINES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 5993 ;;; at (DEFUN DRAW-LINES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 5993 ;;; at (DEFUN DRAW-LINES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN FILL-POLYGON ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 6682 ;;; at (DEFUN FILL-POLYGON ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 6682 ;;; at (DEFUN FILL-POLYGON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 6682 ;;; at (DEFUN FILL-POLYGON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 6682 ;;; at (DEFUN FILL-POLYGON ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 6682 ;;; at (DEFUN FILL-POLYGON ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-SEGMENTS ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 7338 ;;; at (DEFUN DRAW-SEGMENTS ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 7338 ;;; at (DEFUN DRAW-SEGMENTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 7338 ;;; at (DEFUN DRAW-SEGMENTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-RECTANGLE ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 7757 ;;; at (DEFUN DRAW-RECTANGLE ...) ;;; Checking type of #:LET349 to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 7757 ;;; at (DEFUN DRAW-RECTANGLE ...) ;;; Checking type of #:LET350 to be CARD16 ;;; Note: ;;; in file GRAPHICS.LISP, position 7757 ;;; at (DEFUN DRAW-RECTANGLE ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 7757 ;;; at (DEFUN DRAW-RECTANGLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 7757 ;;; at (DEFUN DRAW-RECTANGLE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-RECTANGLES ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 10293 ;;; at (DEFUN DRAW-RECTANGLES ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 10293 ;;; at (DEFUN DRAW-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 10293 ;;; at (DEFUN DRAW-RECTANGLES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-ARC ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 10871 ;;; at (DEFUN DRAW-ARC ...) ;;; Checking type of #:LET465 to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 10871 ;;; at (DEFUN DRAW-ARC ...) ;;; Checking type of #:LET466 to be CARD16 ;;; Note: ;;; in file GRAPHICS.LISP, position 10871 ;;; at (DEFUN DRAW-ARC ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 10871 ;;; at (DEFUN DRAW-ARC ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 10871 ;;; at (DEFUN DRAW-ARC ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-ARCS-LIST ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 13535 ;;; at (DEFUN DRAW-ARCS-LIST ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file GRAPHICS.LISP, position 13535 ;;; at (DEFUN DRAW-ARCS-LIST ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) 12)) to be ARRAY-INDEX ;;; Note: ;;; in file GRAPHICS.LISP, position 13535 ;;; at (DEFUN DRAW-ARCS-LIST ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file GRAPHICS.LISP, position 13535 ;;; at (DEFUN DRAW-ARCS-LIST ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 13535 ;;; at (DEFUN DRAW-ARCS-LIST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 13535 ;;; at (DEFUN DRAW-ARCS-LIST ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-ARCS-VECTOR ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 14874 ;;; at (DEFUN DRAW-ARCS-VECTOR ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file GRAPHICS.LISP, position 14874 ;;; at (DEFUN DRAW-ARCS-VECTOR ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) 12)) to be ARRAY-INDEX ;;; Note: ;;; in file GRAPHICS.LISP, position 14874 ;;; at (DEFUN DRAW-ARCS-VECTOR ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file GRAPHICS.LISP, position 14874 ;;; at (DEFUN DRAW-ARCS-VECTOR ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 14874 ;;; at (DEFUN DRAW-ARCS-VECTOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 14874 ;;; at (DEFUN DRAW-ARCS-VECTOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-ARCS ...). ;;; Compiling (DEFUN PUT-RAW-IMAGE ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 16976 ;;; at (DEFUN PUT-RAW-IMAGE ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 16976 ;;; at (DEFUN PUT-RAW-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 16976 ;;; at (DEFUN PUT-RAW-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 16976 ;;; at (DEFUN PUT-RAW-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 16976 ;;; at (DEFUN PUT-RAW-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 16976 ;;; at (DEFUN PUT-RAW-IMAGE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GET-RAW-IMAGE ...). ;;; Note: ;;; in file GRAPHICS.LISP, position 18356 ;;; at (DEFUN GET-RAW-IMAGE ...) ;;; Checking type of #:LET740 to be DISPLAY ;;; Note: ;;; in file GRAPHICS.LISP, position 18356 ;;; at (DEFUN GET-RAW-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 18356 ;;; at (DEFUN GET-RAW-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GRAPHICS.LISP, position 18356 ;;; at (DEFUN GET-RAW-IMAGE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GRAPHICS.LISP, position 18356 ;;; at (DEFUN GET-RAW-IMAGE ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file GRAPHICS.LISP, position 18356 ;;; at (DEFUN GET-RAW-IMAGE ...) ;;; Checking type of #:LET793 to be REPLY-BUFFER ;;; Note: ;;; in file GRAPHICS.LISP, position 18356 ;;; at (DEFUN GET-RAW-IMAGE ...) ;;; Inlining AREF-CARD8 ;;; End of Pass 1. ;;; Emitting code for DRAW-POINT. ;;; Emitting code for DRAW-POINTS. ;;; Emitting code for DRAW-LINE. ;;; Emitting code for DRAW-LINES. ;;; Emitting code for FILL-POLYGON. ;;; Emitting code for DRAW-SEGMENTS. ;;; Emitting code for DRAW-RECTANGLE. ;;; Emitting code for DRAW-RECTANGLES. ;;; Emitting code for DRAW-ARC. ;;; Emitting code for DRAW-ARCS-LIST. ;;; Emitting code for DRAW-ARCS-VECTOR. ;;; Emitting code for DRAW-ARCS. ;;; Emitting code for PUT-RAW-IMAGE. ;;; Emitting code for GET-RAW-IMAGE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/graphics.c -o clx/graphics.o ;;; Finished compiling SRC:CLX;GRAPHICS.LISP. ;;; (compile-file "src:clx;text.lisp" :output-file #P"BUILD:CLX;TEXT.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;TEXT.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFPARAMETER *MAX-STRING-SIZE* ...). ;;; Compiling (DEFUN TRANSLATE-DEFAULT ...). ;;; Note: ;;; in file TEXT.LISP, position 1950 ;;; at (DEFUN TRANSLATE-DEFAULT ...) ;;; Inlining CHAR->CARD8 ;;; Note: ;;; in file TEXT.LISP, position 1950 ;;; at (DEFUN TRANSLATE-DEFAULT ...) ;;; Checking type of #:G10 to be BASE-CHAR ;;; Note: ;;; in file TEXT.LISP, position 1950 ;;; at (DEFUN TRANSLATE-DEFAULT ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 1950 ;;; at (DEFUN TRANSLATE-DEFAULT ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX J) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 1950 ;;; at (DEFUN TRANSLATE-DEFAULT ...) ;;; Inlining CHAR->CARD8 ;;; Note: ;;; in file TEXT.LISP, position 1950 ;;; at (DEFUN TRANSLATE-DEFAULT ...) ;;; Checking type of #:G30 to be BASE-CHAR ;;; Note: ;;; in file TEXT.LISP, position 1950 ;;; at (DEFUN TRANSLATE-DEFAULT ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 1950 ;;; at (DEFUN TRANSLATE-DEFAULT ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX J) 1)) to be ARRAY-INDEX ;;; Compiling (DEFUN TEXT-EXTENTS ...). ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of (GCONTEXT-FONT FONT T) to be (OR FONT GCONTEXT) ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of (SI:DO-CHECK-TYPE #:G46 'FONT 'NIL 'FONT) to be (OR FONT GCONTEXT) ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of 0 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of 0 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of 0 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of 0 to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of 0 to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of (FONT-ASCENT FONT) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of (FONT-DESCENT FONT) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 5090 ;;; at (DEFUN TEXT-EXTENTS ...) ;;; Checking type of (FONT-DISPLAY FONT) to be DISPLAY ;;; Compiling (DEFUN TEXT-WIDTH ...). ;;; Note: ;;; in file TEXT.LISP, position 9858 ;;; at (DEFUN TEXT-WIDTH ...) ;;; Checking type of (GCONTEXT-FONT FONT T) to be (OR FONT GCONTEXT) ;;; Note: ;;; in file TEXT.LISP, position 9858 ;;; at (DEFUN TEXT-WIDTH ...) ;;; Checking type of (SI:DO-CHECK-TYPE #:G90 'FONT 'NIL 'FONT) to be (OR FONT GCONTEXT) ;;; Note: ;;; in file TEXT.LISP, position 9858 ;;; at (DEFUN TEXT-WIDTH ...) ;;; Checking type of 0 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 9858 ;;; at (DEFUN TEXT-WIDTH ...) ;;; Checking type of (FONT-DISPLAY FONT) to be DISPLAY ;;; Compiling (DEFUN TEXT-EXTENTS-SERVER ...). ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX END) (THE ARRAY-INDEX START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Checking type of #:LET122 to be DISPLAY ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Checking type of #:LET124 to be RESOURCE-ID ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Checking type of #:LET183 to be REPLY-BUFFER ;;; Note: ;;; in file TEXT.LISP, position 12180 ;;; at (DEFUN TEXT-EXTENTS-SERVER ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN TEXT-WIDTH-SERVER ...). ;;; Note: ;;; in file TEXT.LISP, position 13201 ;;; at (DEFUN TEXT-WIDTH-SERVER ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX END) (THE ARRAY-INDEX START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13201 ;;; at (DEFUN TEXT-WIDTH-SERVER ...) ;;; Checking type of #:LET188 to be DISPLAY ;;; Note: ;;; in file TEXT.LISP, position 13201 ;;; at (DEFUN TEXT-WIDTH-SERVER ...) ;;; Checking type of #:LET190 to be RESOURCE-ID ;;; Note: ;;; in file TEXT.LISP, position 13201 ;;; at (DEFUN TEXT-WIDTH-SERVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 13201 ;;; at (DEFUN TEXT-WIDTH-SERVER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 13201 ;;; at (DEFUN TEXT-WIDTH-SERVER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file TEXT.LISP, position 13201 ;;; at (DEFUN TEXT-WIDTH-SERVER ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file TEXT.LISP, position 13201 ;;; at (DEFUN TEXT-WIDTH-SERVER ...) ;;; Checking type of #:LET249 to be REPLY-BUFFER ;;; Compiling (DEFUN TEXT-EXTENTS-LOCAL ...). ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (FONT-CHAR-INFOS FONT) to be (SIMPLE-ARRAY INT16 (*)) ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (FONT-FONT-INFO FONT) to be FONT-INFO ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX-CHAR-WIDTH FONT) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX-CHAR-ASCENT FONT) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX-CHAR-DESCENT FONT) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of START to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX END) (THE ARRAY-INDEX START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of START to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (* (INDEX- END START) FONT-WIDTH) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of START to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX END) (THE ARRAY-INDEX START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of START to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (FONT-INFO-MIN-BYTE2 FONT-INFO) to be CARD8 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (1+ (- (FONT-INFO-MAX-BYTE2 FONT-INFO) FIRST-COL)) to be CARD16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (FONT-INFO-MIN-BYTE1 FONT-INFO) to be CARD8 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (FONT-INFO-MAX-BYTE1 FONT-INFO) to be CARD8 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (1+ (- LAST-ROW FIRST-ROW)) to be CARD16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET349 to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET350 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (ELT SEQUENCE I) to be CARD16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (- (ASH CHAR -8) FIRST-ROW) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (- (LOGAND CHAR 255) FIRST-COL) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX ROW) (THE ARRAY-INDEX NUM-COLS))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (INDEX* ROW NUM-COLS)) (THE ARRAY-INDEX COL))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX ROW) (THE ARRAY-INDEX NUM-COLS))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* 6 (THE ARRAY-INDEX (INDEX+ (INDEX* ROW NUM-COLS) COL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX ROW) (THE ARRAY-INDEX NUM-COLS))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (INDEX* ROW NUM-COLS)) (THE ARRAY-INDEX COL))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX ROW) (THE ARRAY-INDEX NUM-COLS))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (+ WIDTH #:G469) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET485 to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET486 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET487 to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET488 to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET489 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET490 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (ELT SEQUENCE I) to be CARD16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (- (ASH CHAR -8) FIRST-ROW) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (- (LOGAND CHAR 255) FIRST-COL) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX ROW) (THE ARRAY-INDEX NUM-COLS))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (INDEX* ROW NUM-COLS)) (THE ARRAY-INDEX COL))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX ROW) (THE ARRAY-INDEX NUM-COLS))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* 6 (THE ARRAY-INDEX (INDEX+ (INDEX* ROW NUM-COLS) COL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX ROW) (THE ARRAY-INDEX NUM-COLS))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (INDEX* ROW NUM-COLS)) (THE ARRAY-INDEX COL))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX ROW) (THE ARRAY-INDEX NUM-COLS))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of ROW to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MIN LEFT (+ WIDTH (AREF CHAR-INFOS N))) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX RIGHT (+ WIDTH (AREF CHAR-INFOS (INDEX1+ N)))) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (+ WIDTH #:G619) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX ASCENT (AREF CHAR-INFOS (INDEX+ 3 N))) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX DESCENT (AREF CHAR-INFOS (INDEX+ 4 N))) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET648 to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET649 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (ELT SEQUENCE I) to be CARD16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (- (THE CARD16 (ELT SEQUENCE I)) FIRST-COL) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (ELT SEQUENCE I) to be CARD16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* 6 (THE ARRAY-INDEX COL))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (+ WIDTH #:G688) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET704 to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET705 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET706 to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET707 to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET708 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of #:LET709 to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (ELT SEQUENCE I) to be CARD16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (- (THE CARD16 (ELT SEQUENCE I)) FIRST-COL) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (ELT SEQUENCE I) to be CARD16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (* 6 (THE ARRAY-INDEX COL))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of COL to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MIN LEFT (+ WIDTH (AREF CHAR-INFOS N))) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX RIGHT (+ WIDTH (AREF CHAR-INFOS (INDEX1+ N)))) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (+ WIDTH #:G758) to be INT32 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX ASCENT (AREF CHAR-INFOS (INDEX+ 3 N))) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (MAX DESCENT (AREF CHAR-INFOS (INDEX+ 4 N))) to be INT16 ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 13965 ;;; at (DEFUN TEXT-EXTENTS-LOCAL ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Compiling (DEFUN DRAW-GLYPH ...). ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Checking type of (ALLOCATE-GCONTEXT-STATE) to be GCONTEXT-STATE ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Checking type of NEW-START to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Checking type of TRANSLATE-WIDTH to be (OR NULL INT32) ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 21318 ;;; at (DEFUN DRAW-GLYPH ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-GLYPHS ...). ;;; Compiling (DEFUN DRAW-GLYPHS8 ...). ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Checking type of (OR END (LENGTH SEQUENCE)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX SRC-END) (THE ARRAY-INDEX SRC-START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 24550 ;;; at (DEFUN DRAW-GLYPHS8 ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-GLYPHS16 ...). ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Checking type of (OR END (LENGTH SEQUENCE)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX SRC-END) (THE ARRAY-INDEX SRC-START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Checking type of (DISPLAY-TBUF16 DISPLAY) to be BUFFER-TEXT16 ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 29779 ;;; at (DEFUN DRAW-GLYPHS16 ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-IMAGE-GLYPH ...). ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Checking type of (ALLOCATE-GCONTEXT-STATE) to be GCONTEXT-STATE ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Checking type of NEW-START to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Checking type of TRANSLATE-WIDTH to be (OR NULL INT32) ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 34997 ;;; at (DEFUN DRAW-IMAGE-GLYPH ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DRAW-IMAGE-GLYPHS ...). ;;; Note: ;;; in file TEXT.LISP, position 37151 ;;; at (DEFUN DRAW-IMAGE-GLYPHS ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX START) 255)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 37151 ;;; at (DEFUN DRAW-IMAGE-GLYPHS ...) ;;; Checking type of (OR END (LENGTH SEQUENCE)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 37151 ;;; at (DEFUN DRAW-IMAGE-GLYPHS ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX (INDEX+ START 255)) (THE ARRAY-INDEX (OR END (LENGTH SEQUENCE))))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 37151 ;;; at (DEFUN DRAW-IMAGE-GLYPHS ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX START) 255)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 37151 ;;; at (DEFUN DRAW-IMAGE-GLYPHS ...) ;;; Checking type of (OR END (LENGTH SEQUENCE)) to be ARRAY-INDEX ;;; Compiling (DEFUN DRAW-IMAGE-GLYPHS8 ...). ;;; Note: ;;; in file TEXT.LISP, position 38717 ;;; at (DEFUN DRAW-IMAGE-GLYPHS8 ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file TEXT.LISP, position 38717 ;;; at (DEFUN DRAW-IMAGE-GLYPHS8 ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 38717 ;;; at (DEFUN DRAW-IMAGE-GLYPHS8 ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX END) (THE ARRAY-INDEX START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 38717 ;;; at (DEFUN DRAW-IMAGE-GLYPHS8 ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 38717 ;;; at (DEFUN DRAW-IMAGE-GLYPHS8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 38717 ;;; at (DEFUN DRAW-IMAGE-GLYPHS8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 38717 ;;; at (DEFUN DRAW-IMAGE-GLYPHS8 ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file TEXT.LISP, position 38717 ;;; at (DEFUN DRAW-IMAGE-GLYPHS8 ...) ;;; Checking type of CHUNK to be ARRAY-INDEX ;;; Compiling (DEFUN DRAW-IMAGE-GLYPHS16 ...). ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX END) (THE ARRAY-INDEX START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Checking type of END to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Checking type of (BUFFER-TBUF16 DISPLAY) to be BUFFER-TEXT16 ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file TEXT.LISP, position 41832 ;;; at (DEFUN DRAW-IMAGE-GLYPHS16 ...) ;;; Checking type of CHUNK to be ARRAY-INDEX ;;; Compiling (DEFUN DISPLAY-KEYCODE-RANGE ...). ;;; Compiling (DEFUN SET-MODIFIER-MAPPING ...). ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2))))) (THE ARRAY-INDEX (LENGTH MOD3)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2))))) (THE ARRAY-INDEX (LENGTH MOD3))))) (THE ARRAY-INDEX (LENGTH MOD4)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2))))) (THE ARRAY-INDEX (LENGTH MOD3)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2))))) (THE ARRAY-INDEX (LENGTH MOD3))))) (THE ARRAY-INDEX (LENGTH MOD4))))) (THE ARRAY-INDEX (LENGTH MOD5)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2))))) (THE ARRAY-INDEX (LENGTH MOD3)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2))))) (THE ARRAY-INDEX (LENGTH MOD3))))) (THE ARRAY-INDEX (LENGTH MOD4)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2))))) (THE ARRAY-INDEX (LENGTH MOD3)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1))))) (THE ARRAY-INDEX (LENGTH MOD2)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL))))) (THE ARRAY-INDEX (LENGTH MOD1)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK))))) (THE ARRAY-INDEX (LENGTH CONTROL)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (MAX (THE ARRAY-INDEX (LENGTH SHIFT)) (THE ARRAY-INDEX (LENGTH LOCK)))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (* 8 (THE ARRAY-INDEX KEYCODES-PER-MODIFIER))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (* 2 (THE ARRAY-INDEX KEYCODES-PER-MODIFIER))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (* 3 (THE ARRAY-INDEX KEYCODES-PER-MODIFIER))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (* 4 (THE ARRAY-INDEX KEYCODES-PER-MODIFIER))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (* 5 (THE ARRAY-INDEX KEYCODES-PER-MODIFIER))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (* 6 (THE ARRAY-INDEX KEYCODES-PER-MODIFIER))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (VALUES (* 7 (THE ARRAY-INDEX KEYCODES-PER-MODIFIER))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Checking type of #:LET2229 to be REPLY-BUFFER ;;; Note: ;;; in file TEXT.LISP, position 45620 ;;; at (DEFUN SET-MODIFIER-MAPPING ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN MODIFIER-MAPPING ...). ;;; Note: ;;; in file TEXT.LISP, position 47221 ;;; at (DEFUN MODIFIER-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 47221 ;;; at (DEFUN MODIFIER-MAPPING ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file TEXT.LISP, position 47221 ;;; at (DEFUN MODIFIER-MAPPING ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file TEXT.LISP, position 47221 ;;; at (DEFUN MODIFIER-MAPPING ...) ;;; Checking type of #:LET2277 to be REPLY-BUFFER ;;; Note: ;;; in file TEXT.LISP, position 47221 ;;; at (DEFUN MODIFIER-MAPPING ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 47221 ;;; at (DEFUN MODIFIER-MAPPING ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 47221 ;;; at (DEFUN MODIFIER-MAPPING ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN CHANGE-KEYBOARD-MAPPING ...). ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Checking type of (OR END (ARRAY-DIMENSION KEYSYMS 0)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX KEYCODE-END) (THE ARRAY-INDEX START))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX LENGTH) (THE ARRAY-INDEX KEYSYMS-PER-KEYCODE))) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Checking type of SIZE to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX SIZE) 2)) to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Checking type of SIZE to be ARRAY-INDEX ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 48120 ;;; at (DEFUN CHANGE-KEYBOARD-MAPPING ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN KEYBOARD-MAPPING ...). ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Checking type of (DISPLAY-MIN-KEYCODE DISPLAY) to be (OR NULL CARD8) ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Checking type of (1+ (DISPLAY-MAX-KEYCODE DISPLAY)) to be (OR NULL ARRAY-INDEX) ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Checking type of #:LET2487 to be REPLY-BUFFER ;;; Note: ;;; in file TEXT.LISP, position 49783 ;;; at (DEFUN KEYBOARD-MAPPING ...) ;;; Inlining AREF-CARD8 ;;; End of Pass 1. ;;; Emitting code for TRANSLATE-DEFAULT. ;;; Emitting code for TEXT-EXTENTS. ;;; Emitting code for TEXT-WIDTH. ;;; Emitting code for TEXT-EXTENTS-SERVER. ;;; Emitting code for TEXT-WIDTH-SERVER. ;;; Emitting code for TEXT-EXTENTS-LOCAL. ;;; Emitting code for DRAW-GLYPH. ;;; Emitting code for DRAW-GLYPHS. ;;; Emitting code for DRAW-GLYPHS8. ;;; Emitting code for DRAW-GLYPHS16. ;;; Emitting code for DRAW-IMAGE-GLYPH. ;;; Emitting code for DRAW-IMAGE-GLYPHS. ;;; Emitting code for DRAW-IMAGE-GLYPHS8. ;;; Emitting code for DRAW-IMAGE-GLYPHS16. ;;; Emitting code for DISPLAY-KEYCODE-RANGE. ;;; Emitting code for SET-MODIFIER-MAPPING. ;;; Emitting code for MODIFIER-MAPPING. ;;; Emitting code for CHANGE-KEYBOARD-MAPPING. ;;; Emitting code for KEYBOARD-MAPPING. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/text.c -o clx/text.o ;;; Finished compiling SRC:CLX;TEXT.LISP. ;;; (compile-file "src:clx;attributes.lisp" :output-file #P"BUILD:CLX;ATTRIBUTES.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;ATTRIBUTES.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *WINDOW-ATTRIBUTES* ...). ;;; Compiling (DEFVAR *CONTEXT-FREE-LIST* ...). ;;; Compiling (DEFUN ALLOCATE-CONTEXT ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 2503 ;;; at (DEFUN ALLOCATE-CONTEXT ...) ;;; Checking type of *CONTEXT-FREE-LIST* to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFUN DEALLOCATE-CONTEXT ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 2645 ;;; at (DEFUN DEALLOCATE-CONTEXT ...) ;;; Checking type of *CONTEXT-FREE-LIST* to be (OR NULL REPLY-BUFFER) ;;; Compiling (DEFMACRO STATE-ATTRIBUTES ...). ;;; Compiling (DEFMACRO STATE-ATTRIBUTE-CHANGES ...). ;;; Compiling (DEFMACRO STATE-GEOMETRY ...). ;;; Compiling (DEFMACRO STATE-GEOMETRY-CHANGES ...). ;;; Compiling (DEFMACRO DRAWABLE-EQUAL-FUNCTION ...). ;;; Compiling (DEFMACRO WINDOW-EQUAL-FUNCTION ...). ;;; Compiling (DEFMACRO WITH-STATE ...). ;;; Compiling (DEFUN CLEANUP-STATE-ENTRY ...). ;;; Compiling (DEFUN CHANGE-WINDOW-ATTRIBUTE ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 6399 ;;; at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...) ;;; Checking type of *WINDOW-ATTRIBUTES* to be LIST ;;; Note: ;;; in file ATTRIBUTES.LISP, position 6399 ;;; at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...) ;;; Checking type of (CDDR #:G102) to be CONS ;;; Note: ;;; in file ATTRIBUTES.LISP, position 6399 ;;; at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file ATTRIBUTES.LISP, position 6399 ;;; at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 6399 ;;; at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN CHANGE-DRAWABLE-GEOMETRY ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 7796 ;;; at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...) ;;; Checking type of *WINDOW-ATTRIBUTES* to be LIST ;;; Note: ;;; in file ATTRIBUTES.LISP, position 7796 ;;; at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...) ;;; Checking type of (CDDDDR #:G170) to be CONS ;;; Note: ;;; in file ATTRIBUTES.LISP, position 7796 ;;; at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file ATTRIBUTES.LISP, position 7796 ;;; at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 7796 ;;; at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 9072 ;;; at (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...) ;;; Checking type of *WINDOW-ATTRIBUTES* to be LIST ;;; Note: ;;; in file ATTRIBUTES.LISP, position 9072 ;;; at (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 9072 ;;; at (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 9072 ;;; at (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...) ;;; Inlining BUFFER-REPLACE ;;; Compiling (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 10575 ;;; at (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...) ;;; Checking type of *WINDOW-ATTRIBUTES* to be LIST ;;; Note: ;;; in file ATTRIBUTES.LISP, position 10575 ;;; at (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 10575 ;;; at (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 10575 ;;; at (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...) ;;; Inlining BUFFER-REPLACE ;;; Compiling (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 11928 ;;; at (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file ATTRIBUTES.LISP, position 11928 ;;; at (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...) ;;; Checking type of (AREF CHANGES 0) to be MASK32 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 11928 ;;; at (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 11928 ;;; at (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 13131 ;;; at (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...) ;;; Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY ;;; Note: ;;; in file ATTRIBUTES.LISP, position 13131 ;;; at (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...) ;;; Checking type of (AREF CHANGES 0) to be MASK16 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 13131 ;;; at (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 13131 ;;; at (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFMACRO WITH-ATTRIBUTES ...). ;;; Compiling (DEFMACRO WITH-GEOMETRY ...). ;;; Compiling (DEFUN WINDOW-VISUAL ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 15346 ;;; at (DEFUN WINDOW-VISUAL ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN WINDOW-VISUAL-INFO ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 15510 ;;; at (DEFUN WINDOW-VISUAL-INFO ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN WINDOW-CLASS ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 15718 ;;; at (DEFUN WINDOW-CLASS ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-WINDOW-BACKGROUND ...). ;;; Compiling (DEFUN SET-WINDOW-BORDER ...). ;;; Compiling (DEFUN WINDOW-BIT-GRAVITY ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 17381 ;;; at (DEFUN WINDOW-BIT-GRAVITY ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 17381 ;;; at (DEFUN WINDOW-BIT-GRAVITY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SET-WINDOW-BIT-GRAVITY ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 17590 ;;; at (DEFUN SET-WINDOW-BIT-GRAVITY ...) ;;; Checking type of '#(:FORGET :NORTH-WEST :NORTH :NORTH-EAST :WEST :CENTER :EAST :SOUTH-WEST :SOUTH :SOUTH-EAST :STATIC) to be SIMPLE-VECTOR ;;; Compiling (DEFUN WINDOW-GRAVITY ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 17802 ;;; at (DEFUN WINDOW-GRAVITY ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 17802 ;;; at (DEFUN WINDOW-GRAVITY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SET-WINDOW-GRAVITY ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 18007 ;;; at (DEFUN SET-WINDOW-GRAVITY ...) ;;; Checking type of '#(:UNMAP :NORTH-WEST :NORTH :NORTH-EAST :WEST :CENTER :EAST :SOUTH-WEST :SOUTH :SOUTH-EAST :STATIC) to be SIMPLE-VECTOR ;;; Compiling (DEFUN WINDOW-BACKING-STORE ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 18207 ;;; at (DEFUN WINDOW-BACKING-STORE ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 18207 ;;; at (DEFUN WINDOW-BACKING-STORE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SET-WINDOW-BACKING-STORE ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 18452 ;;; at (DEFUN SET-WINDOW-BACKING-STORE ...) ;;; Checking type of '#(:NOT-USEFUL :WHEN-MAPPED :ALWAYS) to be SIMPLE-VECTOR ;;; Compiling (DEFUN WINDOW-BACKING-PLANES ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 18666 ;;; at (DEFUN WINDOW-BACKING-PLANES ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-WINDOW-BACKING-PLANES ...). ;;; Compiling (DEFUN WINDOW-BACKING-PIXEL ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 19028 ;;; at (DEFUN WINDOW-BACKING-PIXEL ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-WINDOW-BACKING-PIXEL ...). ;;; Compiling (DEFUN WINDOW-SAVE-UNDER ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 19383 ;;; at (DEFUN WINDOW-SAVE-UNDER ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 19383 ;;; at (DEFUN WINDOW-SAVE-UNDER ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SET-WINDOW-SAVE-UNDER ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 19578 ;;; at (DEFUN SET-WINDOW-SAVE-UNDER ...) ;;; Checking type of '#(:OFF :ON) to be SIMPLE-VECTOR ;;; Compiling (DEFUN WINDOW-OVERRIDE-REDIRECT ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 19756 ;;; at (DEFUN WINDOW-OVERRIDE-REDIRECT ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 19756 ;;; at (DEFUN WINDOW-OVERRIDE-REDIRECT ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SET-WINDOW-OVERRIDE-REDIRECT ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 19958 ;;; at (DEFUN SET-WINDOW-OVERRIDE-REDIRECT ...) ;;; Checking type of '#(:OFF :ON) to be SIMPLE-VECTOR ;;; Compiling (DEFUN WINDOW-EVENT-MASK ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 20156 ;;; at (DEFUN WINDOW-EVENT-MASK ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN WINDOW-DO-NOT-PROPAGATE-MASK ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 20555 ;;; at (DEFUN WINDOW-DO-NOT-PROPAGATE-MASK ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN WINDOW-COLORMAP ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 21004 ;;; at (DEFUN WINDOW-COLORMAP ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-WINDOW-COLORMAP ...). ;;; Compiling (DEFUN WINDOW-CURSOR ...). ;;; Compiling (DEFUN SET-WINDOW-CURSOR ...). ;;; Compiling (DEFUN WINDOW-COLORMAP-INSTALLED-P ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 22043 ;;; at (DEFUN WINDOW-COLORMAP-INSTALLED-P ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 22043 ;;; at (DEFUN WINDOW-COLORMAP-INSTALLED-P ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN WINDOW-ALL-EVENT-MASKS ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 22226 ;;; at (DEFUN WINDOW-ALL-EVENT-MASKS ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Compiling (DEFUN WINDOW-MAP-STATE ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 22391 ;;; at (DEFUN WINDOW-MAP-STATE ...) ;;; Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 22391 ;;; at (DEFUN WINDOW-MAP-STATE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN DRAWABLE-ROOT ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 22813 ;;; at (DEFUN DRAWABLE-ROOT ...) ;;; Checking type of (GET-DRAWABLE-GEOMETRY-BUFFER DRAWABLE) to be REPLY-BUFFER ;;; Compiling (DEFUN DRAWABLE-X ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 23001 ;;; at (DEFUN DRAWABLE-X ...) ;;; Checking type of (GET-DRAWABLE-GEOMETRY-BUFFER DRAWABLE) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-DRAWABLE-X ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 23173 ;;; at (DEFUN SET-DRAWABLE-X ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 23173 ;;; at (DEFUN SET-DRAWABLE-X ...) ;;; Checking type of #:G768 to be INT16 ;;; Compiling (DEFUN DRAWABLE-Y ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 23313 ;;; at (DEFUN DRAWABLE-Y ...) ;;; Checking type of (GET-DRAWABLE-GEOMETRY-BUFFER DRAWABLE) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-DRAWABLE-Y ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 23485 ;;; at (DEFUN SET-DRAWABLE-Y ...) ;;; Inlining INT16->CARD16 ;;; Note: ;;; in file ATTRIBUTES.LISP, position 23485 ;;; at (DEFUN SET-DRAWABLE-Y ...) ;;; Checking type of #:G802 to be INT16 ;;; Compiling (DEFUN DRAWABLE-WIDTH ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 23625 ;;; at (DEFUN DRAWABLE-WIDTH ...) ;;; Checking type of (GET-DRAWABLE-GEOMETRY-BUFFER DRAWABLE) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-DRAWABLE-WIDTH ...). ;;; Compiling (DEFUN DRAWABLE-HEIGHT ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 24005 ;;; at (DEFUN DRAWABLE-HEIGHT ...) ;;; Checking type of (GET-DRAWABLE-GEOMETRY-BUFFER DRAWABLE) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-DRAWABLE-HEIGHT ...). ;;; Compiling (DEFUN DRAWABLE-DEPTH ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 24393 ;;; at (DEFUN DRAWABLE-DEPTH ...) ;;; Checking type of (GET-DRAWABLE-GEOMETRY-BUFFER DRAWABLE) to be REPLY-BUFFER ;;; Note: ;;; in file ATTRIBUTES.LISP, position 24393 ;;; at (DEFUN DRAWABLE-DEPTH ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN DRAWABLE-BORDER-WIDTH ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 24552 ;;; at (DEFUN DRAWABLE-BORDER-WIDTH ...) ;;; Checking type of (GET-DRAWABLE-GEOMETRY-BUFFER DRAWABLE) to be REPLY-BUFFER ;;; Compiling (DEFUN SET-DRAWABLE-BORDER-WIDTH ...). ;;; Compiling (DEFUN SET-WINDOW-PRIORITY ...). ;;; Note: ;;; in file ATTRIBUTES.LISP, position 24924 ;;; at (DEFUN SET-WINDOW-PRIORITY ...) ;;; Checking type of (LIST WINDOW NIL NIL NIL NIL) to be CONS ;;; Note: ;;; in file ATTRIBUTES.LISP, position 24924 ;;; at (DEFUN SET-WINDOW-PRIORITY ...) ;;; Checking type of (LIST* #:G896 *WINDOW-ATTRIBUTES*) to be CONS ;;; Note: ;;; in file ATTRIBUTES.LISP, position 24924 ;;; at (DEFUN SET-WINDOW-PRIORITY ...) ;;; Checking type of '#(:ABOVE :BELOW :TOP-IF :BOTTOM-IF :OPPOSITE) to be SIMPLE-VECTOR ;;; End of Pass 1. ;;; Emitting code for ALLOCATE-CONTEXT. ;;; Emitting code for DEALLOCATE-CONTEXT. ;;; Emitting code for STATE-ATTRIBUTES. ;;; Emitting code for STATE-ATTRIBUTE-CHANGES. ;;; Emitting code for STATE-GEOMETRY. ;;; Emitting code for STATE-GEOMETRY-CHANGES. ;;; Emitting code for DRAWABLE-EQUAL-FUNCTION. ;;; Emitting code for WINDOW-EQUAL-FUNCTION. ;;; Emitting code for WITH-STATE. ;;; Emitting code for CLEANUP-STATE-ENTRY. ;;; Emitting code for CHANGE-WINDOW-ATTRIBUTE. ;;; Emitting code for CHANGE-DRAWABLE-GEOMETRY. ;;; Emitting code for GET-WINDOW-ATTRIBUTES-BUFFER. ;;; Emitting code for GET-DRAWABLE-GEOMETRY-BUFFER. ;;; Emitting code for PUT-WINDOW-ATTRIBUTE-CHANGES. ;;; Emitting code for PUT-DRAWABLE-GEOMETRY-CHANGES. ;;; Emitting code for WITH-ATTRIBUTES. ;;; Emitting code for WITH-GEOMETRY. ;;; Emitting code for WINDOW-VISUAL. ;;; Emitting code for WINDOW-VISUAL-INFO. ;;; Emitting code for WINDOW-CLASS. ;;; Emitting code for SET-WINDOW-BACKGROUND. ;;; Emitting code for SET-WINDOW-BORDER. ;;; Emitting code for WINDOW-BIT-GRAVITY. ;;; Emitting code for SET-WINDOW-BIT-GRAVITY. ;;; Emitting code for WINDOW-GRAVITY. ;;; Emitting code for SET-WINDOW-GRAVITY. ;;; Emitting code for WINDOW-BACKING-STORE. ;;; Emitting code for SET-WINDOW-BACKING-STORE. ;;; Emitting code for WINDOW-BACKING-PLANES. ;;; Emitting code for SET-WINDOW-BACKING-PLANES. ;;; Emitting code for WINDOW-BACKING-PIXEL. ;;; Emitting code for SET-WINDOW-BACKING-PIXEL. ;;; Emitting code for WINDOW-SAVE-UNDER. ;;; Emitting code for SET-WINDOW-SAVE-UNDER. ;;; Emitting code for WINDOW-OVERRIDE-REDIRECT. ;;; Emitting code for SET-WINDOW-OVERRIDE-REDIRECT. ;;; Emitting code for WINDOW-EVENT-MASK. ;;; Emitting code for WINDOW-EVENT-MASK. ;;; Emitting code for WINDOW-DO-NOT-PROPAGATE-MASK. ;;; Emitting code for WINDOW-DO-NOT-PROPAGATE-MASK. ;;; Emitting code for WINDOW-COLORMAP. ;;; Emitting code for SET-WINDOW-COLORMAP. ;;; Emitting code for WINDOW-CURSOR. ;;; Emitting code for SET-WINDOW-CURSOR. ;;; Emitting code for WINDOW-COLORMAP-INSTALLED-P. ;;; Emitting code for WINDOW-ALL-EVENT-MASKS. ;;; Emitting code for WINDOW-MAP-STATE. ;;; Emitting code for DRAWABLE-ROOT. ;;; Emitting code for DRAWABLE-X. ;;; Emitting code for SET-DRAWABLE-X. ;;; Emitting code for DRAWABLE-Y. ;;; Emitting code for SET-DRAWABLE-Y. ;;; Emitting code for DRAWABLE-WIDTH. ;;; Emitting code for SET-DRAWABLE-WIDTH. ;;; Emitting code for DRAWABLE-HEIGHT. ;;; Emitting code for SET-DRAWABLE-HEIGHT. ;;; Emitting code for DRAWABLE-DEPTH. ;;; Emitting code for DRAWABLE-BORDER-WIDTH. ;;; Emitting code for SET-DRAWABLE-BORDER-WIDTH. ;;; Emitting code for SET-WINDOW-PRIORITY. ;;; Emitting code for WINDOW-PRIORITY. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/attributes.c -o clx/attributes.o ;;; Finished compiling SRC:CLX;ATTRIBUTES.LISP. ;;; (compile-file "src:clx;translate.lisp" :output-file #P"BUILD:CLX;TRANSLATE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;TRANSLATE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFVAR *KEYSYM-SETS* ...). ;;; Compiling (DEFUN DEFINE-KEYSYM-SET ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 760 ;;; at (DEFUN DEFINE-KEYSYM-SET ...) ;;; Checking type of #:G1 to be KEYSYM ;;; Note: ;;; in file TRANSLATE.LISP, position 760 ;;; at (DEFUN DEFINE-KEYSYM-SET ...) ;;; Checking type of #:G0 to be KEYSYM ;;; Compiling (DEFUN KEYSYM-SET ...). ;;; Compiling (DEFMACRO KEYSYM ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 1846 ;;; at (FSET 'KEYSYM ...) ;;; Checking type of #:G31 to be LIST ;;; Compiling (DEFVAR *KEYSYM->CHARACTER-MAP* ...). ;;; Compiling (DEFMACRO KEYSYM-MAPPING-OBJECT ...). ;;; Compiling (DEFMACRO KEYSYM-MAPPING-TRANSLATE ...). ;;; Compiling (DEFMACRO KEYSYM-MAPPING-LOWERCASE ...). ;;; Compiling (DEFMACRO KEYSYM-MAPPING-MODIFIERS ...). ;;; Compiling (DEFMACRO KEYSYM-MAPPING-MASK ...). ;;; Compiling (DEFVAR *DEFAULT-KEYSYM-TRANSLATE-MASK* ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 4129 ;;; at (DEFVAR *DEFAULT-KEYSYM-TRANSLATE-MASK* ...) ;;; Checking type of (LOGAND 255 (LOGNOT (MAKE-STATE-MASK :LOCK))) to be (OR (MEMBER :MODIFIERS) MASK16 (CLX-LIST (OR KEYSYM STATE-MASK-KEY))) ;;; Compiling (DEFUN DEFINE-KEYSYM ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 4379 ;;; at (DEFUN DEFINE-KEYSYM ...) ;;; Checking type of #:G97 to be CONS ;;; Compiling (DEFUN UNDEFINE-KEYSYM ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 8420 ;;; at (DEFUN UNDEFINE-KEYSYM ...) ;;; Checking type of #:G115 to be CONS ;;; Compiling (DEFUN KEYSYM-DOWNCASE ...). ;;; Compiling (DEFUN KEYSYM-UPPERCASE-ALPHABETIC-P ...). ;;; Compiling (DEFUN CHARACTER->KEYSYMS ...). ;;; Compiling (DEFUN DISPLAY-KEYBOARD-MAPPING ...). ;;; Compiling (DEFUN KEYCODE->KEYSYM ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 12467 ;;; at (DEFUN KEYCODE->KEYSYM ...) ;;; Checking type of (DISPLAY-KEYBOARD-MAPPING DISPLAY) to be (SIMPLE-ARRAY KEYSYM (* *)) ;;; Compiling (DEFUN KEYSYM->CHARACTER ...). ;;; Compiling (DEFUN MAPPING-MATCHES-P ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 14483 ;;; at (DEFUN MAPPING-MATCHES-P ...) ;;; Checking type of 0 to be MASK16 ;;; Note: ;;; in file TRANSLATE.LISP, position 14483 ;;; at (DEFUN MAPPING-MATCHES-P ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G144)) to be SYMBOL ;;; Note: ;;; in file TRANSLATE.LISP, position 14483 ;;; at (DEFUN MAPPING-MATCHES-P ...) ;;; Checking type of +STATE-MASK-VECTOR+ to be SIMPLE-VECTOR ;;; Note: ;;; in file TRANSLATE.LISP, position 14483 ;;; at (DEFUN MAPPING-MATCHES-P ...) ;;; Checking type of (LOGIOR MASK (IF BIT (ASH 1 BIT) (OR (CDR (ASSOC MODIFIER DISPLAY-MAPPING)) (IF ERRORP (RETURN-FROM MODIFIERS->MASK NIL) 0)))) to be MASK16 ;;; Note: ;;; in file TRANSLATE.LISP, position 14483 ;;; at (DEFUN MAPPING-MATCHES-P ...) ;;; Checking type of (OR (MODIFIERS->MASK DISPLAY-MAPPING (OR MAPPING-MODIFIERS 0) T) (RETURN-FROM MAPPING-MATCHES-P NIL)) to be MASK16 ;;; Note: ;;; in file TRANSLATE.LISP, position 14483 ;;; at (DEFUN MAPPING-MATCHES-P ...) ;;; Checking type of (IF (EQ MAPPING-MASK :MODIFIERS) MODIFIERS (MODIFIERS->MASK DISPLAY-MAPPING MAPPING-MASK NIL)) to be MASK16 ;;; Compiling (DEFUN DEFAULT-KEYSYM-INDEX ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 16743 ;;; at (DEFUN DEFAULT-KEYSYM-INDEX ...) ;;; Checking type of (DISPLAY-KEYBOARD-MAPPING DISPLAY) to be (SIMPLE-ARRAY KEYSYM (* *)) ;;; Note: ;;; in file TRANSLATE.LISP, position 16743 ;;; at (DEFUN DEFAULT-KEYSYM-INDEX ...) ;;; Checking type of (ARRAY-DIMENSION MAPPING 1) to be CARD8 ;;; Note: ;;; in file TRANSLATE.LISP, position 16743 ;;; at (DEFUN DEFAULT-KEYSYM-INDEX ...) ;;; Checking type of (IF SYMBOLP 2 0) to be CARD8 ;;; Note: ;;; in file TRANSLATE.LISP, position 16743 ;;; at (DEFUN DEFAULT-KEYSYM-INDEX ...) ;;; Checking type of (+ RESULT #:G179) to be CARD8 ;;; Compiling (DEFUN KEYSYM-SHIFT-P ...). ;;; Compiling (DEFUN KEYCODE->CHARACTER ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 20541 ;;; at (DEFUN KEYCODE->CHARACTER ...) ;;; Checking type of (OR KEYSYM-INDEX (FUNCALL KEYSYM-INDEX-FUNCTION DISPLAY KEYCODE STATE)) to be (OR NULL CARD8) ;;; Note: ;;; in file TRANSLATE.LISP, position 20541 ;;; at (DEFUN KEYCODE->CHARACTER ...) ;;; Checking type of (IF INDEX (KEYCODE->KEYSYM DISPLAY KEYCODE INDEX) 0) to be KEYSYM ;;; Compiling (DEFUN GET-DISPLAY-MODIFIER-MAPPING ...). ;;; Compiling (DEFUN STATE-KEYSYMP ...). ;;; Compiling (DEFUN MAPPING-NOTIFY ...). ;;; Compiling (DEFUN KEYSYM-IN-MAP-P ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 23835 ;;; at (DEFUN KEYSYM-IN-MAP-P ...) ;;; Checking type of (DISPLAY-MIN-KEYCODE DISPLAY) to be CARD8 ;;; Note: ;;; in file TRANSLATE.LISP, position 23835 ;;; at (DEFUN KEYSYM-IN-MAP-P ...) ;;; Checking type of (DISPLAY-MAX-KEYCODE DISPLAY) to be CARD8 ;;; Note: ;;; in file TRANSLATE.LISP, position 23835 ;;; at (DEFUN KEYSYM-IN-MAP-P ...) ;;; Checking type of (DISPLAY-KEYBOARD-MAPPING DISPLAY) to be (SIMPLE-ARRAY KEYSYM (* *)) ;;; Note: ;;; in file TRANSLATE.LISP, position 23835 ;;; at (DEFUN KEYSYM-IN-MAP-P ...) ;;; Checking type of (MIN 2 (ARRAY-DIMENSION MAP 1)) to be CARD8 ;;; Compiling (DEFUN CHARACTER-IN-MAP-P ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 24660 ;;; at (DEFUN CHARACTER-IN-MAP-P ...) ;;; Checking type of (DISPLAY-MIN-KEYCODE DISPLAY) to be CARD8 ;;; Note: ;;; in file TRANSLATE.LISP, position 24660 ;;; at (DEFUN CHARACTER-IN-MAP-P ...) ;;; Checking type of (DISPLAY-MAX-KEYCODE DISPLAY) to be CARD8 ;;; Note: ;;; in file TRANSLATE.LISP, position 24660 ;;; at (DEFUN CHARACTER-IN-MAP-P ...) ;;; Checking type of (ARRAY-DIMENSION (DISPLAY-KEYBOARD-MAPPING DISPLAY) 1) to be CARD8 ;;; Compiling (DEFUN KEYSYM->KEYCODES ...). ;;; Note: ;;; in file TRANSLATE.LISP, position 25518 ;;; at (DEFUN KEYSYM->KEYCODES ...) ;;; Checking type of (DISPLAY-MIN-KEYCODE DISPLAY) to be CARD8 ;;; Note: ;;; in file TRANSLATE.LISP, position 25518 ;;; at (DEFUN KEYSYM->KEYCODES ...) ;;; Checking type of (DISPLAY-MAX-KEYCODE DISPLAY) to be CARD8 ;;; Note: ;;; in file TRANSLATE.LISP, position 25518 ;;; at (DEFUN KEYSYM->KEYCODES ...) ;;; Checking type of (DISPLAY-KEYBOARD-MAPPING DISPLAY) to be (SIMPLE-ARRAY KEYSYM (* *)) ;;; Note: ;;; in file TRANSLATE.LISP, position 25518 ;;; at (DEFUN KEYSYM->KEYCODES ...) ;;; Checking type of (MIN 2 (ARRAY-DIMENSION MAP 1)) to be CARD8 ;;; End of Pass 1. ;;; Emitting code for DEFINE-KEYSYM-SET. ;;; Emitting code for KEYSYM-SET. ;;; Emitting code for KEYSYM. ;;; Emitting code for KEYSYM-MAPPING-OBJECT. ;;; Emitting code for KEYSYM-MAPPING-TRANSLATE. ;;; Emitting code for KEYSYM-MAPPING-LOWERCASE. ;;; Emitting code for KEYSYM-MAPPING-MODIFIERS. ;;; Emitting code for KEYSYM-MAPPING-MASK. ;;; Emitting code for DEFINE-KEYSYM. ;;; Emitting code for MASK-CHECK. ;;; Emitting code for MERGE-KEYSYM-MAPPINGS. ;;; Emitting code for UNDEFINE-KEYSYM. ;;; Emitting code for MATCH. ;;; Emitting code for KEYSYM-DOWNCASE. ;;; Emitting code for KEYSYM-UPPERCASE-ALPHABETIC-P. ;;; Emitting code for CHARACTER->KEYSYMS. ;;; Emitting code for #:G124. ;;; Emitting code for DISPLAY-KEYBOARD-MAPPING. ;;; Emitting code for KEYCODE->KEYSYM. ;;; Emitting code for KEYSYM->CHARACTER. ;;; Emitting code for MAPPING-MATCHES-P. ;;; Emitting code for MODIFIERS->MASK. ;;; Emitting code for DEFAULT-KEYSYM-INDEX. ;;; Emitting code for KEYSYM-SHIFT-P. ;;; Emitting code for KEYCODE->CHARACTER. ;;; Emitting code for GET-DISPLAY-MODIFIER-MAPPING. ;;; Emitting code for KEYSYM-REPLACE. ;;; Emitting code for STATE-KEYSYMP. ;;; Emitting code for MAPPING-NOTIFY. ;;; Emitting code for KEYSYM-IN-MAP-P. ;;; Emitting code for CHARACTER-IN-MAP-P. ;;; Emitting code for KEYSYM->KEYCODES. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/translate.c -o clx/translate.o ;;; Finished compiling SRC:CLX;TRANSLATE.LISP. ;;; (compile-file "src:clx;keysyms.lisp" :output-file #P"BUILD:CLX;KEYSYMS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;KEYSYMS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/keysyms.c -o clx/keysyms.o ;;; Finished compiling SRC:CLX;KEYSYMS.LISP. ;;; (compile-file "src:clx;manager.lisp" :output-file #P"BUILD:CLX;MANAGER.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;MANAGER.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN WM-NAME ...). ;;; Compiling (DEFUN SET-STRING-PROPERTY ...). ;;; Compiling (DEFUN WM-ICON-NAME ...). ;;; Compiling (DEFUN WM-CLIENT-MACHINE ...). ;;; Compiling (DEFUN GET-WM-CLASS ...). ;;; Note: ;;; in file MANAGER.LISP, position 1871 ;;; at (DEFUN GET-WM-CLASS ...) ;;; Checking type of (GET-PROPERTY WINDOW :WM_CLASS :TYPE :STRING :RESULT-TYPE '(VECTOR CARD8)) to be (OR NULL (VECTOR CARD8)) ;;; Note: ;;; in file MANAGER.LISP, position 1871 ;;; at (DEFUN GET-WM-CLASS ...) ;;; Checking type of VALUE to be (VECTOR CARD8) ;;; Note: ;;; in file MANAGER.LISP, position 1871 ;;; at (DEFUN GET-WM-CLASS ...) ;;; Checking type of VALUE to be (VECTOR CARD8) ;;; Note: ;;; in file MANAGER.LISP, position 1871 ;;; at (DEFUN GET-WM-CLASS ...) ;;; Checking type of VALUE to be (VECTOR CARD8) ;;; Note: ;;; in file MANAGER.LISP, position 1871 ;;; at (DEFUN GET-WM-CLASS ...) ;;; Checking type of VALUE to be (VECTOR CARD8) ;;; Compiling (DEFUN SET-WM-CLASS ...). ;;; Compiling (DEFUN WM-COMMAND ...). ;;; Compiling (DEFUN SET-WM-COMMAND ...). ;;; Note: ;;; in file MANAGER.LISP, position 3947 ;;; at (DEFUN SET-WM-COMMAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST7) to be LIST ;;; Note: ;;; in file MANAGER.LISP, position 3947 ;;; at (DEFUN SET-WM-COMMAND ...) ;;; Checking type of #:G13 to be CONS ;;; Compiling (DEF-CLX-CLASS (WM-HINTS) ...). ;;; Compiling (DEFUN WM-HINTS ...). ;;; Compiling (DEFUN SET-WM-HINTS ...). ;;; Compiling (DEFUN DECODE-WM-HINTS ...). ;;; Note: ;;; in file MANAGER.LISP, position 6067 ;;; at (DEFUN DECODE-WM-HINTS ...) ;;; Checking type of #:LET52 to be CARD32 ;;; Note: ;;; in file MANAGER.LISP, position 6067 ;;; at (DEFUN DECODE-WM-HINTS ...) ;;; Checking type of #:LET53 to be WM-HINTS ;;; Note: ;;; in file MANAGER.LISP, position 6067 ;;; at (DEFUN DECODE-WM-HINTS ...) ;;; Checking type of (READ-CARD29 (AREF VECTOR 1)) to be (INTEGER 0 (2)) ;;; Note: ;;; in file MANAGER.LISP, position 6067 ;;; at (DEFUN DECODE-WM-HINTS ...) ;;; Checking type of (READ-CARD29 (AREF VECTOR 2)) to be (INTEGER 0 (5)) ;;; Compiling (DEFUN ENCODE-WM-HINTS ...). ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of #:LET203 to be (SIMPLE-VECTOR 9) ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of #:LET204 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of INPUT-HINT to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of (LOGIOR FLAGS STATE-HINT) to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of (LOGIOR FLAGS ICON-PIXMAP-HINT) to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of (LOGIOR FLAGS ICON-WINDOW-HINT) to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of (LOGIOR FLAGS ICON-POSITION-HINT) to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of (LOGIOR FLAGS ICON-MASK-HINT) to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 7683 ;;; at (DEFUN ENCODE-WM-HINTS ...) ;;; Checking type of (LOGIOR FLAGS WINDOW-GROUP-HINT) to be CARD16 ;;; Compiling (DEF-CLX-CLASS (WM-SIZE-HINTS) ...). ;;; Compiling (DEFUN WM-NORMAL-HINTS ...). ;;; Compiling (DEFUN SET-WM-NORMAL-HINTS ...). ;;; Compiling (DEFUN WM-ZOOM-HINTS ...). ;;; Compiling (DEFUN SET-WM-ZOOM-HINTS ...). ;;; Compiling (DEFUN DECODE-WM-SIZE-HINTS ...). ;;; Note: ;;; in file MANAGER.LISP, position 12155 ;;; at (DEFUN DECODE-WM-SIZE-HINTS ...) ;;; Checking type of #:LET510 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 12155 ;;; at (DEFUN DECODE-WM-SIZE-HINTS ...) ;;; Checking type of #:LET511 to be WM-SIZE-HINTS ;;; Note: ;;; in file MANAGER.LISP, position 12155 ;;; at (DEFUN DECODE-WM-SIZE-HINTS ...) ;;; Checking type of (READ-CARD29 (AREF VECTOR 17)) to be (INTEGER 0 (11)) ;;; Note: ;;; in file MANAGER.LISP, position 12155 ;;; at (DEFUN DECODE-WM-SIZE-HINTS ...) ;;; Inlining CARD32->INT32 ;;; Note: ;;; in file MANAGER.LISP, position 12155 ;;; at (DEFUN DECODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G578 to be CARD32 ;;; Note: ;;; in file MANAGER.LISP, position 12155 ;;; at (DEFUN DECODE-WM-SIZE-HINTS ...) ;;; Inlining CARD32->INT32 ;;; Note: ;;; in file MANAGER.LISP, position 12155 ;;; at (DEFUN DECODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G584 to be CARD32 ;;; Compiling (DEFUN ENCODE-WM-SIZE-HINTS ...). ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:LET594 to be (SIMPLE-VECTOR 18) ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:LET595 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G596 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G615 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G634 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G653 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G672 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G697 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G722 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G749 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G782 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G807 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G850 to be CARD16 ;;; Note: ;;; in file MANAGER.LISP, position 14378 ;;; at (DEFUN ENCODE-WM-SIZE-HINTS ...) ;;; Checking type of #:G875 to be CARD16 ;;; Compiling (DEFUN ICON-SIZES ...). ;;; Note: ;;; in file MANAGER.LISP, position 17573 ;;; at (DEFUN ICON-SIZES ...) ;;; Checking type of (GET-PROPERTY WINDOW :WM_ICON_SIZE :TYPE :WM_ICON_SIZE :RESULT-TYPE 'VECTOR) to be (OR NULL (SIMPLE-VECTOR 6)) ;;; Compiling (DEFUN SET-ICON-SIZES ...). ;;; Compiling (DEFUN WM-PROTOCOLS ...). ;;; Compiling (DEFUN SET-WM-PROTOCOLS ...). ;;; Compiling (DEFUN WM-COLORMAP-WINDOWS ...). ;;; Compiling (DEFUN SET-WM-COLORMAP-WINDOWS ...). ;;; Compiling (DEFUN TRANSIENT-FOR ...). ;;; Compiling (DEFUN SET-TRANSIENT-FOR ...). ;;; Compiling (DEFUN SET-WM-PROPERTIES ...). ;;; Compiling (DEFUN SET-STANDARD-PROPERTIES ...). ;;; Compiling (DEFUN ICONIFY-WINDOW ...). ;;; Note: ;;; in file MANAGER.LISP, position 27044 ;;; at (DEFUN ICONIFY-WINDOW ...) ;;; Checking type of (SCREEN-ROOT SCREEN) to be WINDOW ;;; Compiling (DEFUN WITHDRAW-WINDOW ...). ;;; Note: ;;; in file MANAGER.LISP, position 27384 ;;; at (DEFUN WITHDRAW-WINDOW ...) ;;; Checking type of (SCREEN-ROOT SCREEN) to be WINDOW ;;; Compiling (DEF-CLX-CLASS (STANDARD-COLORMAP # ...) ...). ;;; Compiling (DEFUN RGB-COLORMAPS ...). ;;; Note: ;;; in file MANAGER.LISP, position 28220 ;;; at (DEFUN RGB-COLORMAPS ...) ;;; Checking type of (GET-PROPERTY WINDOW PROPERTY :TYPE :RGB_COLOR_MAP :RESULT-TYPE 'VECTOR) to be (OR NULL SIMPLE-VECTOR) ;;; Compiling (DEFUN SET-RGB-COLORMAPS ...). ;;; Compiling (DEFUN GET-STANDARD-COLORMAP ...). ;;; Note: ;;; in file MANAGER.LISP, position 31592 ;;; at (DEFUN GET-STANDARD-COLORMAP ...) ;;; Checking type of (GET-PROPERTY WINDOW PROPERTY :TYPE :RGB_COLOR_MAP :RESULT-TYPE 'VECTOR) to be (OR NULL SIMPLE-VECTOR) ;;; Compiling (DEFUN SET-STANDARD-COLORMAP ...). ;;; Compiling (DEFUN CUT-BUFFER ...). ;;; Compiling (DEFUN (SETF CUT-BUFFER) ...). ;;; Compiling (DEFUN ROTATE-CUT-BUFFERS ...). ;;; End of Pass 1. ;;; Emitting code for WM-NAME. ;;; Emitting code for WM-NAME. ;;; Emitting code for SET-STRING-PROPERTY. ;;; Emitting code for WM-ICON-NAME. ;;; Emitting code for WM-ICON-NAME. ;;; Emitting code for WM-CLIENT-MACHINE. ;;; Emitting code for WM-CLIENT-MACHINE. ;;; Emitting code for GET-WM-CLASS. ;;; Emitting code for SET-WM-CLASS. ;;; Emitting code for WM-COMMAND. ;;; Emitting code for SET-WM-COMMAND. ;;; Emitting code for #:G10. ;;; Emitting code for MAKE-WM-HINTS. ;;; Emitting code for WM-HINTS. ;;; Emitting code for SET-WM-HINTS. ;;; Emitting code for DECODE-WM-HINTS. ;;; Emitting code for ENCODE-WM-HINTS. ;;; Emitting code for MAKE-WM-SIZE-HINTS. ;;; Emitting code for WM-NORMAL-HINTS. ;;; Emitting code for SET-WM-NORMAL-HINTS. ;;; Emitting code for WM-ZOOM-HINTS. ;;; Emitting code for SET-WM-ZOOM-HINTS. ;;; Emitting code for DECODE-WM-SIZE-HINTS. ;;; Emitting code for ENCODE-WM-SIZE-HINTS. ;;; Emitting code for ICON-SIZES. ;;; Emitting code for SET-ICON-SIZES. ;;; Emitting code for WM-PROTOCOLS. ;;; Emitting code for #:G905. ;;; Emitting code for SET-WM-PROTOCOLS. ;;; Emitting code for #:G907. ;;; Emitting code for WM-COLORMAP-WINDOWS. ;;; Emitting code for #:G908. ;;; Emitting code for SET-WM-COLORMAP-WINDOWS. ;;; Emitting code for TRANSIENT-FOR. ;;; Emitting code for SET-TRANSIENT-FOR. ;;; Emitting code for SET-WM-PROPERTIES. ;;; Emitting code for SET-STANDARD-PROPERTIES. ;;; Emitting code for ICONIFY-WINDOW. ;;; Emitting code for WITHDRAW-WINDOW. ;;; Emitting code for MAKE-STANDARD-COLORMAP. ;;; Emitting code for RGB-COLORMAPS. ;;; Emitting code for SET-RGB-COLORMAPS. ;;; Emitting code for GET-STANDARD-COLORMAP. ;;; Emitting code for SET-STANDARD-COLORMAP. ;;; Emitting code for CUT-BUFFER. ;;; Emitting code for (SETF CUT-BUFFER). ;;; Emitting code for ROTATE-CUT-BUFFERS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/manager.c -o clx/manager.o ;;; Finished compiling SRC:CLX;MANAGER.LISP. ;;; (compile-file "src:clx;image.lisp" :output-file #P"BUILD:CLX;IMAGE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;IMAGE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO WITH-IMAGE-DATA-BUFFER ...). ;;; Compiling (DEFMACRO IMAGE-NAME ...). ;;; Compiling (DEFMACRO IMAGE-X-HOT ...). ;;; Compiling (DEFMACRO IMAGE-Y-HOT ...). ;;; Compiling (DEFMACRO IMAGE-RED-MASK ...). ;;; Compiling (DEFMACRO IMAGE-BLUE-MASK ...). ;;; Compiling (DEFMACRO IMAGE-GREEN-MASK ...). ;;; Compiling (DEFUN PRINT-IMAGE ...). ;;; Compiling (DEF-CLX-CLASS (IMAGE-X # ...) ...). ;;; Compiling (DEF-CLX-CLASS (IMAGE-XY # ...) ...). ;;; Compiling (DEF-CLX-CLASS (IMAGE-Z # ...) ...). ;;; Compiling (DEFUN CREATE-IMAGE ...). ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DATA to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (OR BITS-PER-PIXEL 1) to be (OR NULL CARD8) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (IF (= DEPTH 1) :XY-PIXMAP :Z-PIXMAP) to be (OR NULL (MEMBER :BITMAP :XY-PIXMAP :Z-PIXMAP)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (COND ((EQ FORMAT :XY-PIXMAP) 1) ((INDEX> DEPTH 24) 32) ((INDEX> DEPTH 16) 24) ((INDEX> DEPTH 8) 16) ((INDEX> DEPTH 4) 8) ((INDEX> DEPTH 1) 4) (T 1)) to be (OR NULL (MEMBER 1 4 8 16 24 32)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (OR PAD 8) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BITS-PER-PIXEL to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BITS-PER-PIXEL to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING BITS-PER-LINE PAD)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (INDEX-CEILING PADDED-BITS-PER-LINE 8) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of +IMAGE-UNIT+ to be (OR NULL (MEMBER 8 16 32)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX (INDEX* BYTES-PER-LINE 8)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (DOLIST (PAD '(32 16 8)) (WHEN (AND (INDEX<= PAD +IMAGE-PAD+) (ZEROP (INDEX-MOD (INDEX* BYTES-PER-LINE 8) PAD))) (RETURN PAD))) to be (OR NULL (MEMBER 8 16 32)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX (INDEX* BYTES-PER-LINE 8)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of 0 to be (OR NULL CARD8) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DATA to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (LENGTH DATA) to be (OR NULL CARD8) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ARRAY-DIMENSION (CAR DATA) 1) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ARRAY-DIMENSION (CAR DATA) 0) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DATA to be PIXARRAY ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ARRAY-DIMENSION DATA 1) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ARRAY-DIMENSION DATA 0) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ETYPECASE DATA (PIXARRAY-32 32) (PIXARRAY-24 24) (PIXARRAY-16 16) (PIXARRAY-8 8) (PIXARRAY-4 4) (PIXARRAY-1 1)) to be (OR NULL (MEMBER 1 4 8 16 24 32)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ETYPECASE DATA (BUFFER-BYTES (LET ((DATA DATA)) (DECLARE (TYPE BUFFER-BYTES DATA)) (UNLESS DEPTH (SETQ DEPTH (OR BITS-PER-PIXEL 1))) (UNLESS FORMAT (SETQ FORMAT (IF (= DEPTH 1) :XY-PIXMAP :Z-PIXMAP))) (UNLESS BITS-PER-PIXEL (SETQ BITS-PER-PIXEL (COND ((EQ FORMAT :XY-PIXMAP) 1) ((INDEX> DEPTH 24) 32) ((INDEX> DEPTH 16) 24) ((INDEX> DEPTH 8) 16) ((INDEX> DEPTH 4) 8) ((INDEX> DEPTH 1) 4) (T 1)))) (UNLESS WIDTH (REQUIRED-ARG WIDTH)) (UNLESS HEIGHT (REQUIRED-ARG HEIGHT)) (UNLESS BYTES-PER-LINE (LET* ((PAD (OR PAD 8)) (BITS-PER-LINE (INDEX* WIDTH BITS-PER-PIXEL)) (PADDED-BITS-PER-LINE (INDEX* (INDEX-CEILING BITS-PER-LINE PAD) PAD))) (DECLARE (TYPE ARRAY-INDEX PAD BITS-PER-LINE PADDED-BITS-PER-LINE)) (SETQ BYTES-PER-LINE (INDEX-CEILING PADDED-BITS-PER-LINE 8)))) (UNLESS UNIT (SETQ UNIT +IMAGE-UNIT+)) (UNLESS PAD (SETQ PAD (DOLIST (PAD '(32 16 8)) (WHEN (AND (INDEX<= PAD +IMAGE-PAD+) (ZEROP (INDEX-MOD (INDEX* BYTES-PER-LINE 8) PAD))) (RETURN PAD))))) (UNLESS LEFT-PAD (SETQ LEFT-PAD 0)) (MAKE-IMAGE-X :WIDTH WIDTH :HEIGHT HEIGHT :DEPTH DEPTH :PLIST PLIST :FORMAT FORMAT :DATA DATA :BITS-PER-PIXEL BITS-PER-PIXEL :BYTES-PER-LINE BYTES-PER-LINE :BYTE-LSB-FIRST-P BYTE-LSB-FIRST-P :BIT-LSB-FIRST-P BIT-LSB-FIRST-P :UNIT UNIT :PAD PAD :LEFT-PAD LEFT-PAD))) (LIST (LET ((DATA DATA)) (DECLARE (TYPE LIST DATA)) (UNLESS DEPTH (SETQ DEPTH (LENGTH DATA))) (WHEN DATA (UNLESS WIDTH (SETQ WIDTH (ARRAY-DIMENSION (CAR DATA) 1))) (UNLESS HEIGHT (SETQ HEIGHT (ARRAY-DIMENSION (CAR DATA) 0)))) (MAKE-IMAGE-XY :WIDTH WIDTH :HEIGHT HEIGHT :PLIST PLIST :DEPTH DEPTH :BITMAP-LIST DATA))) (PIXARRAY (LET ((DATA DATA)) (DECLARE (TYPE PIXARRAY DATA)) (UNLESS WIDTH (SETQ WIDTH (ARRAY-DIMENSION DATA 1))) (UNLESS HEIGHT (SETQ HEIGHT (ARRAY-DIMENSION DATA 0))) (UNLESS BITS-PER-PIXEL (SETQ BITS-PER-PIXEL (ETYPECASE DATA (PIXARRAY-32 32) (PIXARRAY-24 24) (PIXARRAY-16 16) (PIXARRAY-8 8) (PIXARRAY-4 4) (PIXARRAY-1 1))))) (UNLESS DEPTH (SETQ DEPTH BITS-PER-PIXEL)) (MAKE-IMAGE-Z :WIDTH WIDTH :HEIGHT HEIGHT :DEPTH DEPTH :PLIST PLIST :BITS-PER-PIXEL BITS-PER-PIXEL :PIXARRAY DATA))) to be IMAGE ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DATA to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (OR BITS-PER-PIXEL 1) to be (OR NULL CARD8) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (IF (= DEPTH 1) :XY-PIXMAP :Z-PIXMAP) to be (OR NULL (MEMBER :BITMAP :XY-PIXMAP :Z-PIXMAP)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (COND ((EQ FORMAT :XY-PIXMAP) 1) ((INDEX> DEPTH 24) 32) ((INDEX> DEPTH 16) 24) ((INDEX> DEPTH 8) 16) ((INDEX> DEPTH 4) 8) ((INDEX> DEPTH 1) 4) (T 1)) to be (OR NULL (MEMBER 1 4 8 16 24 32)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DEPTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (OR PAD 8) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BITS-PER-PIXEL to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BITS-PER-PIXEL to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING BITS-PER-LINE PAD)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (INDEX-CEILING PADDED-BITS-PER-LINE 8) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of +IMAGE-UNIT+ to be (OR NULL (MEMBER 8 16 32)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX (INDEX* BYTES-PER-LINE 8)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (DOLIST (PAD '(32 16 8)) (WHEN (AND (INDEX<= PAD +IMAGE-PAD+) (ZEROP (INDEX-MOD (INDEX* BYTES-PER-LINE 8) PAD))) (RETURN PAD))) to be (OR NULL (MEMBER 8 16 32)) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX (INDEX* BYTES-PER-LINE 8)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of BYTES-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of PAD to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of 0 to be (OR NULL CARD8) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DATA to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (LENGTH DATA) to be (OR NULL CARD8) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ARRAY-DIMENSION (CAR DATA) 1) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ARRAY-DIMENSION (CAR DATA) 0) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of DATA to be PIXARRAY ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ARRAY-DIMENSION DATA 1) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ARRAY-DIMENSION DATA 0) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 3794 ;;; at (DEFUN CREATE-IMAGE ...) ;;; Checking type of (ETYPECASE DATA (PIXARRAY-32 32) (PIXARRAY-24 24) (PIXARRAY-16 16) (PIXARRAY-8 8) (PIXARRAY-4 4) (PIXARRAY-1 1)) to be (OR NULL (MEMBER 1 4 8 16 24 32)) ;;; Compiling (DEFUN IMAGE-NOSWAP ...). ;;; Note: ;;; in file IMAGE.LISP, position 9598 ;;; at (DEFUN IMAGE-NOSWAP ...) ;;; Inlining BUFFER-REPLACE ;;; Note: ;;; in file IMAGE.LISP, position 9598 ;;; at (DEFUN IMAGE-NOSWAP ...) ;;; Inlining BUFFER-REPLACE ;;; Compiling (DEFUN IMAGE-SWAP-TWO-BYTES ...). ;;; Compiling (DEFUN IMAGE-SWAP-THREE-BYTES ...). ;;; Compiling (DEFUN IMAGE-SWAP-FOUR-BYTES ...). ;;; Compiling (DEFUN IMAGE-SWAP-WORDS ...). ;;; Compiling (DEFUN IMAGE-SWAP-NIBBLES ...). ;;; Compiling (DEFUN IMAGE-SWAP-NIBBLES-LEFT ...). ;;; Compiling (DEFUN IMAGE-SWAP-BITS ...). ;;; Compiling (DEFUN IMAGE-SWAP-BITS-AND-TWO-BYTES ...). ;;; Compiling (DEFUN IMAGE-SWAP-BITS-AND-FOUR-BYTES ...). ;;; Compiling (DEFUN IMAGE-SWAP-BITS-AND-WORDS ...). ;;; Compiling (DEFUN IMAGE-SWAP-FUNCTION ...). ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (ECASE FROM-BITMAP-UNIT (32 2) (16 1) (8 0)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (IF FROM-BIT-LSB-FIRST-P 3 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (ECASE FROM-BITMAP-UNIT (32 2) (16 1) (8 0))) (THE ARRAY-INDEX (IF FROM-BIT-LSB-FIRST-P 3 0)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (ECASE FROM-BITMAP-UNIT (32 2) (16 1) (8 0)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (IF FROM-BIT-LSB-FIRST-P 3 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (IF FROM-BYTE-LSB-FIRST-P 6 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (VALUES (+ (THE ARRAY-INDEX (ECASE FROM-BITMAP-UNIT (32 2) (16 1) (8 0))) (THE ARRAY-INDEX (IF FROM-BIT-LSB-FIRST-P 3 0))))) (THE ARRAY-INDEX (IF FROM-BYTE-LSB-FIRST-P 6 0)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (ECASE FROM-BITMAP-UNIT (32 2) (16 1) (8 0)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (IF FROM-BIT-LSB-FIRST-P 3 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (ECASE FROM-BITMAP-UNIT (32 2) (16 1) (8 0))) (THE ARRAY-INDEX (IF FROM-BIT-LSB-FIRST-P 3 0)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (ECASE FROM-BITMAP-UNIT (32 2) (16 1) (8 0)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (IF FROM-BIT-LSB-FIRST-P 3 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 34508 ;;; at (DEFUN IMAGE-SWAP-FUNCTION ...) ;;; Checking type of (IF FROM-BYTE-LSB-FIRST-P 6 0) to be ARRAY-INDEX ;;; Compiling (DEFUN READ-PIXARRAY-1 ...). ;;; Compiling (DEFUN READ-PIXARRAY-4 ...). ;;; Compiling (DEFUN READ-PIXARRAY-8 ...). ;;; Compiling (DEFUN READ-PIXARRAY-16 ...). ;;; Compiling (DEFUN READ-PIXARRAY-24 ...). ;;; Compiling (DEFUN READ-PIXARRAY-32 ...). ;;; Compiling (DEFUN READ-PIXARRAY-INTERNAL ...). ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (ALLOCATE-REPLY-BUFFER (INDEX* HEIGHT PADDED-BYTES-PER-LINE)) to be REPLY-BUFFER ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (REPLY-IBUF8 .REPLY-BUFFER.) to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX BOFFSET) (THE ARRAY-INDEX (INDEX* Y PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX X) (THE ARRAY-INDEX WIDTH))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX+ X WIDTH)) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX X) (THE ARRAY-INDEX WIDTH))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX (INDEX* (INDEX+ X WIDTH) BITS-PER-PIXEL)) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX X) (THE ARRAY-INDEX WIDTH))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX+ X WIDTH)) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 49419 ;;; at (DEFUN READ-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX X) (THE ARRAY-INDEX WIDTH))) to be ARRAY-INDEX ;;; Compiling (DEFUN READ-PIXARRAY ...). ;;; Compiling (DEFUN READ-XY-FORMAT-IMAGE-X ...). ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX DEPTH) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX WIDTH) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE) (THE ARRAY-INDEX DEPTH))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of 0 to be IMAGE-DEPTH ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PLANE) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) (THE ARRAY-INDEX (INDEX* PLANE PADDED-BYTES-PER-PLANE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PLANE) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PLANE) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (INDEX1+ PLANE) to be IMAGE-DEPTH ;;; Note: ;;; in file IMAGE.LISP, position 52220 ;;; at (DEFUN READ-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX PLANE))) to be ARRAY-INDEX ;;; Compiling (DEFUN READ-Z-FORMAT-IMAGE-X ...). ;;; Note: ;;; in file IMAGE.LISP, position 53848 ;;; at (DEFUN READ-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 53848 ;;; at (DEFUN READ-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 53848 ;;; at (DEFUN READ-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX (INDEX* WIDTH BITS-PER-PIXEL)) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 53848 ;;; at (DEFUN READ-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 53848 ;;; at (DEFUN READ-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Compiling (DEFUN READ-IMAGE-XY ...). ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX WIDTH) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING WIDTH +IMAGE-PAD+)) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX WIDTH) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of DATA to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX LENGTH) (THE ARRAY-INDEX INDEX))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of 0 to be IMAGE-DEPTH ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of #:G1609 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (OR (POP ARRAYS) (MAKE-ARRAY DIMENSIONS :ELEMENT-TYPE ELEMENT-TYPE)) to be PIXARRAY-1 ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of #:G1611 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (1+ PLANE) to be IMAGE-DEPTH ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 55296 ;;; at (DEFUN READ-IMAGE-XY ...) ;;; Checking type of (LENGTH DATA) to be IMAGE-DEPTH ;;; Compiling (DEFUN READ-IMAGE-Z ...). ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX Y) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX+ Y HEIGHT)) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX Y) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX IMAGE-BITS-PER-LINE) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING IMAGE-BITS-PER-LINE +IMAGE-PAD+)) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX IMAGE-BITS-PER-LINE) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX (INDEX* (INDEX-CEILING IMAGE-BITS-PER-LINE +IMAGE-PAD+) +IMAGE-PAD+)) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX IMAGE-BITS-PER-LINE) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING IMAGE-BITS-PER-LINE +IMAGE-PAD+)) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 57073 ;;; at (DEFUN READ-IMAGE-Z ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX IMAGE-BITS-PER-LINE) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Compiling (DEFUN GET-IMAGE ...). ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Checking type of (ECASE FORMAT (:XY-PIXMAP 'IMAGE-XY) (:Z-PIXMAP 'IMAGE-Z) ((NIL) 'IMAGE-X)) to be (OR NULL (MEMBER IMAGE-XY IMAGE-X IMAGE-Z)) ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Checking type of (CASE RESULT-TYPE (IMAGE-XY :XY-PIXMAP) ((IMAGE-Z IMAGE-X) :Z-PIXMAP)) to be (OR NULL (MEMBER :XY-PIXMAP :Z-PIXMAP)) ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Checking type of 4294967295 to be (OR NULL PIXEL) ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Checking type of #:LET1709 to be DISPLAY ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Checking type of #:LET1768 to be REPLY-BUFFER ;;; Note: ;;; in file IMAGE.LISP, position 58826 ;;; at (DEFUN GET-IMAGE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN WRITE-PIXARRAY-1 ...). ;;; Compiling (DEFUN WRITE-PIXARRAY-4 ...). ;;; Compiling (DEFUN WRITE-PIXARRAY-8 ...). ;;; Compiling (DEFUN WRITE-PIXARRAY-16 ...). ;;; Compiling (DEFUN WRITE-PIXARRAY-24 ...). ;;; Compiling (DEFUN WRITE-PIXARRAY-32 ...). ;;; Compiling (DEFUN WRITE-PIXARRAY-INTERNAL ...). ;;; Note: ;;; in file IMAGE.LISP, position 73619 ;;; at (DEFUN WRITE-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 73619 ;;; at (DEFUN WRITE-PIXARRAY-INTERNAL ...) ;;; Checking type of (ALLOCATE-REPLY-BUFFER (INDEX* HEIGHT PADDED-BYTES-PER-LINE)) to be REPLY-BUFFER ;;; Note: ;;; in file IMAGE.LISP, position 73619 ;;; at (DEFUN WRITE-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 73619 ;;; at (DEFUN WRITE-PIXARRAY-INTERNAL ...) ;;; Checking type of (REPLY-IBUF8 .REPLY-BUFFER.) to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 73619 ;;; at (DEFUN WRITE-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 73619 ;;; at (DEFUN WRITE-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX (INDEX* WIDTH BITS-PER-PIXEL)) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 73619 ;;; at (DEFUN WRITE-PIXARRAY-INTERNAL ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Compiling (DEFUN WRITE-PIXARRAY ...). ;;; Compiling (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...). ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX X) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX X) (THE ARRAY-INDEX FROM-BITMAP-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (INDEX-MOD X FROM-BITMAP-UNIT) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX X) (THE ARRAY-INDEX FROM-BITMAP-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX X-MOD-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (INDEX+ WIDTH X-MOD-UNIT) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX X-MOD-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX TEMP-WIDTH) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (INDEX-CEILING TEMP-WIDTH 8) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX TEMP-WIDTH) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX TEMP-WIDTH) (THE ARRAY-INDEX FROM-BITMAP-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING TEMP-WIDTH FROM-BITMAP-UNIT)) (THE ARRAY-INDEX FROM-BITMAP-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX TEMP-WIDTH) (THE ARRAY-INDEX FROM-BITMAP-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (INDEX* (INDEX-CEILING TEMP-WIDTH FROM-BITMAP-UNIT) FROM-BITMAP-UNIT) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX TEMP-WIDTH) (THE ARRAY-INDEX FROM-BITMAP-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING TEMP-WIDTH FROM-BITMAP-UNIT)) (THE ARRAY-INDEX FROM-BITMAP-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX TEMP-WIDTH) (THE ARRAY-INDEX FROM-BITMAP-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX TEMP-PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (INDEX-CEILING TEMP-PADDED-BITS-PER-LINE 8) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX TEMP-PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX TEMP-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (ALLOCATE-REPLY-BUFFER (INDEX* HEIGHT TEMP-PADDED-BYTES-PER-LINE)) to be REPLY-BUFFER ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX TEMP-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (REPLY-IBUF8 .REPLY-BUFFER.) to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX X) (THE ARRAY-INDEX X-MOD-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- X X-MOD-UNIT)) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX X) (THE ARRAY-INDEX X-MOD-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE))))) (THE ARRAY-INDEX (INDEX-FLOOR (INDEX- X X-MOD-UNIT) 8)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX X) (THE ARRAY-INDEX X-MOD-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- X X-MOD-UNIT)) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX X) (THE ARRAY-INDEX X-MOD-UNIT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX X) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE))))) (THE ARRAY-INDEX (INDEX-FLOOR X 8)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX X) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 76481 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX WIDTH) 8)) to be ARRAY-INDEX ;;; Compiling (DEFUN WRITE-XY-FORMAT-IMAGE-X ...). ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PLANE) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX* PLANE (IMAGE-HEIGHT IMAGE))) (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PLANE) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX (INDEX-FLOOR (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY)) PADDED-BYTES-PER-LINE)) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G2391) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G2391)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G2391) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2392 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; ! The variable #:G2393 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G2429) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G2429)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G2429) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2430 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; ! The variable #:G2431 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2472 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G2472) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2472 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2504 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G2504) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2504 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2541 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G2541) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2541 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (DECF (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2563 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G2563) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2563 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PLANE) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX* PLANE (IMAGE-HEIGHT IMAGE))) (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PLANE) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX (INDEX-FLOOR (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY)) PADDED-BYTES-PER-LINE)) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G2776) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G2776)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G2776) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2777 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; ! The variable #:G2778 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G2814) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G2814)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G2814) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2815 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; ! The variable #:G2816 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2857 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G2857) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2857 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2889 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G2889) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2889 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2926 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G2926) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2926 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (DECF (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2948 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G2948) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 79460 ;;; at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...) ;;; Checking type of #:G2948 to be ARRAY-INDEX ;;; Compiling (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...). ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX X) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX* X BITS-PER-PIXEL)) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX X) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE))))) (THE ARRAY-INDEX (INDEX-FLOOR (INDEX* X BITS-PER-PIXEL) 8)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX DATA-START) (THE ARRAY-INDEX (INDEX* Y FROM-PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX Y) (THE ARRAY-INDEX FROM-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX X) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX* X BITS-PER-PIXEL)) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX X) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX (INDEX* WIDTH BITS-PER-PIXEL)) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX TO-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (ALLOCATE-REPLY-BUFFER (INDEX* HEIGHT TO-PADDED-BYTES-PER-LINE)) to be REPLY-BUFFER ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX TO-PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 81299 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X-DATA ...) ;;; Checking type of (REPLY-IBUF8 .REPLY-BUFFER.) to be BUFFER-BYTES ;;; Compiling (DEFUN WRITE-Z-FORMAT-IMAGE-X ...). ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX (INDEX-FLOOR (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY)) PADDED-BYTES-PER-LINE)) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G3183) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G3183)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G3183) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3184 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; ! The variable #:G3185 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G3221) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G3221)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (BUFFER-BOFFSET #:G3221) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3222 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; ! The variable #:G3223 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3264 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G3264) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3264 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3296 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G3296) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3296 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3333 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G3333) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3333 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (VALUES (DECF (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3355 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of (THE ARRAY-INDEX #:G3355) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 83917 ;;; at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...) ;;; Checking type of #:G3355 to be ARRAY-INDEX ;;; Compiling (DEFUN WRITE-IMAGE-XY ...). ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G3382)) to be PIXARRAY-1 ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX (INDEX-FLOOR (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY)) PADDED-BYTES-PER-LINE)) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET #:G3503) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G3503)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET #:G3503) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3504 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; ! The variable #:G3505 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET #:G3541) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G3541)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (BUFFER-BOFFSET #:G3541) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3542 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; ! The variable #:G3543 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3584 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (THE ARRAY-INDEX #:G3584) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3584 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3616 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (THE ARRAY-INDEX #:G3616) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3616 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3653 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (THE ARRAY-INDEX #:G3653) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3653 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (VALUES (DECF (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3675 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of (THE ARRAY-INDEX #:G3675) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 85393 ;;; at (DEFUN WRITE-IMAGE-XY ...) ;;; Checking type of #:G3675 to be ARRAY-INDEX ;;; Compiling (DEFUN WRITE-IMAGE-Z ...). ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX (INDEX-FLOOR (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY)) PADDED-BYTES-PER-LINE)) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (FLOOR (THE ARRAY-INDEX (INDEX- (BUFFER-SIZE DISPLAY) (BUFFER-BOFFSET DISPLAY))) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (BUFFER-SIZE DISPLAY)) (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:LET3703 to be (MEMBER 1 4 8 16 24 32) ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET #:G3820) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G3820)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET #:G3820) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3821 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; ! The variable #:G3822 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX (BUFFER-BOFFSET DISPLAY)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET #:G3858) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (+ (THE ARRAY-INDEX (BUFFER-BOFFSET #:G3858)) (THE ARRAY-INDEX (INDEX* NLINES PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (BUFFER-BOFFSET #:G3858) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX NLINES) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3859 to be ARRAY-INDEX ;;; Style warning: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; ! The variable #:G3860 is not used. ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3901 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (THE ARRAY-INDEX #:G3901) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3901 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (+ (THE ARRAY-INDEX SRC-Y) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3933 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (THE ARRAY-INDEX #:G3933) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3933 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3970 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (THE ARRAY-INDEX #:G3970) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3970 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (VALUES (DECF (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (- (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX NLINES)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3992 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of (THE ARRAY-INDEX #:G3992) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 86923 ;;; at (DEFUN WRITE-IMAGE-Z ...) ;;; Checking type of #:G3992 to be ARRAY-INDEX ;;; Compiling (DEFUN PUT-IMAGE ...). ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE to be IMAGE-X ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (ETYPECASE IMAGE (IMAGE-X (IMAGE-X-FORMAT (THE IMAGE-X IMAGE))) (IMAGE-XY :XY-PIXMAP) (IMAGE-Z :Z-PIXMAP)) to be (MEMBER :BITMAP :XY-PIXMAP :Z-PIXMAP) ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE to be IMAGE-X ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE to be IMAGE-X ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-X-LEFT-PAD (THE IMAGE-X IMAGE)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE to be IMAGE-X ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX SRC-X) (THE ARRAY-INDEX (IMAGE-X-LEFT-PAD (THE IMAGE-X IMAGE))))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE to be IMAGE-X ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-X-LEFT-PAD (THE IMAGE-X IMAGE)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE to be IMAGE-X ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-WIDTH IMAGE) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE-WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX IMAGE-WIDTH) (THE ARRAY-INDEX SRC-X))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE-WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (MIN (OR WIDTH IMAGE-WIDTH) (INDEX- IMAGE-WIDTH SRC-X)) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE-WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX IMAGE-WIDTH) (THE ARRAY-INDEX SRC-X))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE-WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE-HEIGHT to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX IMAGE-HEIGHT) (THE ARRAY-INDEX SRC-Y))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE-HEIGHT to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (MIN (OR HEIGHT IMAGE-HEIGHT) (INDEX- IMAGE-HEIGHT SRC-Y)) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE-HEIGHT to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX IMAGE-HEIGHT) (THE ARRAY-INDEX SRC-Y))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of IMAGE-HEIGHT to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be IMAGE-DEPTH ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (DISPLAY-BITMAP-FORMAT DISPLAY) to be BITMAP-FORMAT ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (BITMAP-FORMAT-UNIT BITMAP-FORMAT) to be (MEMBER 8 16 32) ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (1- (THE ARRAY-INDEX (IMAGE-WIDTH IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (1- (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of HEIGHT to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (FIND DEPTH (DISPLAY-PIXMAP-FORMATS DISPLAY) :KEY #'PIXMAP-FORMAT-DEPTH) to be (OR NULL PIXMAP-FORMAT) ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX PAD) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX SRC-X) (THE ARRAY-INDEX (INDEX-MIN PAD +IMAGE-PAD+)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX PAD) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (IF (OR (EQ FORMAT :XY-PIXMAP) (= DEPTH 1)) (INDEX-MOD SRC-X (INDEX-MIN PAD +IMAGE-PAD+)) 0) to be CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX PAD) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX SRC-X) (THE ARRAY-INDEX (INDEX-MIN PAD +IMAGE-PAD+)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX PAD) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX SRC-X) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (INDEX- SRC-X LEFT-PAD) to be INT16 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX SRC-X) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (INDEX+ WIDTH LEFT-PAD) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX LEFT-PADDED-WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING BITS-PER-LINE PAD)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX DEPTH))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (ECASE FORMAT ((:BITMAP :XY-PIXMAP) (INDEX* PADDED-BYTES-PER-LINE DEPTH)) (:Z-PIXMAP PADDED-BYTES-PER-LINE)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX DEPTH))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (DISPLAY-MAX-REQUEST-LENGTH DISPLAY)) 6)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX- (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) 6)) 4)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (DISPLAY-MAX-REQUEST-LENGTH DISPLAY)) 6)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (FLOOR MAX-BYTES-PER-REQUEST REQUEST-BYTES-PER-LINE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of SRC-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of HEIGHT-REMAINING to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX HEIGHT-REMAINING) (THE ARRAY-INDEX MAX-REQUEST-HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of HEIGHT-REMAINING to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX REQUEST-BYTES-PER-LINE) (THE ARRAY-INDEX REQUEST-HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX REQUEST-BYTES) 4)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (INDEX-CEILING REQUEST-BYTES 4) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX REQUEST-BYTES) 4)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX REQUEST-WORDS) 6)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (INDEX+ REQUEST-WORDS 6) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX REQUEST-WORDS) 6)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX REQUEST-SRC-Y) (THE ARRAY-INDEX REQUEST-HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of REQUEST-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX REQUEST-Y) (THE ARRAY-INDEX REQUEST-HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of REQUEST-Y to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (- HEIGHT-REMAINING REQUEST-HEIGHT) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of HEIGHT-REMAINING to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX HEIGHT-REMAINING) (THE ARRAY-INDEX MAX-REQUEST-HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 88534 ;;; at (DEFUN PUT-IMAGE ...) ;;; Checking type of HEIGHT-REMAINING to be ARRAY-INDEX ;;; Compiling (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...). ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX X) (THE ARRAY-INDEX (IMAGE-X-LEFT-PAD IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX PADDED-X) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (INDEX-MOD PADDED-X 8) to be CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX PADDED-X) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX PADDED-X) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (INDEX- PADDED-X LEFT-PAD) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX PADDED-X) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-UNIT IMAGE) to be (MEMBER 8 16 32) ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-PAD IMAGE) to be (MEMBER 8 16 32) ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX (INDEX+ WIDTH LEFT-PAD)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING (INDEX+ WIDTH LEFT-PAD) PAD)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX (INDEX+ WIDTH LEFT-PAD)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-WIDTH) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE) (THE ARRAY-INDEX (IMAGE-DEPTH IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (MAKE-ARRAY LENGTH :ELEMENT-TYPE 'CARD8) to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (VALUES (* (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE))))) (THE ARRAY-INDEX PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE) (THE ARRAY-INDEX PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (VALUES (* (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE))))) (THE ARRAY-INDEX PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE) (THE ARRAY-INDEX PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 97479 ;;; at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PLANE to be ARRAY-INDEX ;;; Compiling (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...). ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX X) (THE ARRAY-INDEX (IMAGE-X-LEFT-PAD IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX PADDED-X) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IF (INDEX= (IMAGE-DEPTH IMAGE) 1) (INDEX-MOD PADDED-X 8) 0) to be CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX PADDED-X) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX PADDED-X) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (INDEX- PADDED-X LEFT-PAD) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX PADDED-X) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-X to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-BITS-PER-PIXEL IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-UNIT IMAGE) to be (MEMBER 8 16 32) ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-X-PAD IMAGE) to be (MEMBER 8 16 32) ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX+ WIDTH LEFT-PAD)) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of BITS-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of BITS-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING BITS-PER-LINE PAD)) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of BITS-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) (THE ARRAY-INDEX PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of BITS-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-BITS-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of PADDED-BITS-PER-LINE to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE) (THE ARRAY-INDEX (IMAGE-DEPTH IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 99544 ;;; at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...) ;;; Checking type of (MAKE-ARRAY LENGTH :ELEMENT-TYPE 'CARD8) to be BUFFER-BYTES ;;; Compiling (DEFUN IMAGE-X->IMAGE-X ...). ;;; Compiling (DEFUN IMAGE-X->IMAGE-XY ...). ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX X) (THE ARRAY-INDEX (IMAGE-X-LEFT-PAD IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (IMAGE-X-BYTES-PER-LINE IMAGE)) (THE ARRAY-INDEX (IMAGE-HEIGHT IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (IMAGE-X-BYTES-PER-LINE IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 101789 ;;; at (DEFUN IMAGE-X->IMAGE-XY ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX ;;; Compiling (DEFUN IMAGE-X->IMAGE-Z ...). ;;; Note: ;;; in file IMAGE.LISP, position 102615 ;;; at (DEFUN IMAGE-X->IMAGE-Z ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 102615 ;;; at (DEFUN IMAGE-X->IMAGE-Z ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 102615 ;;; at (DEFUN IMAGE-X->IMAGE-Z ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX X) (THE ARRAY-INDEX (IMAGE-X-LEFT-PAD IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 102615 ;;; at (DEFUN IMAGE-X->IMAGE-Z ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX ;;; Compiling (DEFUN COPY-PIXARRAY ...). ;;; Note: ;;; in file IMAGE.LISP, position 103408 ;;; at (DEFUN COPY-PIXARRAY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BITS-PER-PIXEL) (THE ARRAY-INDEX WIDTH))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 103408 ;;; at (DEFUN COPY-PIXARRAY ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 103408 ;;; at (DEFUN COPY-PIXARRAY ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING BITS-PER-LINE +IMAGE-PAD+)) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 103408 ;;; at (DEFUN COPY-PIXARRAY ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 103408 ;;; at (DEFUN COPY-PIXARRAY ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 103408 ;;; at (DEFUN COPY-PIXARRAY ...) ;;; Checking type of (MAKE-ARRAY (LIST HEIGHT PADDED-WIDTH) :ELEMENT-TYPE (ARRAY-ELEMENT-TYPE ARRAY)) to be PIXARRAY ;;; Compiling (DEFUN IMAGE-XY->IMAGE-X ...). ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX WIDTH) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING WIDTH +IMAGE-PAD+)) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX WIDTH) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE) (THE ARRAY-INDEX (IMAGE-DEPTH IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (MAKE-ARRAY BYTES-TOTAL :ELEMENT-TYPE 'CARD8) to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G5345)) to be PIXARRAY-1 ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX INDEX) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of #:G5348 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX INDEX) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of (+ (THE ARRAY-INDEX INDEX) (THE ARRAY-INDEX PADDED-BYTES-PER-PLANE)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 105285 ;;; at (DEFUN IMAGE-XY->IMAGE-X ...) ;;; Checking type of #:G5360 to be ARRAY-INDEX ;;; Compiling (DEFUN IMAGE-XY->IMAGE-XY ...). ;;; Note: ;;; in file IMAGE.LISP, position 106685 ;;; at (DEFUN IMAGE-XY->IMAGE-XY ...) ;;; Checking type of #:LET5384 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 106685 ;;; at (DEFUN IMAGE-XY->IMAGE-XY ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST5379) to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 106685 ;;; at (DEFUN IMAGE-XY->IMAGE-XY ...) ;;; Checking type of #:LOOP-LIST-TAIL5381 to be CONS ;;; Compiling (DEFUN IMAGE-XY->IMAGE-Z ...). ;;; Compiling (DEFUN IMAGE-Z->IMAGE-X ...). ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (IMAGE-Z-BITS-PER-PIXEL IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX (IMAGE-Z-BITS-PER-PIXEL IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (IMAGE-Z-BITS-PER-PIXEL IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING BITS-PER-LINE +IMAGE-PAD+)) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) +IMAGE-PAD+)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX HEIGHT)))) (THE ARRAY-INDEX (IMAGE-DEPTH IMAGE)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX PADDED-BYTES-PER-LINE) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (MAKE-ARRAY BYTES-TOTAL :ELEMENT-TYPE 'CARD8) to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 107380 ;;; at (DEFUN IMAGE-Z->IMAGE-X ...) ;;; Checking type of (IMAGE-Z-BITS-PER-PIXEL IMAGE) to be (MEMBER 1 4 8 16 24 32) ;;; Compiling (DEFUN IMAGE-Z->IMAGE-XY ...). ;;; Compiling (DEFUN IMAGE-Z->IMAGE-Z ...). ;;; Compiling (DEFUN COPY-IMAGE ...). ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (IMAGE-WIDTH IMAGE) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (OR WIDTH IMAGE-WIDTH) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (OR HEIGHT IMAGE-HEIGHT) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (1- IMAGE-WIDTH) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (1- IMAGE-HEIGHT) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-WIDTH X) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-WIDTH X) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-WIDTH X) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-WIDTH X) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (INDEX-MIN WIDTH (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0)) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-WIDTH X) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-WIDTH X) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-WIDTH X) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-WIDTH X) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (INDEX-MIN HEIGHT (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0)) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (VALUES (MIN (THE ARRAY-INDEX HEIGHT) (THE ARRAY-INDEX (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0)))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (ETYPECASE IMAGE (IMAGE-X (ECASE RESULT-TYPE ((NIL IMAGE-X) (IMAGE-X->IMAGE-X IMAGE X Y WIDTH HEIGHT)) (IMAGE-XY (IMAGE-X->IMAGE-XY IMAGE X Y WIDTH HEIGHT)) (IMAGE-Z (IMAGE-X->IMAGE-Z IMAGE X Y WIDTH HEIGHT)))) (IMAGE-XY (ECASE RESULT-TYPE (IMAGE-X (IMAGE-XY->IMAGE-X IMAGE X Y WIDTH HEIGHT)) ((NIL IMAGE-XY) (IMAGE-XY->IMAGE-XY IMAGE X Y WIDTH HEIGHT)) (IMAGE-Z (IMAGE-XY->IMAGE-Z IMAGE X Y WIDTH HEIGHT)))) (IMAGE-Z (ECASE RESULT-TYPE (IMAGE-X (IMAGE-Z->IMAGE-X IMAGE X Y WIDTH HEIGHT)) (IMAGE-XY (IMAGE-Z->IMAGE-XY IMAGE X Y WIDTH HEIGHT)) ((NIL IMAGE-Z) (IMAGE-Z->IMAGE-Z IMAGE X Y WIDTH HEIGHT))))) to be IMAGE ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (IMAGE-X-HOT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (IMAGE-X-HOT IMAGE)) (THE ARRAY-INDEX X))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (IMAGE-X-HOT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (IMAGE-Y-HOT IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (VALUES (- (THE ARRAY-INDEX (IMAGE-Y-HOT IMAGE)) (THE ARRAY-INDEX Y))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 109371 ;;; at (DEFUN COPY-IMAGE ...) ;;; Checking type of (IMAGE-Y-HOT IMAGE) to be ARRAY-INDEX ;;; Compiling (DEFUN READ-BITMAP-FILE ...). ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:LET5598 to be STRING ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (READ-LINE FSTREAM) to be STRING ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (READ-KEYWORD LINE 8 NAME-END) to be STRINGABLE ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5604 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of NAME-END to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX NAME-END))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of NAME-END to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of IND-END to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (1+ (THE ARRAY-INDEX IND-END))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of IND-END to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5638 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5643 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of BITS-PER-PIXEL to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of BITS-PER-PIXEL to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) 32)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX (INDEX-CEILING BITS-PER-LINE 32)) 32)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) 32)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX PADDED-BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (MAKE-ARRAY (* PADDED-BYTES-PER-LINE HEIGHT) :ELEMENT-TYPE 'CARD8) to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (+ BYTE #:G5727) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX LINE-BASE) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (+ BYTE #:G5763) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX LINE-BASE) (THE ARRAY-INDEX PADDED-BYTES-PER-LINE))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (- (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5774 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (THE ARRAY-INDEX #:G5774) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5774 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (DECF (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (- (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of WIDTH to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5807 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (THE ARRAY-INDEX #:G5807) to be (OR NULL CARD16) ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5807 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (GETF PROPERTIES #:G5846 NIL) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (- (THE ARRAY-INDEX (GETF PROPERTIES #:G5846 NIL)) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (GETF PROPERTIES #:G5846 NIL) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5847 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5845 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5847 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (VALUES (DECF (THE ARRAY-INDEX (GETF PROPERTIES :X-HOT)) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (GETF PROPERTIES #:G5876 NIL) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (- (THE ARRAY-INDEX (GETF PROPERTIES #:G5876 NIL)) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of (GETF PROPERTIES #:G5876 NIL) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5877 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5875 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 111707 ;;; at (DEFUN READ-BITMAP-FILE ...) ;;; Checking type of #:G5877 to be ARRAY-INDEX ;;; Compiling (DEFUN WRITE-BITMAP-FILE ...). ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (COPY-IMAGE IMAGE :RESULT-TYPE 'IMAGE-X) to be IMAGE ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IMAGE-PLIST IMAGE) to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (OR NAME (IMAGE-NAME IMAGE) 'IMAGE) to be STRINGABLE ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be CARD8 ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (IMAGE-WIDTH IMAGE)) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (INDEX+ (IMAGE-WIDTH IMAGE) LEFT-PAD) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (VALUES (+ (THE ARRAY-INDEX (IMAGE-WIDTH IMAGE)) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IMAGE-HEIGHT IMAGE) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IF (EQ (IMAGE-X-FORMAT IMAGE) :Z-PIXMAP) (IMAGE-DEPTH IMAGE) 1) to be IMAGE-DEPTH ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (IMAGE-X-BITS-PER-PIXEL IMAGE) to be (MEMBER 1 4 8 16 24 32) ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX WIDTH) (THE ARRAY-INDEX BITS-PER-PIXEL))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (VALUES (CEILING (THE ARRAY-INDEX BITS-PER-LINE) 8)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (VALUES (* (THE ARRAY-INDEX BYTES-PER-LINE) (THE ARRAY-INDEX HEIGHT))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of 0 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (GETF PLIST #:G5977 NIL) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (+ (THE ARRAY-INDEX (GETF PLIST #:G5977 NIL)) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (GETF PLIST #:G5977 NIL) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of #:G5978 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of #:G5976 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of #:G5978 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX (GETF PLIST :X-HOT)) (THE ARRAY-INDEX LEFT-PAD))) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (GETF PLIST #:G6007 NIL) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (+ (THE ARRAY-INDEX (GETF PLIST #:G6007 NIL)) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (GETF PLIST #:G6007 NIL) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of #:G6008 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of #:G6006 to be LIST ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of #:G6008 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (ALLOCATE-REPLY-BUFFER LAST) to be REPLY-BUFFER ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (REPLY-IBUF8 .REPLY-BUFFER.) to be BUFFER-BYTES ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (VALUES (MOD (THE ARRAY-INDEX COUNT) 15)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (+ (THE ARRAY-INDEX COUNT) 1) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of #:G6058 to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (VALUES (INCF (THE ARRAY-INDEX COUNT) 1)) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of (+ (THE ARRAY-INDEX COUNT) 1) to be ARRAY-INDEX ;;; Note: ;;; in file IMAGE.LISP, position 116625 ;;; at (DEFUN WRITE-BITMAP-FILE ...) ;;; Checking type of #:G6070 to be ARRAY-INDEX ;;; Compiling (DEFUN BITMAP-IMAGE ...). ;;; Note: ;;; in file IMAGE.LISP, position 120599 ;;; at (DEFUN BITMAP-IMAGE ...) ;;; Checking type of (LENGTH (FIRST PATTERNS)) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 120599 ;;; at (DEFUN BITMAP-IMAGE ...) ;;; Checking type of (LENGTH PATTERNS) to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 120599 ;;; at (DEFUN BITMAP-IMAGE ...) ;;; Checking type of (MAKE-ARRAY (LIST HEIGHT WIDTH) :ELEMENT-TYPE 'BIT) to be PIXARRAY-1 ;;; Note: ;;; in file IMAGE.LISP, position 120599 ;;; at (DEFUN BITMAP-IMAGE ...) ;;; Checking type of 0 to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 120599 ;;; at (DEFUN BITMAP-IMAGE ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G6098)) to be SIMPLE-BIT-VECTOR ;;; Note: ;;; in file IMAGE.LISP, position 120599 ;;; at (DEFUN BITMAP-IMAGE ...) ;;; Checking type of 0 to be CARD16 ;;; Note: ;;; in file IMAGE.LISP, position 120599 ;;; at (DEFUN BITMAP-IMAGE ...) ;;; Checking type of (+ ROW #:G6113) to be CARD16 ;;; Compiling (DEFUN IMAGE-PIXMAP ...). ;;; End of Pass 1. ;;; Emitting code for WITH-IMAGE-DATA-BUFFER. ;;; Emitting code for IMAGE-NAME. ;;; Emitting code for IMAGE-X-HOT. ;;; Emitting code for IMAGE-Y-HOT. ;;; Emitting code for IMAGE-RED-MASK. ;;; Emitting code for IMAGE-BLUE-MASK. ;;; Emitting code for IMAGE-GREEN-MASK. ;;; Emitting code for PRINT-IMAGE. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-IMAGE-X. ;;; Emitting code for MAKE-IMAGE-XY. ;;; Emitting code for MAKE-IMAGE-Z. ;;; Emitting code for CREATE-IMAGE. ;;; Emitting code for IMAGE-NOSWAP. ;;; Emitting code for IMAGE-SWAP-TWO-BYTES. ;;; Emitting code for IMAGE-SWAP-THREE-BYTES. ;;; Emitting code for IMAGE-SWAP-FOUR-BYTES. ;;; Emitting code for IMAGE-SWAP-WORDS. ;;; Emitting code for IMAGE-SWAP-NIBBLES. ;;; Emitting code for IMAGE-SWAP-NIBBLES-LEFT. ;;; Emitting code for IMAGE-SWAP-BITS. ;;; Emitting code for IMAGE-SWAP-BITS-AND-TWO-BYTES. ;;; Emitting code for IMAGE-SWAP-BITS-AND-FOUR-BYTES. ;;; Emitting code for IMAGE-SWAP-BITS-AND-WORDS. ;;; Emitting code for IMAGE-SWAP-FUNCTION. ;;; Emitting code for READ-PIXARRAY-1. ;;; Emitting code for READ-PIXARRAY-4. ;;; Emitting code for READ-PIXARRAY-8. ;;; Emitting code for READ-PIXARRAY-16. ;;; Emitting code for READ-PIXARRAY-24. ;;; Emitting code for READ-PIXARRAY-32. ;;; Emitting code for READ-PIXARRAY-INTERNAL. ;;; Emitting code for READ-PIXARRAY. ;;; Emitting code for READ-XY-FORMAT-IMAGE-X. ;;; Emitting code for READ-Z-FORMAT-IMAGE-X. ;;; Emitting code for READ-IMAGE-XY. ;;; Emitting code for READ-IMAGE-Z. ;;; Emitting code for GET-IMAGE. ;;; Emitting code for WRITE-PIXARRAY-1. ;;; Emitting code for WRITE-PIXARRAY-4. ;;; Emitting code for WRITE-PIXARRAY-8. ;;; Emitting code for WRITE-PIXARRAY-16. ;;; Emitting code for WRITE-PIXARRAY-24. ;;; Emitting code for WRITE-PIXARRAY-32. ;;; Emitting code for WRITE-PIXARRAY-INTERNAL. ;;; Emitting code for WRITE-PIXARRAY. ;;; Emitting code for WRITE-XY-FORMAT-IMAGE-X-DATA. ;;; Emitting code for WRITE-XY-FORMAT-IMAGE-X. ;;; Emitting code for WRITE-Z-FORMAT-IMAGE-X-DATA. ;;; Emitting code for WRITE-Z-FORMAT-IMAGE-X. ;;; Emitting code for WRITE-IMAGE-XY. ;;; Emitting code for WRITE-IMAGE-Z. ;;; Emitting code for PUT-IMAGE. ;;; Emitting code for XY-FORMAT-IMAGE-X->IMAGE-X. ;;; Emitting code for Z-FORMAT-IMAGE-X->IMAGE-X. ;;; Emitting code for IMAGE-X->IMAGE-X. ;;; Emitting code for IMAGE-X->IMAGE-XY. ;;; Emitting code for IMAGE-X->IMAGE-Z. ;;; Emitting code for COPY-PIXARRAY. ;;; Emitting code for IMAGE-XY->IMAGE-X. ;;; Emitting code for IMAGE-XY->IMAGE-XY. ;;; Emitting code for #:G5382. ;;; Emitting code for IMAGE-XY->IMAGE-Z. ;;; Emitting code for IMAGE-Z->IMAGE-X. ;;; Emitting code for IMAGE-Z->IMAGE-XY. ;;; Emitting code for IMAGE-Z->IMAGE-Z. ;;; Emitting code for COPY-IMAGE. ;;; Emitting code for READ-BITMAP-FILE. ;;; Emitting code for READ-KEYWORD. ;;; Emitting code for EXTRACT-PROPERTY. ;;; Emitting code for PARSE-HEX. ;;; Emitting code for WRITE-BITMAP-FILE. ;;; Emitting code for BITMAP-IMAGE. ;;; Emitting code for IMAGE-PIXMAP. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/image.c -o clx/image.o ;;; Finished compiling SRC:CLX;IMAGE.LISP. ;;; (compile-file "src:clx;resource.lisp" :output-file #P"BUILD:CLX;RESOURCE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;RESOURCE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFSTRUCT (RESOURCE-DATABASE # ...) ...). ;;; Compiling (DEFUN PRINT-RESOURCE-DATABASE ...). ;;; Compiling (DEFUN MAKE-RESOURCE-DATABASE ...). ;;; Compiling (DEFUN RESOURCE-DATABASE-TIMESTAMP ...). ;;; Compiling (DEFUN INCF-RESOURCE-DATABASE-TIMESTAMP ...). ;;; Compiling (DEFUN PRINT-DB ...). ;;; Compiling (DEFPARAMETER *UPPERCASE-RESOURCE-SYMBOLS* ...). ;;; Compiling (DEFUN RESOURCE-KEY ...). ;;; Note: ;;; in file RESOURCE.LISP, position 3615 ;;; at (DEFUN RESOURCE-KEY ...) ;;; Checking type of STRINGABLE to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 3615 ;;; at (DEFUN RESOURCE-KEY ...) ;;; Checking type of STRINGABLE to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 3615 ;;; at (DEFUN RESOURCE-KEY ...) ;;; Checking type of STRINGABLE to be STRING ;;; Note: ;;; in file RESOURCE.LISP, position 3615 ;;; at (DEFUN RESOURCE-KEY ...) ;;; Checking type of STRINGABLE to be STRING ;;; Compiling (DEFUN STRINGABLE-EQUAL ...). ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of A to be STRING ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of B to be STRING ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of A to be STRING ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of B to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of A to be STRING ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of B to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of A to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of B to be STRING ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of A to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of B to be STRING ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of A to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 4113 ;;; at (DEFUN STRINGABLE-EQUAL ...) ;;; Checking type of B to be SYMBOL ;;; Compiling (DEFUN ADD-RESOURCE ...). ;;; Compiling (DEFUN DELETE-RESOURCE ...). ;;; Compiling (DEFUN DELETE-RESOURCE-INTERNAL ...). ;;; Compiling (DEFUN GET-RESOURCE ...). ;;; Compiling (DEFUN GET-ENTRY-LOOKUP ...). ;;; Note: ;;; in file RESOURCE.LISP, position 9581 ;;; at (DEFUN GET-ENTRY-LOOKUP ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G35)) to be RESOURCE-DATABASE ;;; Note: ;;; in file RESOURCE.LISP, position 9581 ;;; at (DEFUN GET-ENTRY-LOOKUP ...) ;;; Checking type of (GET-ENTRY (RESOURCE-DATABASE-TIGHT ENTRY) (RESOURCE-DATABASE-LOOSE ENTRY) (CDR NAMES) (CDR CLASSES)) to be (OR NULL RESOURCE-DATABASE) ;;; Compiling (DEFUN GET-ENTRY ...). ;;; Note: ;;; in file RESOURCE.LISP, position 10214 ;;; at (DEFUN GET-ENTRY ...) ;;; Checking type of #:LET39 to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 10214 ;;; at (DEFUN GET-ENTRY ...) ;;; Checking type of #:LET40 to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 10214 ;;; at (DEFUN GET-ENTRY ...) ;;; Checking type of #:G46 to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 10214 ;;; at (DEFUN GET-ENTRY ...) ;;; Checking type of #:G48 to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 10214 ;;; at (DEFUN GET-ENTRY ...) ;;; Checking type of (CAR NAMES) to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 10214 ;;; at (DEFUN GET-ENTRY ...) ;;; Checking type of (CAR CLASSES) to be SYMBOL ;;; Compiling (DEFUN GET-SEARCH-RESOURCE ...). ;;; Note: ;;; in file RESOURCE.LISP, position 11521 ;;; at (DEFUN GET-SEARCH-RESOURCE ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G50)) to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 11521 ;;; at (DEFUN GET-SEARCH-RESOURCE ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G53)) to be RESOURCE-DATABASE ;;; Note: ;;; in file RESOURCE.LISP, position 11521 ;;; at (DEFUN GET-SEARCH-RESOURCE ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G56)) to be RESOURCE-DATABASE ;;; Compiling (DEFVAR *GET-TABLE-RESULT*). ;;; Compiling (DEFUN GET-SEARCH-TABLE ...). ;;; Note: ;;; in file RESOURCE.LISP, position 12716 ;;; at (DEFUN GET-SEARCH-TABLE ...) ;;; Checking type of (RESOURCE-DATABASE-TIGHT DATABASE) to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 12716 ;;; at (DEFUN GET-SEARCH-TABLE ...) ;;; Checking type of (RESOURCE-DATABASE-LOOSE DATABASE) to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 12716 ;;; at (DEFUN GET-SEARCH-TABLE ...) ;;; Checking type of #:G60 to be CONS ;;; Compiling (DEFUN GET-TABLES-LOOKUP ...). ;;; Note: ;;; in file RESOURCE.LISP, position 14053 ;;; at (DEFUN GET-TABLES-LOOKUP ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G62)) to be RESOURCE-DATABASE ;;; Note: ;;; in file RESOURCE.LISP, position 14053 ;;; at (DEFUN GET-TABLES-LOOKUP ...) ;;; Checking type of #:LET65 to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 14053 ;;; at (DEFUN GET-TABLES-LOOKUP ...) ;;; Checking type of #:LET66 to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 14053 ;;; at (DEFUN GET-TABLES-LOOKUP ...) ;;; Checking type of #:G67 to be CONS ;;; Note: ;;; in file RESOURCE.LISP, position 14053 ;;; at (DEFUN GET-TABLES-LOOKUP ...) ;;; Checking type of #:G69 to be CONS ;;; Compiling (DEFUN GET-TABLES ...). ;;; Note: ;;; in file RESOURCE.LISP, position 15076 ;;; at (DEFUN GET-TABLES ...) ;;; Checking type of #:LET71 to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 15076 ;;; at (DEFUN GET-TABLES ...) ;;; Checking type of #:LET72 to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 15076 ;;; at (DEFUN GET-TABLES ...) ;;; Checking type of #:G74 to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 15076 ;;; at (DEFUN GET-TABLES ...) ;;; Checking type of #:G76 to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 15076 ;;; at (DEFUN GET-TABLES ...) ;;; Checking type of (CAR NAMES) to be SYMBOL ;;; Note: ;;; in file RESOURCE.LISP, position 15076 ;;; at (DEFUN GET-TABLES ...) ;;; Checking type of (CAR CLASSES) to be SYMBOL ;;; Compiling (DEFUN MAP-RESOURCE ...). ;;; Note: ;;; in file RESOURCE.LISP, position 16082 ;;; at (DEFUN MAP-RESOURCE ...) ;;; Checking type of #:LET78 to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 16082 ;;; at (DEFUN MAP-RESOURCE ...) ;;; Checking type of #:LET79 to be LIST ;;; Note: ;;; in file RESOURCE.LISP, position 16082 ;;; at (DEFUN MAP-RESOURCE ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G80)) to be RESOURCE-DATABASE ;;; Note: ;;; in file RESOURCE.LISP, position 16082 ;;; at (DEFUN MAP-RESOURCE ...) ;;; Checking type of (FIRST (EXT:TRULY-THE CONS #:G85)) to be RESOURCE-DATABASE ;;; Compiling (DEFUN MERGE-RESOURCES ...). ;;; Compiling (DEFUN CHAR-MEMQ ...). ;;; Compiling (DEFMACRO RESOURCE-WITH-OPEN-FILE ...). ;;; Compiling (DEFUN READ-RESOURCES ...). ;;; Note: ;;; in file RESOURCE.LISP, position 19195 ;;; at (DEFUN READ-RESOURCES ...) ;;; Checking type of (READ-LINE STREAM NIL :EOF) to be (OR STRING KEYWORD) ;;; Compiling (DEFUN PARSE-RESOURCE ...). ;;; Note: ;;; in file RESOURCE.LISP, position 21664 ;;; at (DEFUN PARSE-RESOURCE ...) ;;; Checking type of #:LET113 to be ARRAY-INDEX ;;; Note: ;;; in file RESOURCE.LISP, position 21664 ;;; at (DEFUN PARSE-RESOURCE ...) ;;; Checking type of (1+ TERM) to be (OR NULL ARRAY-INDEX) ;;; Compiling (DEFUN WRITE-RESOURCES ...). ;;; Compiling (DEFUN WM-RESOURCES ...). ;;; Compiling (DEFUN SET-WM-RESOURCES ...). ;;; Compiling (DEFUN ROOT-RESOURCES ...). ;;; Compiling (DEFUN SET-ROOT-RESOURCES ...). ;;; Compiling (DEFUN INITIALIZE-RESOURCE-DATABASE ...). ;;; End of Pass 1. ;;; Emitting code for MAKE-RESOURCE-DATABASE-INTERNAL. ;;; Emitting code for PRINT-RESOURCE-DATABASE. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for MAKE-RESOURCE-DATABASE. ;;; Emitting code for RESOURCE-DATABASE-TIMESTAMP. ;;; Emitting code for INCF-RESOURCE-DATABASE-TIMESTAMP. ;;; Emitting code for PRINT-DB. ;;; Emitting code for RESOURCE-KEY. ;;; Emitting code for STRINGABLE-EQUAL. ;;; Emitting code for ADD-RESOURCE. ;;; Emitting code for DELETE-RESOURCE. ;;; Emitting code for DELETE-RESOURCE-INTERNAL. ;;; Emitting code for GET-RESOURCE. ;;; Emitting code for GET-ENTRY-LOOKUP. ;;; Emitting code for GET-ENTRY. ;;; Emitting code for GET-SEARCH-RESOURCE. ;;; Emitting code for GET-SEARCH-TABLE. ;;; Emitting code for #:G59. ;;; Emitting code for GET-TABLES-LOOKUP. ;;; Emitting code for GET-TABLES. ;;; Emitting code for MAP-RESOURCE. ;;; Emitting code for MAP-RESOURCE-INTERNAL. ;;; Emitting code for MERGE-RESOURCES. ;;; Emitting code for #:G90. ;;; Emitting code for CHAR-MEMQ. ;;; Emitting code for RESOURCE-WITH-OPEN-FILE. ;;; Emitting code for READ-RESOURCES. ;;; Emitting code for PARSE-RESOURCE. ;;; Emitting code for WRITE-RESOURCES. ;;; Emitting code for #:G137. ;;; Emitting code for WM-RESOURCES. ;;; Emitting code for SET-WM-RESOURCES. ;;; Emitting code for ROOT-RESOURCES. ;;; Emitting code for SET-ROOT-RESOURCES. ;;; Emitting code for ROOT-RESOURCES. ;;; Emitting code for INITIALIZE-RESOURCE-DATABASE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/resource.c -o clx/resource.o ;;; Finished compiling SRC:CLX;RESOURCE.LISP. ;;; (compile-file "src:clx;shape.lisp" :output-file #P"BUILD:CLX;SHAPE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;SHAPE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DECLARE-EVENT :SHAPE-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :SHAPE-NOTIFY ...). ;;; Note: ;;; in file SHAPE.LISP, position 1330 ;;; at (DECLARE-EVENT SHAPE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 1330 ;;; at (DECLARE-EVENT SHAPE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 1330 ;;; at (DECLARE-EVENT SHAPE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 1330 ;;; at (DECLARE-EVENT SHAPE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :SHAPE-NOTIFY ...). ;;; Note: ;;; in file SHAPE.LISP, position 1330 ;;; at (DECLARE-EVENT SHAPE-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 1330 ;;; at (DECLARE-EVENT SHAPE-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 1330 ;;; at (DECLARE-EVENT SHAPE-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN ENCODE-SHAPE-KIND ...). ;;; Compiling (DEFUN ENCODE-SHAPE-OPERATION ...). ;;; Compiling (DEFUN ENCODE-SHAPE-RECTANGLE-ORDERING ...). ;;; Compiling (DEFUN SHAPE-QUERY-VERSION ...). ;;; Note: ;;; in file SHAPE.LISP, position 2137 ;;; at (DEFUN SHAPE-QUERY-VERSION ...) ;;; Checking type of #:LET70 to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 2137 ;;; at (DEFUN SHAPE-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 2137 ;;; at (DEFUN SHAPE-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 2137 ;;; at (DEFUN SHAPE-QUERY-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file SHAPE.LISP, position 2137 ;;; at (DEFUN SHAPE-QUERY-VERSION ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file SHAPE.LISP, position 2137 ;;; at (DEFUN SHAPE-QUERY-VERSION ...) ;;; Checking type of #:LET120 to be REPLY-BUFFER ;;; Compiling (DEFUN SHAPE-RECTANGLES ...). ;;; Note: ;;; in file SHAPE.LISP, position 2380 ;;; at (DEFUN SHAPE-RECTANGLES ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 2380 ;;; at (DEFUN SHAPE-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 2380 ;;; at (DEFUN SHAPE-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 2380 ;;; at (DEFUN SHAPE-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 2380 ;;; at (DEFUN SHAPE-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 2380 ;;; at (DEFUN SHAPE-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 2380 ;;; at (DEFUN SHAPE-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 2380 ;;; at (DEFUN SHAPE-RECTANGLES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN SHAPE-MASK ...). ;;; Note: ;;; in file SHAPE.LISP, position 3113 ;;; at (DEFUN SHAPE-MASK ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 3113 ;;; at (DEFUN SHAPE-MASK ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3113 ;;; at (DEFUN SHAPE-MASK ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3113 ;;; at (DEFUN SHAPE-MASK ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3113 ;;; at (DEFUN SHAPE-MASK ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3113 ;;; at (DEFUN SHAPE-MASK ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN SHAPE-COMBINE ...). ;;; Note: ;;; in file SHAPE.LISP, position 3700 ;;; at (DEFUN SHAPE-COMBINE ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 3700 ;;; at (DEFUN SHAPE-COMBINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3700 ;;; at (DEFUN SHAPE-COMBINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3700 ;;; at (DEFUN SHAPE-COMBINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3700 ;;; at (DEFUN SHAPE-COMBINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3700 ;;; at (DEFUN SHAPE-COMBINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3700 ;;; at (DEFUN SHAPE-COMBINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 3700 ;;; at (DEFUN SHAPE-COMBINE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN SHAPE-OFFSET ...). ;;; Note: ;;; in file SHAPE.LISP, position 4395 ;;; at (DEFUN SHAPE-OFFSET ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 4395 ;;; at (DEFUN SHAPE-OFFSET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4395 ;;; at (DEFUN SHAPE-OFFSET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4395 ;;; at (DEFUN SHAPE-OFFSET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4395 ;;; at (DEFUN SHAPE-OFFSET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4395 ;;; at (DEFUN SHAPE-OFFSET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4395 ;;; at (DEFUN SHAPE-OFFSET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4395 ;;; at (DEFUN SHAPE-OFFSET ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN SHAPE-QUERY-EXTENTS ...). ;;; Note: ;;; in file SHAPE.LISP, position 4765 ;;; at (DEFUN SHAPE-QUERY-EXTENTS ...) ;;; Checking type of #:LET493 to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 4765 ;;; at (DEFUN SHAPE-QUERY-EXTENTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4765 ;;; at (DEFUN SHAPE-QUERY-EXTENTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4765 ;;; at (DEFUN SHAPE-QUERY-EXTENTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file SHAPE.LISP, position 4765 ;;; at (DEFUN SHAPE-QUERY-EXTENTS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file SHAPE.LISP, position 4765 ;;; at (DEFUN SHAPE-QUERY-EXTENTS ...) ;;; Checking type of #:LET543 to be REPLY-BUFFER ;;; Note: ;;; in file SHAPE.LISP, position 4765 ;;; at (DEFUN SHAPE-QUERY-EXTENTS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 4765 ;;; at (DEFUN SHAPE-QUERY-EXTENTS ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SHAPE-SELECT-INPUT ...). ;;; Note: ;;; in file SHAPE.LISP, position 5691 ;;; at (DEFUN SHAPE-SELECT-INPUT ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 5691 ;;; at (DEFUN SHAPE-SELECT-INPUT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 5691 ;;; at (DEFUN SHAPE-SELECT-INPUT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 5691 ;;; at (DEFUN SHAPE-SELECT-INPUT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 5691 ;;; at (DEFUN SHAPE-SELECT-INPUT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN SHAPE-INPUT-SELECTED-P ...). ;;; Note: ;;; in file SHAPE.LISP, position 5919 ;;; at (DEFUN SHAPE-INPUT-SELECTED-P ...) ;;; Checking type of #:LET604 to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 5919 ;;; at (DEFUN SHAPE-INPUT-SELECTED-P ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 5919 ;;; at (DEFUN SHAPE-INPUT-SELECTED-P ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 5919 ;;; at (DEFUN SHAPE-INPUT-SELECTED-P ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file SHAPE.LISP, position 5919 ;;; at (DEFUN SHAPE-INPUT-SELECTED-P ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file SHAPE.LISP, position 5919 ;;; at (DEFUN SHAPE-INPUT-SELECTED-P ...) ;;; Checking type of #:LET654 to be REPLY-BUFFER ;;; Note: ;;; in file SHAPE.LISP, position 5919 ;;; at (DEFUN SHAPE-INPUT-SELECTED-P ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SHAPE-GET-RECTANGLES ...). ;;; Note: ;;; in file SHAPE.LISP, position 6260 ;;; at (DEFUN SHAPE-GET-RECTANGLES ...) ;;; Checking type of #:LET658 to be DISPLAY ;;; Note: ;;; in file SHAPE.LISP, position 6260 ;;; at (DEFUN SHAPE-GET-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 6260 ;;; at (DEFUN SHAPE-GET-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 6260 ;;; at (DEFUN SHAPE-GET-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SHAPE.LISP, position 6260 ;;; at (DEFUN SHAPE-GET-RECTANGLES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file SHAPE.LISP, position 6260 ;;; at (DEFUN SHAPE-GET-RECTANGLES ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file SHAPE.LISP, position 6260 ;;; at (DEFUN SHAPE-GET-RECTANGLES ...) ;;; Checking type of #:LET722 to be REPLY-BUFFER ;;; Note: ;;; in file SHAPE.LISP, position 6260 ;;; at (DEFUN SHAPE-GET-RECTANGLES ...) ;;; Inlining AREF-CARD8 ;;; End of Pass 1. ;;; Emitting code for SHAPE-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for SHAPE-NOTIFY-EVENT-GET. ;;; Emitting code for SHAPE-NOTIFY-EVENT-PUT. ;;; Emitting code for ENCODE-SHAPE-KIND. ;;; Emitting code for ENCODE-SHAPE-OPERATION. ;;; Emitting code for ENCODE-SHAPE-RECTANGLE-ORDERING. ;;; Emitting code for SHAPE-QUERY-VERSION. ;;; Emitting code for SHAPE-RECTANGLES. ;;; Emitting code for SHAPE-MASK. ;;; Emitting code for SHAPE-COMBINE. ;;; Emitting code for SHAPE-OFFSET. ;;; Emitting code for SHAPE-QUERY-EXTENTS. ;;; Emitting code for SHAPE-SELECT-INPUT. ;;; Emitting code for SHAPE-INPUT-SELECTED-P. ;;; Emitting code for SHAPE-GET-RECTANGLES. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/shape.c -o clx/shape.o ;;; Finished compiling SRC:CLX;SHAPE.LISP. ;;; (compile-file "src:clx;big-requests.lisp" :output-file #P"BUILD:CLX;BIG-REQUESTS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;BIG-REQUESTS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN ENABLE-BIG-REQUESTS ...). ;;; Note: ;;; in file BIG-REQUESTS.LISP, position 845 ;;; at (DEFUN ENABLE-BIG-REQUESTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file BIG-REQUESTS.LISP, position 845 ;;; at (DEFUN ENABLE-BIG-REQUESTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file BIG-REQUESTS.LISP, position 845 ;;; at (DEFUN ENABLE-BIG-REQUESTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file BIG-REQUESTS.LISP, position 845 ;;; at (DEFUN ENABLE-BIG-REQUESTS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file BIG-REQUESTS.LISP, position 845 ;;; at (DEFUN ENABLE-BIG-REQUESTS ...) ;;; Checking type of #:LET50 to be REPLY-BUFFER ;;; End of Pass 1. ;;; Emitting code for ENABLE-BIG-REQUESTS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/big-requests.c -o clx/big-requests.o ;;; Finished compiling SRC:CLX;BIG-REQUESTS.LISP. ;;; (compile-file "src:clx;xvidmode.lisp" :output-file #P"BUILD:CLX;XVIDMODE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;XVIDMODE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFINE-CONDITION XF86-VIDMODE-BAD-CLOCK ...). ;;; Compiling (DEFINE-CONDITION XF86-VIDMODE-BAD-HTIMINGS ...). ;;; Compiling (DEFINE-CONDITION XF86-VIDMODE-BAD-VTIMINGS ...). ;;; Compiling (DEFINE-CONDITION XF86-VIDMODE-MODE-UNSUITABLE ...). ;;; Compiling (DEFINE-CONDITION XF86-VIDMODE-EXTENSION-DISABLED ...). ;;; Compiling (DEFINE-CONDITION XF86-VIDMODE-CLIENT-NOT-LOCAL ...). ;;; Compiling (DEFINE-CONDITION XF86-VIDMODE-ZOOM-LOCKED ...). ;;; Compiling (DECLARE-EVENT :XFREE86-VIDMODE-NOTIFY ...). ;;; Compiling (DECLARE-EVENT :XFREE86-VIDMODE-NOTIFY ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 5361 ;;; at (DECLARE-EVENT XFREE86-VIDMODE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 5361 ;;; at (DECLARE-EVENT XFREE86-VIDMODE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 5361 ;;; at (DECLARE-EVENT XFREE86-VIDMODE-NOTIFY ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :XFREE86-VIDMODE-NOTIFY ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 5361 ;;; at (DECLARE-EVENT XFREE86-VIDMODE-NOTIFY ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFSTRUCT MODE-INFO ...). ;;; Compiling (DEFMACRO VIDMODE-OPCODE ...). ;;; Compiling (DEFUN SCREEN-POSITION ...). ;;; Compiling (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 6970 ;;; at (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 6970 ;;; at (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 6970 ;;; at (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 6970 ;;; at (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 6970 ;;; at (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...) ;;; Checking type of #:LET178 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-SET-CLIENT-VERSION ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 7513 ;;; at (DEFUN XFREE86-VIDMODE-SET-CLIENT-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 7513 ;;; at (DEFUN XFREE86-VIDMODE-SET-CLIENT-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 7513 ;;; at (DEFUN XFREE86-VIDMODE-SET-CLIENT-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 7775 ;;; at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 7775 ;;; at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 7775 ;;; at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 7775 ;;; at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 7775 ;;; at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 7775 ;;; at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...) ;;; Checking type of #:LET286 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 8101 ;;; at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...) ;;; Checking type of (XFREE86-VIDMODE-QUERY-VERSION DISPLAY) to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 8101 ;;; at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...) ;;; Checking type of (MODE-INFO->V-CARD16 MODE-LINE MAJOR) to be SIMPLE-VECTOR ;;; Note: ;;; in file XVIDMODE.LISP, position 8101 ;;; at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 8101 ;;; at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 8101 ;;; at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 8101 ;;; at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 8749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...) ;;; Checking type of #:LET345 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 8749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 8749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 8749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 8749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 8749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 8749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...) ;;; Checking type of #:LET409 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 10557 ;;; at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 10557 ;;; at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 10557 ;;; at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 10557 ;;; at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 10557 ;;; at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 10557 ;;; at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...) ;;; Checking type of #:LET500 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of (MODE-INFO-PRIVSIZE NEW) to be CARD32 ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of (XFREE86-VIDMODE-QUERY-VERSION DPY) to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of (MAKE-ARRAY (- (+ (* 2 I) (* 2 PRIVSIZE)) 2) :INITIAL-ELEMENT 0) to be SIMPLE-VECTOR ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of (- (* 2 I) 2) to be FIXNUM ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of #:LET554 to be CARD32 ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of #:LET555 to be LIST ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of (SI:CONS-CAR #:LOOP-LIST553) to be CARD32 ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST553) to be LIST ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of (+ I #:G568) to be FIXNUM ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Checking type of (+ I #:G570) to be FIXNUM ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 12844 ;;; at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 13983 ;;; at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...) ;;; Checking type of (XFREE86-VIDMODE-QUERY-VERSION DPY) to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 13983 ;;; at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...) ;;; Checking type of (MODE-INFO->V-CARD16 MODE-INFO MAJOR) to be SIMPLE-VECTOR ;;; Note: ;;; in file XVIDMODE.LISP, position 13983 ;;; at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 13983 ;;; at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 13983 ;;; at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 13983 ;;; at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DECODE-STATUS-MODE ...). ;;; Compiling (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 17055 ;;; at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...) ;;; Checking type of (XFREE86-VIDMODE-QUERY-VERSION DPY) to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 17055 ;;; at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...) ;;; Checking type of (MODE-INFO->V-CARD16 MODE-INFO MAJOR) to be SIMPLE-VECTOR ;;; Note: ;;; in file XVIDMODE.LISP, position 17055 ;;; at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 17055 ;;; at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 17055 ;;; at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 17055 ;;; at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 17055 ;;; at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 17055 ;;; at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...) ;;; Checking type of #:LET740 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-GAMMA ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 18001 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 18001 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 18001 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 18001 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 18001 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 18001 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...) ;;; Checking type of #:LET799 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-SET-GAMMA ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 18554 ;;; at (DEFUN XFREE86-VIDMODE-SET-GAMMA ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 18554 ;;; at (DEFUN XFREE86-VIDMODE-SET-GAMMA ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 18554 ;;; at (DEFUN XFREE86-VIDMODE-SET-GAMMA ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 18554 ;;; at (DEFUN XFREE86-VIDMODE-SET-GAMMA ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 19053 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 19053 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 19053 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 19053 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 19053 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 19053 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...) ;;; Checking type of #:LET927 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 20038 ;;; at (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 20038 ;;; at (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 20038 ;;; at (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 20038 ;;; at (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 20570 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 20570 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 20570 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 20570 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 20570 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 20570 ;;; at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...) ;;; Checking type of #:LET1039 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 20893 ;;; at (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 20893 ;;; at (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 20893 ;;; at (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 20893 ;;; at (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 21422 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...) ;;; Checking type of #:LET1100 to be BOOLEAN ;;; Note: ;;; in file XVIDMODE.LISP, position 21422 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...) ;;; Checking type of (MODE-INFO->V-CARD16 MODE-INFO MAJOR :ENCODE-PRIVATE BUG-P) to be SIMPLE-VECTOR ;;; Note: ;;; in file XVIDMODE.LISP, position 21422 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 21422 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 21422 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 21422 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 22659 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 22659 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 22659 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 22659 ;;; at (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 23108 ;;; at (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23108 ;;; at (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23108 ;;; at (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 23108 ;;; at (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 23424 ;;; at (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23424 ;;; at (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23424 ;;; at (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 23424 ;;; at (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-MONITOR ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Checking type of #:LET1378 to be REPLY-BUFFER ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 23749 ;;; at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 25332 ;;; at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 25332 ;;; at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 25332 ;;; at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 25332 ;;; at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 25332 ;;; at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 25332 ;;; at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...) ;;; Checking type of #:LET1455 to be REPLY-BUFFER ;;; Compiling (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 26390 ;;; at (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 26390 ;;; at (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 26390 ;;; at (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 26390 ;;; at (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 26865 ;;; at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 26865 ;;; at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XVIDMODE.LISP, position 26865 ;;; at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...) ;;; Inlining SCREEN-POSITION ;;; Note: ;;; in file XVIDMODE.LISP, position 26865 ;;; at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XVIDMODE.LISP, position 26865 ;;; at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XVIDMODE.LISP, position 26865 ;;; at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...) ;;; Checking type of #:LET1568 to be REPLY-BUFFER ;;; Compiling (DEFUN MODE-INFO->V-CARD16 ...). ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1570 to be CARD32 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1571 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1572 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1573 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1574 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1575 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1576 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1577 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1578 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1579 to be CARD16 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1580 to be CARD32 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1581 to be CARD32 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1582 to be (OR NULL SEQUENCE) ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of (+ (IF (< MAJOR 2) 14 22) (* PRIVSIZE 2)) to be FIXNUM ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of (OR DATA (MAKE-ARRAY SIZE :INITIAL-ELEMENT 0)) to be SIMPLE-VECTOR ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1723 to be INT32 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of #:LET1724 to be LIST ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of (SI:CONS-CAR #:LOOP-LIST1722) to be INT32 ;;; Note: ;;; in file XVIDMODE.LISP, position 27841 ;;; at (DEFUN MODE-INFO->V-CARD16 ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST1722) to be LIST ;;; Compiling (DEFUN __CARD32->CARD16__ ...). ;;; End of Pass 1. ;;; Emitting code for XFREE86-VIDMODE-NOTIFY-EVENT-GET-MACRO. ;;; Emitting code for XFREE86-VIDMODE-NOTIFY-EVENT-GET. ;;; Emitting code for XFREE86-VIDMODE-NOTIFY-EVENT-PUT. ;;; Emitting code for MAKE-MODE-INFO. ;;; Emitting code for VIDMODE-OPCODE. ;;; Emitting code for SCREEN-POSITION. ;;; Emitting code for XFREE86-VIDMODE-QUERY-VERSION. ;;; Emitting code for XFREE86-VIDMODE-SET-CLIENT-VERSION. ;;; Emitting code for XFREE86-VIDMODE-GET-PERMISSIONS. ;;; Emitting code for XFREE86-VIDMODE-MOD-MODE-LINE. ;;; Emitting code for XFREE86-VIDMODE-GET-MODE-LINE. ;;; Emitting code for XFREE86-VIDMODE-GET-ALL-MODE-LINES. ;;; Emitting code for XFREE86-VIDMODE-ADD-MODE-LINE. ;;; Emitting code for XFREE86-VIDMODE-DELETE-MODE-LINE. ;;; Emitting code for DECODE-STATUS-MODE. ;;; Emitting code for XFREE86-VIDMODE-VALIDATE-MODE-LINE. ;;; Emitting code for XFREE86-VIDMODE-GET-GAMMA. ;;; Emitting code for XFREE86-VIDMODE-SET-GAMMA. ;;; Emitting code for XFREE86-VIDMODE-GET-GAMMA-RAMP. ;;; Emitting code for XFREE86-VIDMODE-SET-GAMMA-RAMP. ;;; Emitting code for XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE. ;;; Emitting code for XFREE86-VIDMODE-LOCK-MODE-SWITCH. ;;; Emitting code for XFREE86-VIDMODE-SWITCH-TO-MODE. ;;; Emitting code for XFREE86-VIDMODE-SWITCH-MODE. ;;; Emitting code for XFREE86-VIDMODE-SELECT-NEXT-MODE. ;;; Emitting code for XFREE86-VIDMODE-SELECT-PREV-MODE. ;;; Emitting code for XFREE86-VIDMODE-GET-MONITOR. ;;; Emitting code for XFREE86-VIDMODE-GET-VIEWPORT. ;;; Emitting code for XFREE86-VIDMODE-SET-VIEWPORT. ;;; Emitting code for XFREE86-VIDMODE-GET-DOTCLOCKS. ;;; Emitting code for MODE-INFO->V-CARD16. ;;; Emitting code for __CARD32->CARD16__. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/xvidmode.c -o clx/xvidmode.o ;;; Finished compiling SRC:CLX;XVIDMODE.LISP. ;;; (compile-file "src:clx;xrender.lisp" :output-file #P"BUILD:CLX;XRENDER.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;XRENDER.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFSTRUCT RENDER-INFO ...). ;;; Compiling (DEFUN DISPLAY-RENDER-INFO ...). ;;; Compiling (DEFUN (SETF DISPLAY-RENDER-INFO) ...). ;;; Compiling (DEFUN ENSURE-RENDER-INITIALIZED ...). ;;; Compiling (DEFUN FIND-MATCHING-PICTURE-FORMATS ...). ;;; Compiling (DEFUN FIND-WINDOW-PICTURE-FORMAT ...). ;;; Compiling (DEFINE-ACCESSOR PICTURE ...). ;;; Compiling (DEFINE-ACCESSOR PICTURE ...). ;;; Compiling (DEFINE-ACCESSOR GLYPH-SET ...). ;;; Compiling (DEFINE-ACCESSOR GLYPH-SET ...). ;;; Compiling (DEFSTRUCT PICTURE-FORMAT ...). ;;; Compiling (DEFMETHOD PRINT-OBJECT ...). ;;; Compiling (DEFINE-ACCESSOR PICTURE-FORMAT ...). ;;; Compiling (DEFINE-ACCESSOR PICTURE-FORMAT ...). ;;; Compiling (DEFINE-ACCESSOR RENDER-OP ...). ;;; Compiling (DEFINE-ACCESSOR RENDER-OP ...). ;;; Compiling (DEF-CLX-CLASS (PICTURE #) ...). ;;; Compiling (DEFUN PICTURE-DRAWABLE ...). ;;; Compiling (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...). ;;; Note: ;;; in file XRENDER.LISP, position 16489 ;;; at (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 16489 ;;; at (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 16489 ;;; at (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 16489 ;;; at (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Note: ;;; in file XRENDER.LISP, position 17018 ;;; at (FOO (# REPEAT ...) ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 17018 ;;; at (FOO (# REPEAT ...) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 17018 ;;; at (FOO (# REPEAT ...) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 17018 ;;; at (FOO (# REPEAT ...) ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (FOO (# REPEAT ...) ...). ;;; Note: ;;; in file XRENDER.LISP, position 17018 ;;; at (FOO (# REPEAT ...) ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 17018 ;;; at (FOO (# REPEAT ...) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 17018 ;;; at (FOO (# REPEAT ...) ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 17018 ;;; at (FOO (# REPEAT ...) ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-FREE-PICTURE ...). ;;; Note: ;;; in file XRENDER.LISP, position 23265 ;;; at (DEFUN RENDER-FREE-PICTURE ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 23265 ;;; at (DEFUN RENDER-FREE-PICTURE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23265 ;;; at (DEFUN RENDER-FREE-PICTURE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23265 ;;; at (DEFUN RENDER-FREE-PICTURE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-FREE-GLYPH-SET ...). ;;; Note: ;;; in file XRENDER.LISP, position 23482 ;;; at (DEFUN RENDER-FREE-GLYPH-SET ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 23482 ;;; at (DEFUN RENDER-FREE-GLYPH-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23482 ;;; at (DEFUN RENDER-FREE-GLYPH-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23482 ;;; at (DEFUN RENDER-FREE-GLYPH-SET ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-QUERY-VERSION ...). ;;; Note: ;;; in file XRENDER.LISP, position 23712 ;;; at (DEFUN RENDER-QUERY-VERSION ...) ;;; Checking type of #:LET670 to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 23712 ;;; at (DEFUN RENDER-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23712 ;;; at (DEFUN RENDER-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23712 ;;; at (DEFUN RENDER-QUERY-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XRENDER.LISP, position 23712 ;;; at (DEFUN RENDER-QUERY-VERSION ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XRENDER.LISP, position 23712 ;;; at (DEFUN RENDER-QUERY-VERSION ...) ;;; Checking type of #:LET720 to be REPLY-BUFFER ;;; Compiling (DEFUN RENDER-QUERY-PICTURE-FORMATS ...). ;;; Note: ;;; in file XRENDER.LISP, position 23959 ;;; at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...) ;;; Checking type of #:LET722 to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 23959 ;;; at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23959 ;;; at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23959 ;;; at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XRENDER.LISP, position 23959 ;;; at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XRENDER.LISP, position 23959 ;;; at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...) ;;; Checking type of #:LET772 to be REPLY-BUFFER ;;; Note: ;;; in file XRENDER.LISP, position 23959 ;;; at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 23959 ;;; at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN RENDER-FILL-RECTANGLE ...). ;;; Note: ;;; in file XRENDER.LISP, position 25525 ;;; at (DEFUN RENDER-FILL-RECTANGLE ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 25525 ;;; at (DEFUN RENDER-FILL-RECTANGLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 25525 ;;; at (DEFUN RENDER-FILL-RECTANGLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 25525 ;;; at (DEFUN RENDER-FILL-RECTANGLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 25525 ;;; at (DEFUN RENDER-FILL-RECTANGLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 25525 ;;; at (DEFUN RENDER-FILL-RECTANGLE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-TRIANGLES-1 ...). ;;; Warning: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; ! Declaration of type ;;; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*)) ;;; was found for not bound variable COORD-SEQUENCE. ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 26178 ;;; at (DEFUN RENDER-TRIANGLES-1 ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-SET-PICTURE-TRANSFORM ...). ;;; Note: ;;; in file XRENDER.LISP, position 27537 ;;; at (DEFUN RENDER-SET-PICTURE-TRANSFORM ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 27537 ;;; at (DEFUN RENDER-SET-PICTURE-TRANSFORM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 27537 ;;; at (DEFUN RENDER-SET-PICTURE-TRANSFORM ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 27537 ;;; at (DEFUN RENDER-SET-PICTURE-TRANSFORM ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-QUERY-FILTERS ...). ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Checking type of #:LET1156 to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Checking type of #:LET1206 to be REPLY-BUFFER ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 28223 ;;; at (DEFUN RENDER-QUERY-FILTERS ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN RENDER-SET-FILTER ...). ;;; Note: ;;; in file XRENDER.LISP, position 30765 ;;; at (DEFUN RENDER-SET-FILTER ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 30765 ;;; at (DEFUN RENDER-SET-FILTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 30765 ;;; at (DEFUN RENDER-SET-FILTER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 30765 ;;; at (DEFUN RENDER-SET-FILTER ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-TRAPEZOIDS-1 ...). ;;; Note: ;;; in file XRENDER.LISP, position 31407 ;;; at (DEFUN RENDER-TRAPEZOIDS-1 ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 31407 ;;; at (DEFUN RENDER-TRAPEZOIDS-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 31407 ;;; at (DEFUN RENDER-TRAPEZOIDS-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 31407 ;;; at (DEFUN RENDER-TRAPEZOIDS-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 31407 ;;; at (DEFUN RENDER-TRAPEZOIDS-1 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 31407 ;;; at (DEFUN RENDER-TRAPEZOIDS-1 ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-COMPOSITE ...). ;;; Note: ;;; in file XRENDER.LISP, position 32257 ;;; at (DEFUN RENDER-COMPOSITE ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 32257 ;;; at (DEFUN RENDER-COMPOSITE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 32257 ;;; at (DEFUN RENDER-COMPOSITE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 32257 ;;; at (DEFUN RENDER-COMPOSITE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 32257 ;;; at (DEFUN RENDER-COMPOSITE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 32257 ;;; at (DEFUN RENDER-COMPOSITE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEF-CLX-CLASS (GLYPH-SET #) ...). ;;; Compiling (DEFUN RENDER-CREATE-GLYPH-SET ...). ;;; Note: ;;; in file XRENDER.LISP, position 33341 ;;; at (DEFUN RENDER-CREATE-GLYPH-SET ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 33341 ;;; at (DEFUN RENDER-CREATE-GLYPH-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 33341 ;;; at (DEFUN RENDER-CREATE-GLYPH-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 33341 ;;; at (DEFUN RENDER-CREATE-GLYPH-SET ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-REFERENCE-GLYPH-SET ...). ;;; Note: ;;; in file XRENDER.LISP, position 33920 ;;; at (DEFUN RENDER-REFERENCE-GLYPH-SET ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 33920 ;;; at (DEFUN RENDER-REFERENCE-GLYPH-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 33920 ;;; at (DEFUN RENDER-REFERENCE-GLYPH-SET ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 33920 ;;; at (DEFUN RENDER-REFERENCE-GLYPH-SET ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...). ;;; Note: ;;; in file XRENDER.LISP, position 34574 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 34574 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 34574 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 34574 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 34574 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 34574 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 34574 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 34574 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFMACRO %RENDER-COMPOSITE-GLYPHS ...). ;;; Compiling (DEFUN RENDER-COMPOSITE-GLYPHS ...). ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 38441 ;;; at (DEFUN RENDER-COMPOSITE-GLYPHS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-ADD-GLYPH ...). ;;; Note: ;;; in file XRENDER.LISP, position 41604 ;;; at (DEFUN RENDER-ADD-GLYPH ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 41604 ;;; at (DEFUN RENDER-ADD-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 41604 ;;; at (DEFUN RENDER-ADD-GLYPH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 41604 ;;; at (DEFUN RENDER-ADD-GLYPH ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...). ;;; Note: ;;; in file XRENDER.LISP, position 43136 ;;; at (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 43136 ;;; at (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 43136 ;;; at (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 43136 ;;; at (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-FREE-GLYPHS ...). ;;; Note: ;;; in file XRENDER.LISP, position 43977 ;;; at (DEFUN RENDER-FREE-GLYPHS ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 43977 ;;; at (DEFUN RENDER-FREE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 43977 ;;; at (DEFUN RENDER-FREE-GLYPHS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 43977 ;;; at (DEFUN RENDER-FREE-GLYPHS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN RENDER-CREATE-CURSOR ...). ;;; Note: ;;; in file XRENDER.LISP, position 50947 ;;; at (DEFUN RENDER-CREATE-CURSOR ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file XRENDER.LISP, position 50947 ;;; at (DEFUN RENDER-CREATE-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 50947 ;;; at (DEFUN RENDER-CREATE-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XRENDER.LISP, position 50947 ;;; at (DEFUN RENDER-CREATE-CURSOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; End of Pass 1. ;;; Emitting code for MAKE-RENDER-INFO. ;;; Emitting code for DISPLAY-RENDER-INFO. ;;; Emitting code for (SETF DISPLAY-RENDER-INFO). ;;; Emitting code for ENSURE-RENDER-INITIALIZED. ;;; Emitting code for FIND-MATCHING-PICTURE-FORMATS. ;;; Emitting code for #:G20. ;;; Emitting code for FIND-WINDOW-PICTURE-FORMAT. ;;; Emitting code for #:G24. ;;; Emitting code for PICTURE-GET. ;;; Emitting code for PICTURE-PUT. ;;; Emitting code for GLYPH-SET-GET. ;;; Emitting code for GLYPH-SET-PUT. ;;; Emitting code for MAKE-PICTURE-FORMAT. ;;; Emitting code for #:G66. ;;; Emitting code for #:G67. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for PICTURE-FORMAT-GET. ;;; Emitting code for PICTURE-FORMAT-PUT. ;;; Emitting code for RENDER-OP-GET. ;;; Emitting code for RENDER-OP-PUT. ;;; Emitting code for MAKE-PICTURE. ;;; Emitting code for PICTURE-DRAWABLE. ;;; Emitting code for %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES. ;;; Emitting code for PICTURE-REPEAT. ;;; Emitting code for (SETF PICTURE-REPEAT). ;;; Emitting code for PICTURE-ALPHA-MAP. ;;; Emitting code for (SETF PICTURE-ALPHA-MAP). ;;; Emitting code for PICTURE-ALPHA-X-ORIGIN. ;;; Emitting code for (SETF PICTURE-ALPHA-X-ORIGIN). ;;; Emitting code for PICTURE-ALPHA-Y-ORIGIN. ;;; Emitting code for (SETF PICTURE-ALPHA-Y-ORIGIN). ;;; Emitting code for PICTURE-CLIP-X-ORIGIN. ;;; Emitting code for (SETF PICTURE-CLIP-X-ORIGIN). ;;; Emitting code for PICTURE-CLIP-Y-ORIGIN. ;;; Emitting code for (SETF PICTURE-CLIP-Y-ORIGIN). ;;; Emitting code for PICTURE-CLIP-MASK. ;;; Emitting code for (SETF PICTURE-CLIP-MASK). ;;; Emitting code for PICTURE-GRAPHICS-EXPOSURES. ;;; Emitting code for (SETF PICTURE-GRAPHICS-EXPOSURES). ;;; Emitting code for PICTURE-SUBWINDOW-MODE. ;;; Emitting code for (SETF PICTURE-SUBWINDOW-MODE). ;;; Emitting code for PICTURE-POLY-EDGE. ;;; Emitting code for (SETF PICTURE-POLY-EDGE). ;;; Emitting code for PICTURE-POLY-MODE. ;;; Emitting code for (SETF PICTURE-POLY-MODE). ;;; Emitting code for PICTURE-DITHER. ;;; Emitting code for (SETF PICTURE-DITHER). ;;; Emitting code for PICTURE-COMPONENT-ALPHA. ;;; Emitting code for (SETF PICTURE-COMPONENT-ALPHA). ;;; Emitting code for SYNCHRONISE-PICTURE-STATE. ;;; Emitting code for RENDER-CREATE-PICTURE. ;;; Emitting code for RENDER-FREE-PICTURE. ;;; Emitting code for RENDER-FREE-GLYPH-SET. ;;; Emitting code for RENDER-QUERY-VERSION. ;;; Emitting code for RENDER-QUERY-PICTURE-FORMATS. ;;; Emitting code for RENDER-FILL-RECTANGLE. ;;; Emitting code for RENDER-TRIANGLES-1. ;;; Emitting code for RENDER-SET-PICTURE-TRANSFORM. ;;; Emitting code for RENDER-QUERY-FILTERS. ;;; Emitting code for GRAB-STRING. ;;; Emitting code for RENDER-SET-FILTER. ;;; Emitting code for RENDER-TRAPEZOIDS-1. ;;; Emitting code for RENDER-COMPOSITE. ;;; Emitting code for MAKE-GLYPH-SET. ;;; Emitting code for RENDER-CREATE-GLYPH-SET. ;;; Emitting code for RENDER-REFERENCE-GLYPH-SET. ;;; Emitting code for RENDER-COMPOSITE-GLYPHS-8. ;;; Emitting code for %RENDER-COMPOSITE-GLYPHS. ;;; Emitting code for RENDER-COMPOSITE-GLYPHS. ;;; Emitting code for #:G2606. ;;; Emitting code for #:G2641. ;;; Emitting code for RENDER-ADD-GLYPH. ;;; Emitting code for RENDER-ADD-GLYPH-FROM-PICTURE. ;;; Emitting code for RENDER-FREE-GLYPHS. ;;; Emitting code for RENDER-CREATE-CURSOR. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/xrender.c -o clx/xrender.o ;;; Finished compiling SRC:CLX;XRENDER.LISP. ;;; (compile-file "src:clx;glx.lisp" :output-file #P"BUILD:CLX;GLX.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;GLX.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEF-CLX-CLASS (CONTEXT # ...) ...). ;;; Compiling (DEFUN PRINT-CONTEXT ...). ;;; Note: ;;; in file GLX.LISP, position 6640 ;;; at (DEFUN PRINT-CONTEXT ...) ;;; In function PRINT-CONTEXT, checking types of arguments CTX. ;;; Note: ;;; in file GLX.LISP, position 6640 ;;; at (DEFUN PRINT-CONTEXT ...) ;;; Checking type of CTX to be CONTEXT ;;; Compiling (DEF-CLX-CLASS (VISUAL # ...) ...). ;;; Compiling (DEFUN PRINT-VISUAL ...). ;;; Note: ;;; in file GLX.LISP, position 7112 ;;; at (DEFUN PRINT-VISUAL ...) ;;; In function PRINT-VISUAL, checking types of arguments VISUAL. ;;; Note: ;;; in file GLX.LISP, position 7112 ;;; at (DEFUN PRINT-VISUAL ...) ;;; Checking type of VISUAL to be VISUAL ;;; Compiling (DECLARE-EVENT :GLX-PBUFFER-CLOBBER ...). ;;; Compiling (DECLARE-EVENT :GLX-PBUFFER-CLOBBER ...). ;;; Note: ;;; in file GLX.LISP, position 7553 ;;; at (DECLARE-EVENT GLX-PBUFFER-CLOBBER ...) ;;; In function GLX-PBUFFER-CLOBBER-EVENT-GET, checking types of arguments HANDLER EVENT DISPLAY. ;;; Note: ;;; in file GLX.LISP, position 7553 ;;; at (DECLARE-EVENT GLX-PBUFFER-CLOBBER ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 7553 ;;; at (DECLARE-EVENT GLX-PBUFFER-CLOBBER ...) ;;; Checking type of EVENT to be REPLY-BUFFER ;;; Note: ;;; in file GLX.LISP, position 7553 ;;; at (DECLARE-EVENT GLX-PBUFFER-CLOBBER ...) ;;; Checking type of HANDLER to be FUNCTION ;;; Note: ;;; in file GLX.LISP, position 7553 ;;; at (DECLARE-EVENT GLX-PBUFFER-CLOBBER ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file GLX.LISP, position 7553 ;;; at (DECLARE-EVENT GLX-PBUFFER-CLOBBER ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DECLARE-EVENT :GLX-PBUFFER-CLOBBER ...). ;;; Note: ;;; in file GLX.LISP, position 7553 ;;; at (DECLARE-EVENT GLX-PBUFFER-CLOBBER ...) ;;; In function GLX-PBUFFER-CLOBBER-EVENT-PUT, checking types of arguments DISPLAY. ;;; Note: ;;; in file GLX.LISP, position 7553 ;;; at (DECLARE-EVENT GLX-PBUFFER-CLOBBER ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Compiling (DEFINE-CONDITION BAD-CONTEXT ...). ;;; Compiling (DEFINE-CONDITION BAD-CONTEXT-STATE ...). ;;; Compiling (DEFINE-CONDITION BAD-DRAWABLE ...). ;;; Compiling (DEFINE-CONDITION BAD-PIXMAP ...). ;;; Compiling (DEFINE-CONDITION BAD-CONTEXT-TAG ...). ;;; Compiling (DEFINE-CONDITION BAD-CURRENT-WINDOW ...). ;;; Compiling (DEFINE-CONDITION BAD-RENDER-REQUEST ...). ;;; Compiling (DEFINE-CONDITION BAD-LARGE-REQUEST ...). ;;; Compiling (DEFINE-CONDITION UNSUPPORTED-PRIVATE-REQUEST ...). ;;; Compiling (DEFINE-CONDITION BAD-FB-CONFIG ...). ;;; Compiling (DEFINE-CONDITION BAD-PBUFFER ...). ;;; Compiling (DEFINE-CONDITION BAD-CURRENT-DRAWABLE ...). ;;; Compiling (DEFINE-CONDITION BAD-WINDOW ...). ;;; Compiling (DEFUN QUERY-VERSION ...). ;;; Note: ;;; in file GLX.LISP, position 9227 ;;; at (DEFUN QUERY-VERSION ...) ;;; Checking type of #:LET100 to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 9227 ;;; at (DEFUN QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 9227 ;;; at (DEFUN QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 9227 ;;; at (DEFUN QUERY-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GLX.LISP, position 9227 ;;; at (DEFUN QUERY-VERSION ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GLX.LISP, position 9227 ;;; at (DEFUN QUERY-VERSION ...) ;;; Checking type of #:LET150 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN QUERY-SERVER-STRING ...). ;;; Note: ;;; in file GLX.LISP, position 9456 ;;; at (DEFUN QUERY-SERVER-STRING ...) ;;; Checking type of #:LET152 to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 9456 ;;; at (DEFUN QUERY-SERVER-STRING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 9456 ;;; at (DEFUN QUERY-SERVER-STRING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 9456 ;;; at (DEFUN QUERY-SERVER-STRING ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GLX.LISP, position 9456 ;;; at (DEFUN QUERY-SERVER-STRING ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GLX.LISP, position 9456 ;;; at (DEFUN QUERY-SERVER-STRING ...) ;;; Checking type of #:LET212 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN CLIENT-INFO ...). ;;; Note: ;;; in file GLX.LISP, position 10169 ;;; at (DEFUN CLIENT-INFO ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 10169 ;;; at (DEFUN CLIENT-INFO ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 10169 ;;; at (DEFUN CLIENT-INFO ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 10169 ;;; at (DEFUN CLIENT-INFO ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN MAKE-CONTEXT ...). ;;; Compiling (DEFUN CREATE-CONTEXT ...). ;;; Note: ;;; in file GLX.LISP, position 10933 ;;; at (DEFUN CREATE-CONTEXT ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 10933 ;;; at (DEFUN CREATE-CONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 10933 ;;; at (DEFUN CREATE-CONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 10933 ;;; at (DEFUN CREATE-CONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 10933 ;;; at (DEFUN CREATE-CONTEXT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFVAR *CURRENT-CONTEXT* ...). ;;; Compiling (DEFUN DESTROY-CONTEXT ...). ;;; Note: ;;; in file GLX.LISP, position 11673 ;;; at (DEFUN DESTROY-CONTEXT ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 11673 ;;; at (DEFUN DESTROY-CONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 11673 ;;; at (DEFUN DESTROY-CONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 11673 ;;; at (DEFUN DESTROY-CONTEXT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN IS-DIRECT ...). ;;; Note: ;;; in file GLX.LISP, position 12052 ;;; at (DEFUN IS-DIRECT ...) ;;; Checking type of #:LET417 to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 12052 ;;; at (DEFUN IS-DIRECT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 12052 ;;; at (DEFUN IS-DIRECT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 12052 ;;; at (DEFUN IS-DIRECT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GLX.LISP, position 12052 ;;; at (DEFUN IS-DIRECT ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GLX.LISP, position 12052 ;;; at (DEFUN IS-DIRECT ...) ;;; Checking type of #:LET472 to be XLIB::REPLY-BUFFER ;;; Note: ;;; in file GLX.LISP, position 12052 ;;; at (DEFUN IS-DIRECT ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN QUERY-CONTEXT ...). ;;; Note: ;;; in file GLX.LISP, position 12292 ;;; at (DEFUN QUERY-CONTEXT ...) ;;; Checking type of #:LET476 to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 12292 ;;; at (DEFUN QUERY-CONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 12292 ;;; at (DEFUN QUERY-CONTEXT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 12292 ;;; at (DEFUN QUERY-CONTEXT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GLX.LISP, position 12292 ;;; at (DEFUN QUERY-CONTEXT ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GLX.LISP, position 12292 ;;; at (DEFUN QUERY-CONTEXT ...) ;;; Checking type of #:LET531 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN GET-DRAWABLE-ATTRIBUTES ...). ;;; Note: ;;; in file GLX.LISP, position 12871 ;;; at (DEFUN GET-DRAWABLE-ATTRIBUTES ...) ;;; Checking type of #:LET542 to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 12871 ;;; at (DEFUN GET-DRAWABLE-ATTRIBUTES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 12871 ;;; at (DEFUN GET-DRAWABLE-ATTRIBUTES ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 12871 ;;; at (DEFUN GET-DRAWABLE-ATTRIBUTES ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GLX.LISP, position 12871 ;;; at (DEFUN GET-DRAWABLE-ATTRIBUTES ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GLX.LISP, position 12871 ;;; at (DEFUN GET-DRAWABLE-ATTRIBUTES ...) ;;; Checking type of #:LET592 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN MAKE-CURRENT ...). ;;; Note: ;;; in file GLX.LISP, position 13732 ;;; at (DEFUN MAKE-CURRENT ...) ;;; Checking type of #:LET605 to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 13732 ;;; at (DEFUN MAKE-CURRENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 13732 ;;; at (DEFUN MAKE-CURRENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 13732 ;;; at (DEFUN MAKE-CURRENT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GLX.LISP, position 13732 ;;; at (DEFUN MAKE-CURRENT ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GLX.LISP, position 13732 ;;; at (DEFUN MAKE-CURRENT ...) ;;; Checking type of #:LET670 to be XLIB::REPLY-BUFFER ;;; Compiling (GENERATE-CONFIG-PROPERTIES). ;;; Note: ;;; in file GLX.LISP, position 14423 ;;; at (GENERATE-CONFIG-PROPERTIES) ;;; Checking type of (MAP 'VECTOR #'CAR '((:GLX-VISUAL VISUAL-ID) (:GLX-CLASS CARD32) (:GLX-RGBA BOOL32) (:GLX-RED-SIZE CARD32) (:GLX-GREEN-SIZE CARD32) (:GLX-BLUE-SIZE CARD32) (:GLX-ALPHA-SIZE CARD32) (:GLX-ACCUM-RED-SIZE CARD32) (:GLX-ACCUM-GREEN-SIZE CARD32) (:GLX-ACCUM-BLUE-SIZE CARD32) (:GLX-ACCUM-ALPHA-SIZE CARD32) (:GLX-DOUBLE-BUFFER BOOL32) (:GLX-STEREO BOOL32) (:GLX-BUFFER-SIZE CARD32) (:GLX-DEPTH-SIZE CARD32) (:GLX-STENCIL-SIZE CARD32) (:GLX-AUX-BUFFERS CARD32) (:GLX-LEVEL INT32))) to be SIMPLE-VECTOR ;;; Compiling (DEFUN MAKE-VISUAL ...). ;;; Compiling (DEFUN VISUAL-ATTRIBUTE ...). ;;; Compiling (DEFUN GET-VISUAL-CONFIGS ...). ;;; Note: ;;; in file GLX.LISP, position 16717 ;;; at (DEFUN GET-VISUAL-CONFIGS ...) ;;; Checking type of #:LET761 to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 16717 ;;; at (DEFUN GET-VISUAL-CONFIGS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 16717 ;;; at (DEFUN GET-VISUAL-CONFIGS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 16717 ;;; at (DEFUN GET-VISUAL-CONFIGS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GLX.LISP, position 16717 ;;; at (DEFUN GET-VISUAL-CONFIGS ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GLX.LISP, position 16717 ;;; at (DEFUN GET-VISUAL-CONFIGS ...) ;;; Checking type of #:LET816 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN CHOOSE-VISUAL ...). ;;; Note: ;;; in file GLX.LISP, position 17986 ;;; at (DEFUN CHOOSE-VISUAL ...) ;;; Checking type of #:LET843 to be LIST ;;; Note: ;;; in file GLX.LISP, position 17986 ;;; at (DEFUN CHOOSE-VISUAL ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST839) to be LIST ;;; Compiling (DEFUN RENDER ...). ;;; Note: ;;; in file GLX.LISP, position 19753 ;;; at (DEFUN RENDER ...) ;;; Checking type of (CONTEXT-RBUF CTX) to be BUFFER-BYTES ;;; Note: ;;; in file GLX.LISP, position 19753 ;;; at (DEFUN RENDER ...) ;;; Checking type of (CONTEXT-INDEX CTX) to be ARRAY-INDEX ;;; Note: ;;; in file GLX.LISP, position 19753 ;;; at (DEFUN RENDER ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 19753 ;;; at (DEFUN RENDER ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFUN SWAP-BUFFERS ...). ;;; Note: ;;; in file GLX.LISP, position 20744 ;;; at (DEFUN SWAP-BUFFERS ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 20744 ;;; at (DEFUN SWAP-BUFFERS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 20744 ;;; at (DEFUN SWAP-BUFFERS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 20744 ;;; at (DEFUN SWAP-BUFFERS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN WAIT-GL ...). ;;; Note: ;;; in file GLX.LISP, position 21460 ;;; at (DEFUN WAIT-GL ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 21460 ;;; at (DEFUN WAIT-GL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 21460 ;;; at (DEFUN WAIT-GL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 21460 ;;; at (DEFUN WAIT-GL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN WAIT-X ...). ;;; Note: ;;; in file GLX.LISP, position 21830 ;;; at (DEFUN WAIT-X ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GLX.LISP, position 21830 ;;; at (DEFUN WAIT-X ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 21830 ;;; at (DEFUN WAIT-X ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GLX.LISP, position 21830 ;;; at (DEFUN WAIT-X ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; End of Pass 1. ;;; Emitting code for ATTRIBUTE-PAIR. ;;; Emitting code for GLX-RENDER-COMMAND. ;;; Emitting code for %MAKE-CONTEXT. ;;; Emitting code for PRINT-CONTEXT. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for %MAKE-VISUAL. ;;; Emitting code for PRINT-VISUAL. ;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY.. ;;; Emitting code for XLIB::GLX-PBUFFER-CLOBBER-EVENT-GET-MACRO. ;;; Emitting code for XLIB::GLX-PBUFFER-CLOBBER-EVENT-GET. ;;; Emitting code for XLIB::GLX-PBUFFER-CLOBBER-EVENT-PUT. ;;; Emitting code for QUERY-VERSION. ;;; Emitting code for QUERY-SERVER-STRING. ;;; Emitting code for CLIENT-INFO. ;;; Emitting code for MAKE-CONTEXT. ;;; Emitting code for CREATE-CONTEXT. ;;; Emitting code for DESTROY-CONTEXT. ;;; Emitting code for IS-DIRECT. ;;; Emitting code for QUERY-CONTEXT. ;;; Emitting code for GET-DRAWABLE-ATTRIBUTES. ;;; Emitting code for MAKE-CURRENT. ;;; Emitting code for MAKE-VISUAL. ;;; Emitting code for VISUAL-ATTRIBUTE. ;;; Emitting code for GET-VISUAL-CONFIGS. ;;; Emitting code for #:G823. ;;; Emitting code for CHOOSE-VISUAL. ;;; Emitting code for VISUAL-MATCHES-P. ;;; Emitting code for RENDER. ;;; Emitting code for SWAP-BUFFERS. ;;; Emitting code for WAIT-GL. ;;; Emitting code for WAIT-X. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/glx.c -o clx/glx.o ;;; Finished compiling SRC:CLX;GLX.LISP. ;;; (compile-file "src:clx;gl.lisp" :output-file #P"BUILD:CLX;GL.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;GL.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN BYTE-WIDTH ...). ;;; Compiling (DEFUN SETTER ...). ;;; Compiling (DEFUN SEQUENCE-SETTER ...). ;;; Compiling (DEFMACRO DEFINE-SEQUENCE-SETTER ...). ;;; Compiling (DEFINE-SEQUENCE-SETTER INT8). ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER INT8) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER INT8) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER INT8) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER INT8) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER INT8) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER INT8) ;;; Inlining INT8->CARD8 ;;; Compiling (DEFINE-SEQUENCE-SETTER INT16). ;;; Compiling (DEFINE-SEQUENCE-SETTER INT32). ;;; Compiling (DEFINE-SEQUENCE-SETTER BOOL). ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER BOOL) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER BOOL) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER BOOL) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-SEQUENCE-SETTER CARD8). ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER CARD8) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER CARD8) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFINE-SEQUENCE-SETTER CARD8) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-SEQUENCE-SETTER CARD16). ;;; Compiling (DEFINE-SEQUENCE-SETTER CARD32). ;;; Compiling (DEFINE-SEQUENCE-SETTER FLOAT32). ;;; Compiling (DEFINE-SEQUENCE-SETTER FLOAT64). ;;; Compiling (DEFUN MAKE-ARGSPECS ...). ;;; Compiling (DEFUN BYTE-WIDTH-CALCULATION ...). ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFUN BYTE-WIDTH-CALCULATION ...) ;;; Checking type of #:LET405 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFUN BYTE-WIDTH-CALCULATION ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST400) to be LIST ;;; Compiling (DEFUN COMPOSITE-ARGS ...). ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFUN COMPOSITE-ARGS ...) ;;; Checking type of #:LET424 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFUN COMPOSITE-ARGS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST417) to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFUN COMPOSITE-ARGS ...) ;;; Checking type of #:LOOP-LIST-TAIL419 to be CONS ;;; Compiling (DEFUN MAKE-SETTER-FORMS ...). ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFUN MAKE-SETTER-FORMS ...) ;;; Checking type of #:LET438 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFUN MAKE-SETTER-FORMS ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST431) to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (DEFUN MAKE-SETTER-FORMS ...) ;;; Checking type of #:LOOP-LIST-TAIL433 to be CONS ;;; Compiling (DEFMACRO DEFINE-RENDERING-COMMAND ...). ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LET516 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST511) to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LET523 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST519) to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LOOP-LIST-TAIL521 to be CONS ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:G517 to be CONS ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LOOP-LIST-TAIL513 to be CONS ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LET530 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST526) to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LOOP-LIST-TAIL528 to be CONS ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LET537 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST533) to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LOOP-LIST-TAIL535 to be CONS ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LET545 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST540) to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LOOP-LIST-TAIL542 to be CONS ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LET553 to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of (SI:CONS-CDR #:LOOP-LIST548) to be LIST ;;; Note: ;;; in file GL.LISP, position 78239 ;;; at (FSET 'DEFINE-RENDERING-COMMAND ...) ;;; Checking type of #:LOOP-LIST-TAIL550 to be CONS ;;; Compiling (DEFUN GET-STRING ...). ;;; Note: ;;; in file GL.LISP, position 84431 ;;; at (DEFUN GET-STRING ...) ;;; Checking type of #:LET557 to be DISPLAY ;;; Note: ;;; in file GL.LISP, position 84431 ;;; at (DEFUN GET-STRING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 84431 ;;; at (DEFUN GET-STRING ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 84431 ;;; at (DEFUN GET-STRING ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GL.LISP, position 84431 ;;; at (DEFUN GET-STRING ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GL.LISP, position 84431 ;;; at (DEFUN GET-STRING ...) ;;; Checking type of #:LET617 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFINE-RENDERING-COMMAND ACCUM ...). ;;; Compiling (DEFINE-RENDERING-COMMAND ACTIVE-TEXTURE-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND ALPHA-FUNC ...). ;;; Compiling (DEFINE-RENDERING-COMMAND BEGIN ...). ;;; Compiling (DEFINE-RENDERING-COMMAND BIND-TEXTURE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND BLEND-COLOR ...). ;;; Compiling (DEFINE-RENDERING-COMMAND BLEND-EQUOTION ...). ;;; Compiling (DEFINE-RENDERING-COMMAND BLEND-FUNC ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CALL-LIST ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CLEAR ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CLEAR-ACCUM ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CLEAR-COLOR ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CLEAR-DEPTH ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CLEAR-INDEX ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CLEAR-STENCIL ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CLIP-PLANE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-3B ...). ;;; Note: ;;; in file GL.LISP, position 87093 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 87093 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3B ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 87093 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 87093 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3B ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 87093 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 87093 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3B ...) ;;; Inlining INT8->CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-3D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-3F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-3I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-3S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-3UB ...). ;;; Note: ;;; in file GL.LISP, position 87408 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3UB ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 87408 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3UB ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 87408 ;;; at (DEFINE-RENDERING-COMMAND COLOR-3UB ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-3UI ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-3US ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-4B ...). ;;; Note: ;;; in file GL.LISP, position 87602 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 87602 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4B ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 87602 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 87602 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4B ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 87602 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 87602 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4B ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 87602 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 87602 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4B ...) ;;; Inlining INT8->CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-4D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-4F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-4I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-4S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-4UB ...). ;;; Note: ;;; in file GL.LISP, position 87921 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4UB ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 87921 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4UB ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 87921 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4UB ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 87921 ;;; at (DEFINE-RENDERING-COMMAND COLOR-4UB ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-4UI ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-4US ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-MASK ...). ;;; Note: ;;; in file GL.LISP, position 88115 ;;; at (DEFINE-RENDERING-COMMAND COLOR-MASK ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 88115 ;;; at (DEFINE-RENDERING-COMMAND COLOR-MASK ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 88115 ;;; at (DEFINE-RENDERING-COMMAND COLOR-MASK ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 88115 ;;; at (DEFINE-RENDERING-COMMAND COLOR-MASK ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-MATERIAL ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-TABLE-PARAMETER-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COLOR-TABLE-PARAMETER-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CONVOLUTION-PARAMETER-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CONVOLUTION-PARAMETER-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CONVOLUTION-PARAMETER-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CONVOLUTION-PARAMETER-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-COLOR-SUB-TABLE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-COLOR-TABLE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-CONVOLUTION-FILTER-ID ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-CONVOLUTION-FILTER-2D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-PIXELS ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-TEX-IMAGE-1D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-TEX-IMAGE-2D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-TEX-SUB-IMAGE-1D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-TEX-SUB-IMAGE-2D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND COPY-TEX-SUB-IMAGE-3D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND CULL-FACE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND DEPTH-FUNC ...). ;;; Compiling (DEFINE-RENDERING-COMMAND DEPTH-MASK ...). ;;; Note: ;;; in file GL.LISP, position 93241 ;;; at (DEFINE-RENDERING-COMMAND DEPTH-MASK ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND DEPTH-RANGE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND DRAW-BUFFER ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EDGE-FLAG-V ...). ;;; Note: ;;; in file GL.LISP, position 93485 ;;; at (DEFINE-RENDERING-COMMAND EDGE-FLAG-V ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND END ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EVAL-COORD-1D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EVAL-COORD-1F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EVAL-COORD-2D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EVAL-COORD-2F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EVAL-MESH-1 ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EVAL-MESH-2 ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EVAL-POINT-1 ...). ;;; Compiling (DEFINE-RENDERING-COMMAND EVAL-POINT-2 ...). ;;; Compiling (DEFINE-RENDERING-COMMAND FOG-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND FOG-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND FOG-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND FOG-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND FRONT-FACE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND FRUSTUM ...). ;;; Compiling (DEFINE-RENDERING-COMMAND HINT ...). ;;; Compiling (DEFINE-RENDERING-COMMAND HISTOGRAM ...). ;;; Note: ;;; in file GL.LISP, position 95783 ;;; at (DEFINE-RENDERING-COMMAND HISTOGRAM ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND INDEX-MASK ...). ;;; Compiling (DEFINE-RENDERING-COMMAND INDEX-D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND INDEX-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND INDEX-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND INDEX-S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND INDEX-UB ...). ;;; Note: ;;; in file GL.LISP, position 96271 ;;; at (DEFINE-RENDERING-COMMAND INDEX-UB ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND INIT-NAMES ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIGHT-MODEL-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIGHT-MODEL-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIGHT-MODEL-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIGHT-MODEL-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIGHT-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIGHT-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIGHT-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIGHT-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LINE-STIPPLE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LINE-WIDTH ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LIST-BASE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LOAD-IDENTITY ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LOAD-MATRIX-D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LOAD-MATRIX-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LOAD-NAME ...). ;;; Compiling (DEFINE-RENDERING-COMMAND LOGIC-OP ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MAP-GRID-1D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MAP-GRID-1F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MAP-GRID-2D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MAP-GRID-2F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MATERIAL-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MATERIAL-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MATERIAL-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MATERIAL-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MATRIX-MODE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MINMAX ...). ;;; Note: ;;; in file GL.LISP, position 102097 ;;; at (DEFINE-RENDERING-COMMAND MINMAX ...) ;;; Inlining ASET-CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND MULT-MATRIX-D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULT-MATRIX-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-1D-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-1F-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-1I-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-1S-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-2D-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-2F-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-2I-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-2S-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-3D-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-3F-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-3I-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-3S-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-4D-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-4F-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-4I-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND MULTI-TEX-COORD-4S-ARB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND NORMAL-3B ...). ;;; Note: ;;; in file GL.LISP, position 104364 ;;; at (DEFINE-RENDERING-COMMAND NORMAL-3B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 104364 ;;; at (DEFINE-RENDERING-COMMAND NORMAL-3B ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 104364 ;;; at (DEFINE-RENDERING-COMMAND NORMAL-3B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 104364 ;;; at (DEFINE-RENDERING-COMMAND NORMAL-3B ...) ;;; Inlining INT8->CARD8 ;;; Note: ;;; in file GL.LISP, position 104364 ;;; at (DEFINE-RENDERING-COMMAND NORMAL-3B ...) ;;; Inlining ASET-INT8 ;;; Note: ;;; in file GL.LISP, position 104364 ;;; at (DEFINE-RENDERING-COMMAND NORMAL-3B ...) ;;; Inlining INT8->CARD8 ;;; Compiling (DEFINE-RENDERING-COMMAND NORMAL-3D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND NORMAL-3F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND NORMAL-3I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND NORMAL-3S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND ORTHO ...). ;;; Compiling (DEFINE-RENDERING-COMMAND PASS-THROUGH ...). ;;; Compiling (DEFINE-RENDERING-COMMAND PIXEL-TRANSFER-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND PIXEL-TRANSFER-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND PIXEL-ZOOM ...). ;;; Compiling (DEFINE-RENDERING-COMMAND POINT-SIZE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND POLYGON-MODE ...). ;;; Compiling (DEFINE-RENDERING-COMMAND POLYGON-OFFSET ...). ;;; Compiling (DEFINE-RENDERING-COMMAND POP-ATTRIB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND POP-MATRIX ...). ;;; Compiling (DEFINE-RENDERING-COMMAND POP-NAME ...). ;;; Compiling (DEFINE-RENDERING-COMMAND PRIORITIZE-TEXTURES ...). ;;; Compiling (DEFINE-RENDERING-COMMAND PUSH-ATTRIB ...). ;;; Compiling (DEFINE-RENDERING-COMMAND PUSH-MATRIX ...). ;;; Compiling (DEFINE-RENDERING-COMMAND PUSH-NAME ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-2D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-2F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-2I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-2S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-3D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-3F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-3I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-3S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-4D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-4F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-4I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RASTER-POS-4S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND READ-BUFFER ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RECT-D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RECT-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RECT-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RECT-S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RESET-HISTOGRAM ...). ;;; Compiling (DEFINE-RENDERING-COMMAND RESET-MINMAX ...). ;;; Compiling (DEFINE-RENDERING-COMMAND ROTATE-D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND ROTATE-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND SCALE-D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND SCALE-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND SCISSOR ...). ;;; Compiling (DEFINE-RENDERING-COMMAND SHADE-MODEL ...). ;;; Compiling (DEFINE-RENDERING-COMMAND STENCIL-FUNC ...). ;;; Compiling (DEFINE-RENDERING-COMMAND STENCIL-MASK ...). ;;; Compiling (DEFINE-RENDERING-COMMAND STENCIL-OP ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-ENV-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-ENV-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-ENV-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-ENV-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-GEN-D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-GEN-DV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-GEN-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-GEN-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-GEN-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-GEN-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-PARAMETER-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-PARAMETER-FV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-PARAMETER-I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TEX-PARAMETER-IV ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TRANSLATE-D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND TRANSLATE-F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-2D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-2F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-2I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-2S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-3D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-3F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-3I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-3S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-4D ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-4F ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-4I ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VERTEX-4S ...). ;;; Compiling (DEFINE-RENDERING-COMMAND VIEWPORT ...). ;;; Compiling (DEFUN NEW-LIST ...). ;;; Note: ;;; in file GL.LISP, position 113029 ;;; at (DEFUN NEW-LIST ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GL.LISP, position 113029 ;;; at (DEFUN NEW-LIST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 113029 ;;; at (DEFUN NEW-LIST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 113029 ;;; at (DEFUN NEW-LIST ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GEN-LISTS ...). ;;; Note: ;;; in file GL.LISP, position 113469 ;;; at (DEFUN GEN-LISTS ...) ;;; Checking type of #:LET2697 to be DISPLAY ;;; Note: ;;; in file GL.LISP, position 113469 ;;; at (DEFUN GEN-LISTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 113469 ;;; at (DEFUN GEN-LISTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 113469 ;;; at (DEFUN GEN-LISTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GL.LISP, position 113469 ;;; at (DEFUN GEN-LISTS ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GL.LISP, position 113469 ;;; at (DEFUN GEN-LISTS ...) ;;; Checking type of #:LET2752 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN END-LIST ...). ;;; Note: ;;; in file GL.LISP, position 113921 ;;; at (DEFUN END-LIST ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GL.LISP, position 113921 ;;; at (DEFUN END-LIST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 113921 ;;; at (DEFUN END-LIST ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 113921 ;;; at (DEFUN END-LIST ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN ENABLE ...). ;;; Note: ;;; in file GL.LISP, position 114296 ;;; at (DEFUN ENABLE ...) ;;; Checking type of #:LET2812 to be DISPLAY ;;; Note: ;;; in file GL.LISP, position 114296 ;;; at (DEFUN ENABLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 114296 ;;; at (DEFUN ENABLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 114296 ;;; at (DEFUN ENABLE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GL.LISP, position 114296 ;;; at (DEFUN ENABLE ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GL.LISP, position 114296 ;;; at (DEFUN ENABLE ...) ;;; Checking type of #:LET2872 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN FLUSH ...). ;;; Note: ;;; in file GL.LISP, position 114845 ;;; at (DEFUN FLUSH ...) ;;; Checking type of DISPLAY to be DISPLAY ;;; Note: ;;; in file GL.LISP, position 114845 ;;; at (DEFUN FLUSH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 114845 ;;; at (DEFUN FLUSH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 114845 ;;; at (DEFUN FLUSH ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN FINISH ...). ;;; Note: ;;; in file GL.LISP, position 115211 ;;; at (DEFUN FINISH ...) ;;; Checking type of #:LET2932 to be DISPLAY ;;; Note: ;;; in file GL.LISP, position 115211 ;;; at (DEFUN FINISH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 115211 ;;; at (DEFUN FINISH ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file GL.LISP, position 115211 ;;; at (DEFUN FINISH ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file GL.LISP, position 115211 ;;; at (DEFUN FINISH ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file GL.LISP, position 115211 ;;; at (DEFUN FINISH ...) ;;; Checking type of #:LET2987 to be XLIB::REPLY-BUFFER ;;; End of Pass 1. ;;; Emitting code for BYTE-WIDTH. ;;; Emitting code for SETTER. ;;; Emitting code for SEQUENCE-SETTER. ;;; Emitting code for DEFINE-SEQUENCE-SETTER. ;;; Emitting code for SSET-INT8. ;;; Emitting code for SSET-INT16. ;;; Emitting code for SSET-INT32. ;;; Emitting code for SSET-BOOL. ;;; Emitting code for SSET-CARD8. ;;; Emitting code for SSET-CARD16. ;;; Emitting code for SSET-CARD32. ;;; Emitting code for SSET-FLOAT32. ;;; Emitting code for SSET-FLOAT64. ;;; Emitting code for MAKE-ARGSPECS. ;;; Emitting code for BYTE-WIDTH-CALCULATION. ;;; Emitting code for COMPOSITE-ARGS. ;;; Emitting code for MAKE-SETTER-FORMS. ;;; Emitting code for DEFINE-RENDERING-COMMAND. ;;; Emitting code for EXPAND-ARGS. ;;; Emitting code for #:G543. ;;; Emitting code for #:G551. ;;; Emitting code for GET-STRING. ;;; Emitting code for ACCUM. ;;; Emitting code for ACTIVE-TEXTURE-ARB. ;;; Emitting code for ALPHA-FUNC. ;;; Emitting code for BEGIN. ;;; Emitting code for BIND-TEXTURE. ;;; Emitting code for BLEND-COLOR. ;;; Emitting code for BLEND-EQUOTION. ;;; Emitting code for BLEND-FUNC. ;;; Emitting code for CALL-LIST. ;;; Emitting code for CLEAR. ;;; Emitting code for CLEAR-ACCUM. ;;; Emitting code for CLEAR-COLOR. ;;; Emitting code for CLEAR-DEPTH. ;;; Emitting code for CLEAR-INDEX. ;;; Emitting code for CLEAR-STENCIL. ;;; Emitting code for CLIP-PLANE. ;;; Emitting code for COLOR-3B. ;;; Emitting code for COLOR-3D. ;;; Emitting code for COLOR-3F. ;;; Emitting code for COLOR-3I. ;;; Emitting code for COLOR-3S. ;;; Emitting code for COLOR-3UB. ;;; Emitting code for COLOR-3UI. ;;; Emitting code for COLOR-3US. ;;; Emitting code for COLOR-4B. ;;; Emitting code for COLOR-4D. ;;; Emitting code for COLOR-4F. ;;; Emitting code for COLOR-4I. ;;; Emitting code for COLOR-4S. ;;; Emitting code for COLOR-4UB. ;;; Emitting code for COLOR-4UI. ;;; Emitting code for COLOR-4US. ;;; Emitting code for COLOR-MASK. ;;; Emitting code for COLOR-MATERIAL. ;;; Emitting code for COLOR-TABLE-PARAMETER-FV. ;;; Emitting code for COLOR-TABLE-PARAMETER-IV. ;;; Emitting code for CONVOLUTION-PARAMETER-F. ;;; Emitting code for CONVOLUTION-PARAMETER-FV. ;;; Emitting code for CONVOLUTION-PARAMETER-I. ;;; Emitting code for CONVOLUTION-PARAMETER-IV. ;;; Emitting code for COPY-COLOR-SUB-TABLE. ;;; Emitting code for COPY-COLOR-TABLE. ;;; Emitting code for COPY-CONVOLUTION-FILTER-ID. ;;; Emitting code for COPY-CONVOLUTION-FILTER-2D. ;;; Emitting code for COPY-PIXELS. ;;; Emitting code for COPY-TEX-IMAGE-1D. ;;; Emitting code for COPY-TEX-IMAGE-2D. ;;; Emitting code for COPY-TEX-SUB-IMAGE-1D. ;;; Emitting code for COPY-TEX-SUB-IMAGE-2D. ;;; Emitting code for COPY-TEX-SUB-IMAGE-3D. ;;; Emitting code for CULL-FACE. ;;; Emitting code for DEPTH-FUNC. ;;; Emitting code for DEPTH-MASK. ;;; Emitting code for DEPTH-RANGE. ;;; Emitting code for DRAW-BUFFER. ;;; Emitting code for EDGE-FLAG-V. ;;; Emitting code for END. ;;; Emitting code for EVAL-COORD-1D. ;;; Emitting code for EVAL-COORD-1F. ;;; Emitting code for EVAL-COORD-2D. ;;; Emitting code for EVAL-COORD-2F. ;;; Emitting code for EVAL-MESH-1. ;;; Emitting code for EVAL-MESH-2. ;;; Emitting code for EVAL-POINT-1. ;;; Emitting code for EVAL-POINT-2. ;;; Emitting code for FOG-F. ;;; Emitting code for FOG-FV. ;;; Emitting code for FOG-I. ;;; Emitting code for FOG-IV. ;;; Emitting code for FRONT-FACE. ;;; Emitting code for FRUSTUM. ;;; Emitting code for HINT. ;;; Emitting code for HISTOGRAM. ;;; Emitting code for INDEX-MASK. ;;; Emitting code for INDEX-D. ;;; Emitting code for INDEX-F. ;;; Emitting code for INDEX-I. ;;; Emitting code for INDEX-S. ;;; Emitting code for INDEX-UB. ;;; Emitting code for INIT-NAMES. ;;; Emitting code for LIGHT-MODEL-F. ;;; Emitting code for LIGHT-MODEL-FV. ;;; Emitting code for LIGHT-MODEL-I. ;;; Emitting code for LIGHT-MODEL-IV. ;;; Emitting code for LIGHT-F. ;;; Emitting code for LIGHT-FV. ;;; Emitting code for LIGHT-I. ;;; Emitting code for LIGHT-IV. ;;; Emitting code for LINE-STIPPLE. ;;; Emitting code for LINE-WIDTH. ;;; Emitting code for LIST-BASE. ;;; Emitting code for LOAD-IDENTITY. ;;; Emitting code for LOAD-MATRIX-D. ;;; Emitting code for LOAD-MATRIX-F. ;;; Emitting code for LOAD-NAME. ;;; Emitting code for LOGIC-OP. ;;; Emitting code for MAP-GRID-1D. ;;; Emitting code for MAP-GRID-1F. ;;; Emitting code for MAP-GRID-2D. ;;; Emitting code for MAP-GRID-2F. ;;; Emitting code for MATERIAL-F. ;;; Emitting code for MATERIAL-FV. ;;; Emitting code for MATERIAL-I. ;;; Emitting code for MATERIAL-IV. ;;; Emitting code for MATRIX-MODE. ;;; Emitting code for MINMAX. ;;; Emitting code for MULT-MATRIX-D. ;;; Emitting code for MULT-MATRIX-F. ;;; Emitting code for MULTI-TEX-COORD-1D-ARB. ;;; Emitting code for MULTI-TEX-COORD-1F-ARB. ;;; Emitting code for MULTI-TEX-COORD-1I-ARB. ;;; Emitting code for MULTI-TEX-COORD-1S-ARB. ;;; Emitting code for MULTI-TEX-COORD-2D-ARB. ;;; Emitting code for MULTI-TEX-COORD-2F-ARB. ;;; Emitting code for MULTI-TEX-COORD-2I-ARB. ;;; Emitting code for MULTI-TEX-COORD-2S-ARB. ;;; Emitting code for MULTI-TEX-COORD-3D-ARB. ;;; Emitting code for MULTI-TEX-COORD-3F-ARB. ;;; Emitting code for MULTI-TEX-COORD-3I-ARB. ;;; Emitting code for MULTI-TEX-COORD-3S-ARB. ;;; Emitting code for MULTI-TEX-COORD-4D-ARB. ;;; Emitting code for MULTI-TEX-COORD-4F-ARB. ;;; Emitting code for MULTI-TEX-COORD-4I-ARB. ;;; Emitting code for MULTI-TEX-COORD-4S-ARB. ;;; Emitting code for NORMAL-3B. ;;; Emitting code for NORMAL-3D. ;;; Emitting code for NORMAL-3F. ;;; Emitting code for NORMAL-3I. ;;; Emitting code for NORMAL-3S. ;;; Emitting code for ORTHO. ;;; Emitting code for PASS-THROUGH. ;;; Emitting code for PIXEL-TRANSFER-F. ;;; Emitting code for PIXEL-TRANSFER-I. ;;; Emitting code for PIXEL-ZOOM. ;;; Emitting code for POINT-SIZE. ;;; Emitting code for POLYGON-MODE. ;;; Emitting code for POLYGON-OFFSET. ;;; Emitting code for POP-ATTRIB. ;;; Emitting code for POP-MATRIX. ;;; Emitting code for POP-NAME. ;;; Emitting code for PRIORITIZE-TEXTURES. ;;; Emitting code for PUSH-ATTRIB. ;;; Emitting code for PUSH-MATRIX. ;;; Emitting code for PUSH-NAME. ;;; Emitting code for RASTER-POS-2D. ;;; Emitting code for RASTER-POS-2F. ;;; Emitting code for RASTER-POS-2I. ;;; Emitting code for RASTER-POS-2S. ;;; Emitting code for RASTER-POS-3D. ;;; Emitting code for RASTER-POS-3F. ;;; Emitting code for RASTER-POS-3I. ;;; Emitting code for RASTER-POS-3S. ;;; Emitting code for RASTER-POS-4D. ;;; Emitting code for RASTER-POS-4F. ;;; Emitting code for RASTER-POS-4I. ;;; Emitting code for RASTER-POS-4S. ;;; Emitting code for READ-BUFFER. ;;; Emitting code for RECT-D. ;;; Emitting code for RECT-F. ;;; Emitting code for RECT-I. ;;; Emitting code for RECT-S. ;;; Emitting code for RESET-HISTOGRAM. ;;; Emitting code for RESET-MINMAX. ;;; Emitting code for ROTATE-D. ;;; Emitting code for ROTATE-F. ;;; Emitting code for SCALE-D. ;;; Emitting code for SCALE-F. ;;; Emitting code for SCISSOR. ;;; Emitting code for SHADE-MODEL. ;;; Emitting code for STENCIL-FUNC. ;;; Emitting code for STENCIL-MASK. ;;; Emitting code for STENCIL-OP. ;;; Emitting code for TEX-ENV-F. ;;; Emitting code for TEX-ENV-FV. ;;; Emitting code for TEX-ENV-I. ;;; Emitting code for TEX-ENV-IV. ;;; Emitting code for TEX-GEN-D. ;;; Emitting code for TEX-GEN-DV. ;;; Emitting code for TEX-GEN-F. ;;; Emitting code for TEX-GEN-FV. ;;; Emitting code for TEX-GEN-I. ;;; Emitting code for TEX-GEN-IV. ;;; Emitting code for TEX-PARAMETER-F. ;;; Emitting code for TEX-PARAMETER-FV. ;;; Emitting code for TEX-PARAMETER-I. ;;; Emitting code for TEX-PARAMETER-IV. ;;; Emitting code for TRANSLATE-D. ;;; Emitting code for TRANSLATE-F. ;;; Emitting code for VERTEX-2D. ;;; Emitting code for VERTEX-2F. ;;; Emitting code for VERTEX-2I. ;;; Emitting code for VERTEX-2S. ;;; Emitting code for VERTEX-3D. ;;; Emitting code for VERTEX-3F. ;;; Emitting code for VERTEX-3I. ;;; Emitting code for VERTEX-3S. ;;; Emitting code for VERTEX-4D. ;;; Emitting code for VERTEX-4F. ;;; Emitting code for VERTEX-4I. ;;; Emitting code for VERTEX-4S. ;;; Emitting code for VIEWPORT. ;;; Emitting code for NEW-LIST. ;;; Emitting code for GEN-LISTS. ;;; Emitting code for END-LIST. ;;; Emitting code for ENABLE. ;;; Emitting code for FLUSH. ;;; Emitting code for FINISH. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/gl.c -o clx/gl.o ;;; Finished compiling SRC:CLX;GL.LISP. ;;; (compile-file "src:clx;dpms.lisp" :output-file #P"BUILD:CLX;DPMS.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;DPMS.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO DPMS-OPCODE ...). ;;; Compiling (DEFUN DPMS-GET-VERSION ...). ;;; Note: ;;; in file DPMS.LISP, position 1735 ;;; at (DEFUN DPMS-GET-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 1735 ;;; at (DEFUN DPMS-GET-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 1735 ;;; at (DEFUN DPMS-GET-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file DPMS.LISP, position 1735 ;;; at (DEFUN DPMS-GET-VERSION ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file DPMS.LISP, position 1735 ;;; at (DEFUN DPMS-GET-VERSION ...) ;;; Checking type of #:LET67 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN DPMS-CAPABLE ...). ;;; Note: ;;; in file DPMS.LISP, position 2296 ;;; at (DEFUN DPMS-CAPABLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 2296 ;;; at (DEFUN DPMS-CAPABLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 2296 ;;; at (DEFUN DPMS-CAPABLE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file DPMS.LISP, position 2296 ;;; at (DEFUN DPMS-CAPABLE ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file DPMS.LISP, position 2296 ;;; at (DEFUN DPMS-CAPABLE ...) ;;; Checking type of #:LET119 to be XLIB::REPLY-BUFFER ;;; Note: ;;; in file DPMS.LISP, position 2296 ;;; at (DEFUN DPMS-CAPABLE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN DPMS-GET-TIMEOUTS ...). ;;; Note: ;;; in file DPMS.LISP, position 2810 ;;; at (DEFUN DPMS-GET-TIMEOUTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 2810 ;;; at (DEFUN DPMS-GET-TIMEOUTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 2810 ;;; at (DEFUN DPMS-GET-TIMEOUTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file DPMS.LISP, position 2810 ;;; at (DEFUN DPMS-GET-TIMEOUTS ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file DPMS.LISP, position 2810 ;;; at (DEFUN DPMS-GET-TIMEOUTS ...) ;;; Checking type of #:LET173 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN DPMS-SET-TIMEOUTS ...). ;;; Note: ;;; in file DPMS.LISP, position 3322 ;;; at (DEFUN DPMS-SET-TIMEOUTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 3322 ;;; at (DEFUN DPMS-SET-TIMEOUTS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 3322 ;;; at (DEFUN DPMS-SET-TIMEOUTS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DPMS-ENABLE ...). ;;; Note: ;;; in file DPMS.LISP, position 3750 ;;; at (DEFUN DPMS-ENABLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 3750 ;;; at (DEFUN DPMS-ENABLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 3750 ;;; at (DEFUN DPMS-ENABLE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DPMS-DISABLE ...). ;;; Note: ;;; in file DPMS.LISP, position 4051 ;;; at (DEFUN DPMS-DISABLE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 4051 ;;; at (DEFUN DPMS-DISABLE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DPMS-FORCE-LEVEL ...). ;;; Note: ;;; in file DPMS.LISP, position 4478 ;;; at (DEFUN DPMS-FORCE-LEVEL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 4478 ;;; at (DEFUN DPMS-FORCE-LEVEL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 4478 ;;; at (DEFUN DPMS-FORCE-LEVEL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN DPMS-INFO ...). ;;; Note: ;;; in file DPMS.LISP, position 5033 ;;; at (DEFUN DPMS-INFO ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 5033 ;;; at (DEFUN DPMS-INFO ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file DPMS.LISP, position 5033 ;;; at (DEFUN DPMS-INFO ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file DPMS.LISP, position 5033 ;;; at (DEFUN DPMS-INFO ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file DPMS.LISP, position 5033 ;;; at (DEFUN DPMS-INFO ...) ;;; Checking type of #:LET428 to be XLIB::REPLY-BUFFER ;;; Note: ;;; in file DPMS.LISP, position 5033 ;;; at (DEFUN DPMS-INFO ...) ;;; Inlining AREF-CARD8 ;;; End of Pass 1. ;;; Emitting code for DPMS-OPCODE. ;;; Emitting code for DPMS-GET-VERSION. ;;; Emitting code for DPMS-CAPABLE. ;;; Emitting code for DPMS-GET-TIMEOUTS. ;;; Emitting code for DPMS-SET-TIMEOUTS. ;;; Emitting code for DPMS-ENABLE. ;;; Emitting code for DPMS-DISABLE. ;;; Emitting code for DPMS-FORCE-LEVEL. ;;; Emitting code for DPMS-INFO. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/dpms.c -o clx/dpms.o ;;; Finished compiling SRC:CLX;DPMS.LISP. ;;; (compile-file "src:clx;xtest.lisp" :output-file #P"BUILD:CLX;XTEST.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;XTEST.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFMACRO OPCODE ...). ;;; Compiling (DEFUN SET-GC-CONTEXT-OF-GC ...). ;;; Compiling (DEFUN GET-VERSION ...). ;;; Note: ;;; in file XTEST.LISP, position 2042 ;;; at (DEFUN GET-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2042 ;;; at (DEFUN GET-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2042 ;;; at (DEFUN GET-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2042 ;;; at (DEFUN GET-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XTEST.LISP, position 2042 ;;; at (DEFUN GET-VERSION ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file XTEST.LISP, position 2042 ;;; at (DEFUN GET-VERSION ...) ;;; Checking type of #:LET76 to be XLIB::REPLY-BUFFER ;;; Note: ;;; in file XTEST.LISP, position 2042 ;;; at (DEFUN GET-VERSION ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN COMPARE-CURSOR ...). ;;; Note: ;;; in file XTEST.LISP, position 2432 ;;; at (DEFUN COMPARE-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2432 ;;; at (DEFUN COMPARE-CURSOR ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2432 ;;; at (DEFUN COMPARE-CURSOR ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XTEST.LISP, position 2432 ;;; at (DEFUN COMPARE-CURSOR ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file XTEST.LISP, position 2432 ;;; at (DEFUN COMPARE-CURSOR ...) ;;; Checking type of #:LET135 to be XLIB::REPLY-BUFFER ;;; Note: ;;; in file XTEST.LISP, position 2432 ;;; at (DEFUN COMPARE-CURSOR ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN FAKE-MOTION-EVENT ...). ;;; Note: ;;; in file XTEST.LISP, position 2814 ;;; at (DEFUN FAKE-MOTION-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2814 ;;; at (DEFUN FAKE-MOTION-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2814 ;;; at (DEFUN FAKE-MOTION-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2814 ;;; at (DEFUN FAKE-MOTION-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 2814 ;;; at (DEFUN FAKE-MOTION-EVENT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN FAKE-BUTTON-EVENT ...). ;;; Note: ;;; in file XTEST.LISP, position 3323 ;;; at (DEFUN FAKE-BUTTON-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 3323 ;;; at (DEFUN FAKE-BUTTON-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 3323 ;;; at (DEFUN FAKE-BUTTON-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 3323 ;;; at (DEFUN FAKE-BUTTON-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 3323 ;;; at (DEFUN FAKE-BUTTON-EVENT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN FAKE-KEY-EVENT ...). ;;; Note: ;;; in file XTEST.LISP, position 3823 ;;; at (DEFUN FAKE-KEY-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 3823 ;;; at (DEFUN FAKE-KEY-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 3823 ;;; at (DEFUN FAKE-KEY-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 3823 ;;; at (DEFUN FAKE-KEY-EVENT ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 3823 ;;; at (DEFUN FAKE-KEY-EVENT ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Compiling (DEFUN GRAB-CONTROL ...). ;;; Note: ;;; in file XTEST.LISP, position 4224 ;;; at (DEFUN GRAB-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 4224 ;;; at (DEFUN GRAB-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 4224 ;;; at (DEFUN GRAB-CONTROL ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XTEST.LISP, position 4224 ;;; at (DEFUN GRAB-CONTROL ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; End of Pass 1. ;;; Emitting code for OPCODE. ;;; Emitting code for SET-GC-CONTEXT-OF-GC. ;;; Emitting code for GET-VERSION. ;;; Emitting code for COMPARE-CURSOR. ;;; Emitting code for FAKE-MOTION-EVENT. ;;; Emitting code for FAKE-BUTTON-EVENT. ;;; Emitting code for FAKE-KEY-EVENT. ;;; Emitting code for GRAB-CONTROL. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/xtest.c -o clx/xtest.o ;;; Finished compiling SRC:CLX;XTEST.LISP. ;;; (compile-file "src:clx;screensaver.lisp" :output-file #P"BUILD:CLX;SCREENSAVER.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;SCREENSAVER.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN SCREEN-SAVER-QUERY-VERSION ...). ;;; Note: ;;; in file SCREENSAVER.LISP, position 1552 ;;; at (DEFUN SCREEN-SAVER-QUERY-VERSION ...) ;;; Checking type of #:LET0 to be DISPLAY ;;; Note: ;;; in file SCREENSAVER.LISP, position 1552 ;;; at (DEFUN SCREEN-SAVER-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SCREENSAVER.LISP, position 1552 ;;; at (DEFUN SCREEN-SAVER-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SCREENSAVER.LISP, position 1552 ;;; at (DEFUN SCREEN-SAVER-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SCREENSAVER.LISP, position 1552 ;;; at (DEFUN SCREEN-SAVER-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SCREENSAVER.LISP, position 1552 ;;; at (DEFUN SCREEN-SAVER-QUERY-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file SCREENSAVER.LISP, position 1552 ;;; at (DEFUN SCREEN-SAVER-QUERY-VERSION ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file SCREENSAVER.LISP, position 1552 ;;; at (DEFUN SCREEN-SAVER-QUERY-VERSION ...) ;;; Checking type of #:LET64 to be REPLY-BUFFER ;;; Compiling (DEFUN SCREEN-SAVER-QUERY-INFO ...). ;;; Note: ;;; in file SCREENSAVER.LISP, position 1949 ;;; at (DEFUN SCREEN-SAVER-QUERY-INFO ...) ;;; Checking type of #:LET66 to be DISPLAY ;;; Note: ;;; in file SCREENSAVER.LISP, position 1949 ;;; at (DEFUN SCREEN-SAVER-QUERY-INFO ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SCREENSAVER.LISP, position 1949 ;;; at (DEFUN SCREEN-SAVER-QUERY-INFO ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file SCREENSAVER.LISP, position 1949 ;;; at (DEFUN SCREEN-SAVER-QUERY-INFO ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file SCREENSAVER.LISP, position 1949 ;;; at (DEFUN SCREEN-SAVER-QUERY-INFO ...) ;;; Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER) ;;; Note: ;;; in file SCREENSAVER.LISP, position 1949 ;;; at (DEFUN SCREEN-SAVER-QUERY-INFO ...) ;;; Checking type of #:LET116 to be REPLY-BUFFER ;;; Note: ;;; in file SCREENSAVER.LISP, position 1949 ;;; at (DEFUN SCREEN-SAVER-QUERY-INFO ...) ;;; Inlining AREF-CARD8 ;;; Note: ;;; in file SCREENSAVER.LISP, position 1949 ;;; at (DEFUN SCREEN-SAVER-QUERY-INFO ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN SCREEN-SAVER-GET-IDLE ...). ;;; End of Pass 1. ;;; Emitting code for SCREEN-SAVER-QUERY-VERSION. ;;; Emitting code for SCREEN-SAVER-QUERY-INFO. ;;; Emitting code for SCREEN-SAVER-GET-IDLE. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/screensaver.c -o clx/screensaver.o ;;; Finished compiling SRC:CLX;SCREENSAVER.LISP. ;;; (compile-file "src:clx;xinerama.lisp" :output-file #P"BUILD:CLX;XINERAMA.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling SRC:CLX;XINERAMA.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; Compiling (DEFUN XINERAMA-OPCODE ...). ;;; Compiling (DEFSTRUCT SCREEN-INFO ...). ;;; Compiling (DEFUN XINERAMA-QUERY-VERSION ...). ;;; Note: ;;; in file XINERAMA.LISP, position 1703 ;;; at (DEFUN XINERAMA-QUERY-VERSION ...) ;;; Checking type of #:LET25 to be DISPLAY ;;; Note: ;;; in file XINERAMA.LISP, position 1703 ;;; at (DEFUN XINERAMA-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XINERAMA.LISP, position 1703 ;;; at (DEFUN XINERAMA-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XINERAMA.LISP, position 1703 ;;; at (DEFUN XINERAMA-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XINERAMA.LISP, position 1703 ;;; at (DEFUN XINERAMA-QUERY-VERSION ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XINERAMA.LISP, position 1703 ;;; at (DEFUN XINERAMA-QUERY-VERSION ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XINERAMA.LISP, position 1703 ;;; at (DEFUN XINERAMA-QUERY-VERSION ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file XINERAMA.LISP, position 1703 ;;; at (DEFUN XINERAMA-QUERY-VERSION ...) ;;; Checking type of #:LET89 to be XLIB::REPLY-BUFFER ;;; Compiling (DEFUN XINERAMA-IS-ACTIVE ...). ;;; Note: ;;; in file XINERAMA.LISP, position 2041 ;;; at (DEFUN XINERAMA-IS-ACTIVE ...) ;;; Checking type of #:LET91 to be DISPLAY ;;; Note: ;;; in file XINERAMA.LISP, position 2041 ;;; at (DEFUN XINERAMA-IS-ACTIVE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XINERAMA.LISP, position 2041 ;;; at (DEFUN XINERAMA-IS-ACTIVE ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XINERAMA.LISP, position 2041 ;;; at (DEFUN XINERAMA-IS-ACTIVE ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XINERAMA.LISP, position 2041 ;;; at (DEFUN XINERAMA-IS-ACTIVE ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file XINERAMA.LISP, position 2041 ;;; at (DEFUN XINERAMA-IS-ACTIVE ...) ;;; Checking type of #:LET141 to be XLIB::REPLY-BUFFER ;;; Note: ;;; in file XINERAMA.LISP, position 2041 ;;; at (DEFUN XINERAMA-IS-ACTIVE ...) ;;; Inlining AREF-CARD8 ;;; Compiling (DEFUN XINERAMA-QUERY-SCREENS ...). ;;; Note: ;;; in file XINERAMA.LISP, position 2318 ;;; at (DEFUN XINERAMA-QUERY-SCREENS ...) ;;; Checking type of #:LET145 to be DISPLAY ;;; Note: ;;; in file XINERAMA.LISP, position 2318 ;;; at (DEFUN XINERAMA-QUERY-SCREENS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XINERAMA.LISP, position 2318 ;;; at (DEFUN XINERAMA-QUERY-SCREENS ...) ;;; Inlining ASET-CARD8 ;;; Note: ;;; in file XINERAMA.LISP, position 2318 ;;; at (DEFUN XINERAMA-QUERY-SCREENS ...) ;;; Inlining BUFFER-NEW-REQUEST-NUMBER ;;; Note: ;;; in file XINERAMA.LISP, position 2318 ;;; at (DEFUN XINERAMA-QUERY-SCREENS ...) ;;; Checking type of (XLIB::READ-REPLY XLIB::.DISPLAY. XLIB::.PENDING-COMMAND.) to be (OR NULL XLIB::REPLY-BUFFER) ;;; Note: ;;; in file XINERAMA.LISP, position 2318 ;;; at (DEFUN XINERAMA-QUERY-SCREENS ...) ;;; Checking type of #:LET195 to be XLIB::REPLY-BUFFER ;;; End of Pass 1. ;;; Emitting code for XINERAMA-OPCODE. ;;; Emitting code for MAKE-SCREEN-INFO. ;;; Emitting code for XINERAMA-QUERY-VERSION. ;;; Emitting code for XINERAMA-IS-ACTIVE. ;;; Emitting code for XINERAMA-QUERY-SCREENS. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/xinerama.c -o clx/xinerama.o ;;; Finished compiling SRC:CLX;XINERAMA.LISP. ;;; (compile-file "build:clx;module.lisp" :output-file #P"BUILD:CLX;MODULE.O.NEWEST" :SYSTEM-P T :C-FILE T :DATA-FILE T :H-FILE T) ;;; ;;; Compiling BUILD:CLX;MODULE.LISP. ;;; OPTIMIZE levels: Safety=2, Space=1, Speed=1, Debug=1 ;;; ;;; End of Pass 1. ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c clx/module.c -o clx/module.o ;;; Finished compiling BUILD:CLX;MODULE.LISP. ;;; ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinit3xfbfE.c -o eclinit3xfbfE.o ;;; Note: ;;; Invoking external command: ;;; ar cr libclx.a eclinit3xfbfE.o clx/package.o clx/depdefs.o clx/clx.o clx/dependent.o clx/macros.o clx/bufmac.o clx/buffer.o clx/display.o clx/gcontext.o clx/input.o clx/requests.o clx/fonts.o clx/graphics.o clx/text.o clx/attributes.o clx/translate.o clx/keysyms.o clx/manager.o clx/image.o clx/resource.o clx/shape.o clx/big-requests.o clx/xvidmode.o clx/xrender.o clx/glx.o clx/gl.o clx/dpms.o clx/xtest.o clx/screensaver.o clx/xinerama.o clx/module.o ;;; Note: ;;; Invoking external command: ;;; ranlib libclx.a ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitBIXjeY.c -o eclinitBIXjeY.o ;;; Note: ;;; Invoking external command: ;;; gcc -o clx.fas -L/<>/build/ /<>/build/eclinitBIXjeY.o clx/package.o clx/depdefs.o clx/clx.o clx/dependent.o clx/macros.o clx/bufmac.o clx/buffer.o clx/display.o clx/gcontext.o clx/input.o clx/requests.o clx/fonts.o clx/graphics.o clx/text.o clx/attributes.o clx/translate.o clx/keysyms.o clx/manager.o clx/image.o clx/resource.o clx/shape.o clx/big-requests.o clx/xvidmode.o clx/xrender.o clx/glx.o clx/gl.o clx/dpms.o clx/xtest.o clx/screensaver.o clx/xinerama.o clx/module.o -shared libecl.so -lgmp -lgc -lffi -lgc -lgc -lpthread -ldl -lm ;;; Note: ;;; Invoking external command: ;;; gcc -I. -I/<>/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<>/src/c -c eclinitnHoYcj.c -o eclinitnHoYcj.o ;;; Note: ;;; Invoking external command: ;;; gcc -o bin/ecl -L/<>/build/ /<>/build/eclinitnHoYcj.o -L./ libecl.so -lgc -lgc -lpthread -ldl -lm (#P"clx.asd" #P"clx.fas" #P"libclx.a" #P"rt.asd" #P"rt.fas" #P"librt.a" #P"ecl-quicklisp.asd" #P"ecl-quicklisp.fas" #P"libecl-quicklisp.a" #P"deflate.asd" #P"deflate.fas" #P"libdeflate.a" #P"ql-minitar.asd" #P"ql-minitar.fas" #P"libql-minitar.a" #P"ecl-curl.asd" #P"ecl-curl.fas" #P"libecl-curl.a" #P"serve-event.asd" #P"serve-event.fas" #P"libserve-event.a" #P"sb-bsd-sockets.asd" #P"sb-bsd-sockets.fas" #P"libsb-bsd-sockets.a" #P"sockets.asd" #P"sockets.fas" #P"libsockets.a" #P"profile.asd" #P"profile.fas" #P"libprofile.a" #P"prebuilt-asdf.asd" #P"asdf.fas" #P"libasdf.a" #P"defsystem.asd" #P"defsystem.fas" #P"libdefsystem.a" #P"ecl-help.asd" #P"ecl-help.fas" #P"libecl-help.a" #P"ecl-cdb.asd" #P"ecl-cdb.fas" #P"libecl-cdb.a" #P"cmp.asd" #P"cmp.fas" #P"libcmp.a") if [ "xlibecl.so" != "x" -a -f "libecl.so" ]; then \ ( mv libecl.so libecl.so.16.1.2 && \ rm -f -f libecl.so.16.1 libecl.so.16 libecl.so && \ ln -s libecl.so.16.1.2 libecl.so.16.1 && \ ln -s libecl.so.16.1.2 libecl.so.16 && \ ln -s libecl.so.16.1.2 libecl.so ) \ fi sed -e 's,@libdir\\@,/usr/lib/,' \ -e 's,@includedir\\@,/usr/include/,' \ -e 's,~A,/usr/lib/,' bin/ecl-config.pre > bin/ecl-config cd /<>/src/../.git && ctags -o tags -R --langmap=c:+.d ../src || true /bin/bash: line 0: cd: /<>/src/../.git: No such file or directory if test "x" != "x"; then \ srcfiles=`find /<>/src/c /<>/src/h -name '*.[chd]'` && \ --language=c -o TAGS $srcfiles && \ --language=none -o TAGS --append \ --regex='/@\([-:*a-zA-z]+\)/\1/' \ --regex='/@(defun \([-:*a-zA-z]+\)/\1/' \ $srcfiles; \ fi touch TAGS make[2]: Leaving directory '/<>/build' make[1]: Leaving directory '/<>' create-stamp debian/debhelper-build-stamp fakeroot debian/rules binary-arch dh binary-arch --with autoreconf dh: Compatibility levels before 9 are deprecated (level 7 in use) dh_testroot -a dh_prep -a dh_auto_install -a dh_auto_install: Compatibility levels before 9 are deprecated (level 7 in use) make -j1 install DESTDIR=/<>/debian/ecl AM_UPDATE_INFO_DIR=no make[1]: Entering directory '/<>' cd build; make install make[2]: Entering directory '/<>/build' # Here we would use the option -s but the install program in sourceforge-solaris # is broken. /<>/src/bdwgc/install-sh -d /<>/debian/ecl/usr/bin/ /<>/debian/ecl/usr/lib/ \ /<>/debian/ecl/usr/lib/ecl-16.1.2/ /<>/debian/ecl/usr/include/ /<>/debian/ecl/usr/include//ecl for i in bin/ecl; do \ /usr/bin/install -c $i /<>/debian/ecl/usr/bin/; \ done if [ -d encodings ]; then \ /<>/src/bdwgc/install-sh -d /<>/debian/ecl/usr/lib/ecl-16.1.2//encodings; \ for i in ./encodings/*; do \ /usr/bin/install -c -m 644 $i /<>/debian/ecl/usr/lib/ecl-16.1.2//encodings; \ done \ fi sed '/-CUT-/,$d' ./ecl/config.h > ./ecl/config-install.h /<>/src/bdwgc/install-sh -d /<>/debian/ecl/usr/include//ecl for i in `(cd ecl && find . -type d)`; do \ k="/<>/debian/ecl/usr/include//ecl/$i"; \ test -d "$k" || /<>/src/bdwgc/install-sh -d $k; \ done for i in `(cd ecl && find . -name '*.h')`; do echo $i; \ /usr/bin/install -c -m 644 ecl/$i /<>/debian/ecl/usr/include//ecl/$i; \ done ./legacy.h ./external.h ./bytecodes.h ./object.h ./internal.h ./number.h ./config.h ./unify.h ./ecl-cmp.h ./ecl-inl.h ./impl/math_dispatch2.h ./impl/math_fenv.h ./impl/math_dispatch.h ./impl/math_fenv_msvc.h ./configpre.h ./stacks.h ./config-install.h ./page.h ./ecl.h ./cache.h ./cons.h ./cs.h rm -f -f /<>/debian/ecl/usr/include//ecl/config.h mv /<>/debian/ecl/usr/include//ecl/config-install.h /<>/debian/ecl/usr/include//ecl/config.h /usr/bin/install -c bin/ecl-config /<>/debian/ecl/usr/bin/ for i in build-stamp help.doc TAGS ; do \ /usr/bin/install -c -m 644 $i /<>/debian/ecl/usr/lib/ecl-16.1.2/; \ done for i in libecl.so ; do \ if test -s $i ; then \ if echo $i | grep dll; then \ /usr/bin/install -c $i /<>/debian/ecl/usr/bin/; \ fi; \ /usr/bin/install -c $i /<>/debian/ecl/usr/lib/; \ fi \ done if [ "xlibecl.so.16.1.2" != "x" -a -f "libecl.so.16.1.2" ]; then \ ( /usr/bin/install -c libecl.so.16.1.2 /<>/debian/ecl/usr/lib/ && \ cd /<>/debian/ecl/usr/lib/ && rm -f -f libecl.so.16.1 libecl.so.16 libecl.so && \ ln -s libecl.so.16.1.2 libecl.so.16.1 && \ ln -s libecl.so.16.1.2 libecl.so.16 && \ ln -s libecl.so.16.1.2 libecl.so ) \ fi /usr/bin/install -c c/dpp /<>/debian/ecl/usr/lib/ecl-16.1.2/ /usr/bin/install -c ecl_min /<>/debian/ecl/usr/lib/ecl-16.1.2/ for i in `cat modules`; do \ case $i in \ *.fas) /usr/bin/install -c $i /<>/debian/ecl/usr/lib/ecl-16.1.2/;; \ *) /usr/bin/install -c -m 644 $i /<>/debian/ecl/usr/lib/ecl-16.1.2/;; \ esac \ done for i in Copyright LGPL; do \ /usr/bin/install -c -m 644 /<>/src/../$i /<>/debian/ecl/usr/lib/ecl-16.1.2/; \ done /usr/bin/install: cannot stat '/<>/src/../Copyright': No such file or directory /<>/src/bdwgc/install-sh -d /<>/debian/ecl/usr/share/man/man1 /usr/bin/install -c -m 644 doc/ecl.man /<>/debian/ecl/usr/share/man/man1/ecl.1 /usr/bin/install -c -m 644 doc/ecl-config.man /<>/debian/ecl/usr/share/man/man1/ecl-config.1 make[2]: Leaving directory '/<>/build' make[1]: Leaving directory '/<>' dh_installdocs -a dh_installchangelogs -a dh_installman -a dh_lintian -a dh_lintian: Compatibility levels before 9 are deprecated (level 7 in use) dh_perl -a dh_link -a dh_strip_nondeterminism -a dh_compress -a dh_fixperms -a dh_strip -a dh_strip: Compatibility levels before 9 are deprecated (level 7 in use) dh_makeshlibs -a dh_shlibdeps -a dh_installdeb -a dh_installdeb: Compatibility levels before 9 are deprecated (level 7 in use) dh_gencontrol -a dh_md5sums -a dh_builddeb -a INFO: pkgstriptranslations version 131 pkgstriptranslations: processing ecl-dbgsym (in debian/.debhelper/ecl/dbgsym-root); do_strip: , oemstrip: pkgmaintainermangler: Maintainer field overridden to "Ubuntu Developers " pkgstripfiles: processing control file: debian/.debhelper/ecl/dbgsym-root/DEBIAN/control, package ecl-dbgsym, directory debian/.debhelper/ecl/dbgsym-root pkgstripfiles: Running PNG optimization (using 4 cpus) for package ecl-dbgsym ... pkgstripfiles: No PNG files. dpkg-deb: building package 'ecl-dbgsym' in 'debian/.debhelper/scratch-space/build-ecl/ecl-dbgsym_16.1.2-2_ppc64el.deb'. Renaming ecl-dbgsym_16.1.2-2_ppc64el.deb to ecl-dbgsym_16.1.2-2_ppc64el.ddeb INFO: pkgstriptranslations version 131 pkgstriptranslations: processing ecl (in debian/ecl); do_strip: , oemstrip: pkgmaintainermangler: Maintainer field overridden to "Ubuntu Developers " pkgstripfiles: processing control file: debian/ecl/DEBIAN/control, package ecl, directory debian/ecl pkgstripfiles: Truncating usr/share/doc/ecl/changelog.Debian.gz to topmost ten records pkgstripfiles: Running PNG optimization (using 4 cpus) for package ecl ... pkgstripfiles: No PNG files. dpkg-deb: building package 'ecl' in '../ecl_16.1.2-2_ppc64el.deb'. dpkg-genbuildinfo --build=any dpkg-genchanges --build=any -mLaunchpad Build Daemon >../ecl_16.1.2-2_ppc64el.changes dpkg-genchanges: info: binary-only arch-specific upload (source code and arch-indep packages not included) dpkg-source --after-build ecl-16.1.2 dpkg-buildpackage: info: binary-only upload (no source included) -------------------------------------------------------------------------------- Build finished at 20170507-2316 Finished -------- I: Built successfully +------------------------------------------------------------------------------+ | Post Build Chroot | +------------------------------------------------------------------------------+ +------------------------------------------------------------------------------+ | Changes | +------------------------------------------------------------------------------+ ecl_16.1.2-2_ppc64el.changes: ----------------------------- Format: 1.8 Date: Sun, 07 May 2017 15:38:58 +0100 Source: ecl Binary: ecl Architecture: ppc64el Version: 16.1.2-2 Distribution: artful-proposed Urgency: medium Maintainer: Launchpad Build Daemon Changed-By: Tobias Hansen Description: ecl - Embeddable Common-Lisp: has an interpreter and can compile to C Changes: ecl (16.1.2-2) unstable; urgency=medium . * Upload to unstable. Checksums-Sha1: 79cb18eb02cf2f65ddd4f03ab34d594b6aefbb23 7985894 ecl-dbgsym_16.1.2-2_ppc64el.ddeb bb92023de966ea36e3b2cfec4244b1708f80457a 5508 ecl_16.1.2-2_ppc64el.buildinfo 3991db4f7585788331755ae7f96266ec9f9c9717 3380222 ecl_16.1.2-2_ppc64el.deb Checksums-Sha256: af163c5fc03b3dc21c91785a0810f183de03aa1501d2398016d07faa71f8ad4a 7985894 ecl-dbgsym_16.1.2-2_ppc64el.ddeb b291cdb2c62b209895cb706d953aba50bf2641a6709ee65e38e971d738356b03 5508 ecl_16.1.2-2_ppc64el.buildinfo 5e81a51330b5b138883b755cfd1dc94202be038418a0de7d8c6600da5f6b126b 3380222 ecl_16.1.2-2_ppc64el.deb Files: 21520efe3143b54a84d2a6740205d9cc 7985894 debug extra ecl-dbgsym_16.1.2-2_ppc64el.ddeb feb2723d675d9ac9ffcc6dec4c8eee52 5508 devel optional ecl_16.1.2-2_ppc64el.buildinfo 8f7974214eea143baf32fb4fed176151 3380222 devel optional ecl_16.1.2-2_ppc64el.deb +------------------------------------------------------------------------------+ | Package contents | +------------------------------------------------------------------------------+ ecl_16.1.2-2_ppc64el.deb ------------------------ new debian package, version 2.0. size 3380222 bytes: control archive=7698 bytes. 1340 bytes, 30 lines control 16602 bytes, 236 lines md5sums 939 bytes, 36 lines * postrm #!/bin/sh 16 bytes, 1 lines shlibs 60 bytes, 2 lines triggers Package: ecl Version: 16.1.2-2 Architecture: ppc64el Maintainer: Ubuntu Developers Original-Maintainer: Debian Common Lisp Team Installed-Size: 21980 Depends: libc6 (>= 2.17), libffi6 (>= 3.0.4), libgc1c2 (>= 1:7.4.2), libgmp10, libgmp3-dev, libncurses5-dev, libgc-dev, libatomic-ops-dev, gcc Suggests: slime, ecl-doc Provides: lisp-compiler Section: devel Priority: optional Homepage: http://ecls.sourceforge.net/ Description: Embeddable Common-Lisp: has an interpreter and can compile to C ECL stands for Embeddable Common-Lisp. The ECL project is an effort to modernize Giuseppe Attardi's ECL environment to produce an implementation of the Common-Lisp language which complies to the ANSI X3J13 definition of the language. . The current ECL implementation features: * A bytecodes compiler and interpreter. * A translator to C. * A UFFI-compatible interface to C code. * A dynamic loader. * The possibility to build standalone executables and DLLs. * The Common-Lisp Object System (CLOS). * Conditions and restarts for handling errors. * Sockets as ordinary streams. * The GNU Multiprecision library for fast bignum operations. * A simple conservative mark & sweep garbage collector. * The Boehm-Weiser garbage collector. drwxr-xr-x root/root 0 2017-05-07 14:38 ./ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/bin/ -rwxr-xr-x root/root 67504 2017-05-07 14:38 ./usr/bin/ecl -rwxr-xr-x root/root 615 2017-05-07 14:38 ./usr/bin/ecl-config drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/include/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/include/ecl/ -rw-r--r-- root/root 6912 2017-05-07 14:38 ./usr/include/ecl/bytecodes.h -rw-r--r-- root/root 1279 2017-05-07 14:38 ./usr/include/ecl/cache.h -rw-r--r-- root/root 7989 2017-05-07 14:38 ./usr/include/ecl/config.h -rw-r--r-- root/root 15871 2017-05-07 14:38 ./usr/include/ecl/configpre.h -rw-r--r-- root/root 12929 2017-05-07 14:38 ./usr/include/ecl/cons.h -rw-r--r-- root/root 7039 2017-05-07 14:38 ./usr/include/ecl/cs.h -rw-r--r-- root/root 1739 2017-05-07 14:38 ./usr/include/ecl/ecl-cmp.h -rw-r--r-- root/root 7356 2017-05-07 14:38 ./usr/include/ecl/ecl-inl.h -rw-r--r-- root/root 2555 2017-05-07 14:38 ./usr/include/ecl/ecl.h -rw-r--r-- root/root 119463 2017-05-07 14:38 ./usr/include/ecl/external.h drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/include/ecl/gc/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/include/ecl/gc/private/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/include/ecl/impl/ -rw-r--r-- root/root 4692 2017-05-07 14:38 ./usr/include/ecl/impl/math_dispatch.h -rw-r--r-- root/root 5372 2017-05-07 14:38 ./usr/include/ecl/impl/math_dispatch2.h -rw-r--r-- root/root 3354 2017-05-07 14:38 ./usr/include/ecl/impl/math_fenv.h -rw-r--r-- root/root 1592 2017-05-07 14:38 ./usr/include/ecl/impl/math_fenv_msvc.h -rw-r--r-- root/root 21971 2017-05-07 14:38 ./usr/include/ecl/internal.h -rw-r--r-- root/root 7822 2017-05-07 14:38 ./usr/include/ecl/legacy.h -rw-r--r-- root/root 4418 2017-05-07 14:38 ./usr/include/ecl/number.h -rw-r--r-- root/root 38090 2017-05-07 14:38 ./usr/include/ecl/object.h -rw-r--r-- root/root 3967 2017-05-07 14:38 ./usr/include/ecl/page.h -rw-r--r-- root/root 19020 2017-05-07 14:38 ./usr/include/ecl/stacks.h -rw-r--r-- root/root 1356 2017-05-07 14:38 ./usr/include/ecl/unify.h drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/lib/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ -rw-r--r-- root/root 25265 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/LGPL -rw-r--r-- root/root 0 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/TAGS -rwxr-xr-x root/root 921728 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/asdf.fas -rw-r--r-- root/root 820 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/build-stamp -rw-r--r-- root/root 172 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/clx.asd -rwxr-xr-x root/root 2691104 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/clx.fas -rw-r--r-- root/root 172 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/cmp.asd -rwxr-xr-x root/root 1053080 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/cmp.fas -rw-r--r-- root/root 188 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/deflate.asd -rwxr-xr-x root/root 133640 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/deflate.fas -rw-r--r-- root/root 196 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/defsystem.asd -rwxr-xr-x root/root 199864 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/defsystem.fas -rwxr-xr-x root/root 231408 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/dpp -rw-r--r-- root/root 188 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl-cdb.asd -rwxr-xr-x root/root 68024 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl-cdb.fas -rw-r--r-- root/root 192 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl-curl.asd -rwxr-xr-x root/root 68000 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl-curl.fas -rw-r--r-- root/root 192 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl-help.asd -rwxr-xr-x root/root 68112 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl-help.fas -rw-r--r-- root/root 212 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl-quicklisp.asd -rwxr-xr-x root/root 67744 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl-quicklisp.fas -rwxr-xr-x root/root 2032680 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ecl_min drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ -rw-r--r-- root/root 64 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/arabic -rw-r--r-- root/root 36 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ascii -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/asmo-708 -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/atarist.bin -rw-r--r-- root/root 862 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp-856.bin -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp819 -rw-r--r-- root/root 62 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp850 -rw-r--r-- root/root 62 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp862 -rw-r--r-- root/root 62 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp866 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp932 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp936 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp949 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cp950 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/cyrillic -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp437.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp737.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp775.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp850.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp852.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp855.bin -rw-r--r-- root/root 1014 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp857.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp860.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp861.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp862.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp863.bin -rw-r--r-- root/root 1002 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp864.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp865.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp866.bin -rw-r--r-- root/root 990 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp869.bin -rw-r--r-- root/root 902 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/dos-cp874.bin -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ecma-114 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ecma-118 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/greek -rw-r--r-- root/root 64 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/greek8 -rw-r--r-- root/root 64 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/hebrew -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm437 -rw-r--r-- root/root 64 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm819 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm850 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm852 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm855 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm857 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm860 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm861 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm862 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm863 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm864 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm865 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm866 -rw-r--r-- root/root 63 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ibm869 -rw-r--r-- root/root 1882 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-2022-jp -rw-r--r-- root/root 1991 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-2022-jp-1 -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-1.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-10.bin -rw-r--r-- root/root 994 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-11.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-13.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-14.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-15.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-16.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-2.bin -rw-r--r-- root/root 998 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-3.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-4.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-5.bin -rw-r--r-- root/root 846 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-6.bin -rw-r--r-- root/root 1014 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-7.bin -rw-r--r-- root/root 882 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-8.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso-8859-9.bin -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-1 -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-10 -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-13 -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-14 -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-15 -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-2 -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-3 -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-4 -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-5 -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-6 -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-7 -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-8 -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/iso8859-9 -rw-r--r-- root/root 634 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/jisx0201.bin -rw-r--r-- root/root 27518 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/jisx0208.bin -rw-r--r-- root/root 24270 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/jisx0212.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/koi8-r.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/koi8-u.bin -rw-r--r-- root/root 59 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/koi8r -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-1 -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-2 -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-3 -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-4 -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-5 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-6 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-7 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-8 -rw-r--r-- root/root 66 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin-9 -rw-r--r-- root/root 64 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin2 -rw-r--r-- root/root 64 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin3 -rw-r--r-- root/root 64 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin4 -rw-r--r-- root/root 64 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin5 -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin6 -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin7 -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin8 -rw-r--r-- root/root 65 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/latin9 -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ms-ansi -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ms-arab -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ms-cyrl -rw-r--r-- root/root 67 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ms-ee -rw-r--r-- root/root 70 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ms-greek -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ms-hebr -rw-r--r-- root/root 69 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ms-turk -rw-r--r-- root/root 28150 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/shift-jis.bin -rw-r--r-- root/root 10573 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/tools.lisp -rw-r--r-- root/root 32 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ucs2 -rw-r--r-- root/root 36 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ucs2be -rw-r--r-- root/root 36 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ucs2le -rw-r--r-- root/root 32 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ucs4 -rw-r--r-- root/root 36 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ucs4be -rw-r--r-- root/root 36 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/ucs4le -rw-r--r-- root/root 35 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/unicode -rw-r--r-- root/root 34 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf-16 -rw-r--r-- root/root 38 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf-16be -rw-r--r-- root/root 38 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf-16le -rw-r--r-- root/root 34 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf-32 -rw-r--r-- root/root 38 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf-32be -rw-r--r-- root/root 38 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf-32le -rw-r--r-- root/root 33 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf16 -rw-r--r-- root/root 33 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf32 -rw-r--r-- root/root 32 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/utf8 -rw-r--r-- root/root 72 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/winbaltrim -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1250 -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1251 -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1252 -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1253 -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1254 -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1255 -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1256 -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1257 -rw-r--r-- root/root 74 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-1258 -rw-r--r-- root/root 72 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-932 -rw-r--r-- root/root 72 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-936 -rw-r--r-- root/root 72 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-949 -rw-r--r-- root/root 72 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-950 -rw-r--r-- root/root 1006 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1250.bin -rw-r--r-- root/root 1022 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1251.bin -rw-r--r-- root/root 1006 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1252.bin -rw-r--r-- root/root 958 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1253.bin -rw-r--r-- root/root 998 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1254.bin -rw-r--r-- root/root 934 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1255.bin -rw-r--r-- root/root 1026 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1256.bin -rw-r--r-- root/root 978 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1257.bin -rw-r--r-- root/root 990 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp1258.bin -rw-r--r-- root/root 31662 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp932.bin -rw-r--r-- root/root 87682 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp936.bin -rw-r--r-- root/root 68706 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp949.bin -rw-r--r-- root/root 54526 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/encodings/windows-cp950.bin -rw-r--r-- root/root 701377 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/help.doc -rw-r--r-- root/root 1515514 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libasdf.a -rw-r--r-- root/root 4954866 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libclx.a -rw-r--r-- root/root 2023422 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libcmp.a -rw-r--r-- root/root 121820 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libdeflate.a -rw-r--r-- root/root 292398 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libdefsystem.a -rw-r--r-- root/root 30868 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libecl-cdb.a -rw-r--r-- root/root 29270 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libecl-curl.a -rw-r--r-- root/root 40584 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libecl-help.a -rw-r--r-- root/root 14522 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libecl-quicklisp.a -rw-r--r-- root/root 75428 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libprofile.a -rw-r--r-- root/root 24616 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libql-minitar.a -rw-r--r-- root/root 43544 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/librt.a -rw-r--r-- root/root 5386 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libsb-bsd-sockets.a -rw-r--r-- root/root 26200 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libserve-event.a -rw-r--r-- root/root 126872 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/libsockets.a -rw-r--r-- root/root 198 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/prebuilt-asdf.asd -rw-r--r-- root/root 188 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/profile.asd -rwxr-xr-x root/root 68176 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/profile.fas -rw-r--r-- root/root 200 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ql-minitar.asd -rwxr-xr-x root/root 67888 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/ql-minitar.fas -rw-r--r-- root/root 168 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/rt.asd -rwxr-xr-x root/root 68144 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/rt.fas -rw-r--r-- root/root 224 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/sb-bsd-sockets.asd -rwxr-xr-x root/root 67488 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/sb-bsd-sockets.fas -rw-r--r-- root/root 204 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/serve-event.asd -rwxr-xr-x root/root 67904 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/serve-event.fas -rw-r--r-- root/root 188 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/sockets.asd -rwxr-xr-x root/root 133904 2017-05-07 14:38 ./usr/lib/ecl-16.1.2/sockets.fas lrwxrwxrwx root/root 0 2017-05-07 14:38 ./usr/lib/libecl.so -> libecl.so.16.1.2 lrwxrwxrwx root/root 0 2017-05-07 14:38 ./usr/lib/libecl.so.16 -> libecl.so.16.1.2 lrwxrwxrwx root/root 0 2017-05-07 14:38 ./usr/lib/libecl.so.16.1 -> libecl.so.16.1.2 -rw-r--r-- root/root 3484856 2017-05-07 14:38 ./usr/lib/libecl.so.16.1.2 drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/share/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/share/doc/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/share/doc/ecl/ -rw-r--r-- root/root 199 2017-02-26 22:13 ./usr/share/doc/ecl/NEWS.Debian.gz -rw-r--r-- root/root 318 2017-02-26 22:13 ./usr/share/doc/ecl/README.Debian -rw-r--r-- root/root 1054 2017-05-07 14:38 ./usr/share/doc/ecl/changelog.Debian.gz -rw-r--r-- root/root 2794 2017-02-26 22:13 ./usr/share/doc/ecl/copyright drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/share/lintian/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/share/lintian/overrides/ -rw-r--r-- root/root 129 2017-03-27 20:55 ./usr/share/lintian/overrides/ecl drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/share/man/ drwxr-xr-x root/root 0 2017-05-07 14:38 ./usr/share/man/man1/ -rw-r--r-- root/root 380 2017-05-07 14:38 ./usr/share/man/man1/ecl-config.1.gz -rw-r--r-- root/root 1531 2017-05-07 14:38 ./usr/share/man/man1/ecl.1.gz +------------------------------------------------------------------------------+ | Post Build | +------------------------------------------------------------------------------+ +------------------------------------------------------------------------------+ | Cleanup | +------------------------------------------------------------------------------+ Not removing build depends: as requested Keeping session: +------------------------------------------------------------------------------+ | Summary | +------------------------------------------------------------------------------+ Build Architecture: ppc64el Build-Space: 260524 Build-Time: 500 Distribution: artful-proposed Host Architecture: ppc64el Install-Time: 13 Job: ecl_16.1.2-2.dsc Machine Architecture: ppc64el Package: ecl Package-Time: 515 Source-Version: 16.1.2-2 Space: 260524 Status: successful Version: 16.1.2-2 -------------------------------------------------------------------------------- Finished at 20170507-2316 Build needed 00:08:35, 260524k disc space RUN: /usr/share/launchpad-buildd/slavebin/scan-for-processes ['scan-for-processes', 'PACKAGEBUILD-12546888'] Scanning for processes to kill in build /home/buildd/build-PACKAGEBUILD-12546888/chroot-autobuild... RUN: /usr/share/launchpad-buildd/slavebin/umount-chroot ['umount-chroot', 'PACKAGEBUILD-12546888'] Unmounting chroot for build PACKAGEBUILD-12546888... RUN: /usr/share/launchpad-buildd/slavebin/remove-build ['remove-build', 'PACKAGEBUILD-12546888'] Removing build PACKAGEBUILD-12546888