Raspbian Package Auto-Building

Build log for ecl (15.3.7+dfsg1-2+deb9u1) on armhf

ecl15.3.7+dfsg1-2+deb9u1armhf → 2017-10-07 13:29:18

sbuild (Debian sbuild) 0.71.0 (24 Aug 2016) on bm-wb-04

+==============================================================================+
| ecl 15.3.7+dfsg1-2+deb9u1 (armhf)            Sat, 07 Oct 2017 12:26:24 +0000 |
+==============================================================================+

Package: ecl
Version: 15.3.7+dfsg1-2+deb9u1
Source Version: 15.3.7+dfsg1-2+deb9u1
Distribution: stretch-staging
Machine Architecture: armhf
Host Architecture: armhf
Build Architecture: armhf

I: NOTICE: Log filtering will replace 'var/lib/schroot/mount/stretch-staging-armhf-sbuild-b2047e64-a9f4-4106-a213-95e0bd307f70' with '<<CHROOT>>'

+------------------------------------------------------------------------------+
| Update chroot                                                                |
+------------------------------------------------------------------------------+

Get:1 http://172.17.0.1/private stretch-staging InRelease [11.3 kB]
Get:2 http://172.17.0.1/private stretch-staging/main Sources [9739 kB]
Get:3 http://172.17.0.1/private stretch-staging/main armhf Packages [11.7 MB]
Fetched 21.4 MB in 32s (662 kB/s)
Reading package lists...
W: No sandbox user '_apt' on the system, can not drop privileges

+------------------------------------------------------------------------------+
| Fetch source files                                                           |
+------------------------------------------------------------------------------+


Check APT
---------

Checking available source versions...

Download source files with APT
------------------------------

Reading package lists...
NOTICE: 'ecl' packaging is maintained in the 'Git' version control system at:
http://anonscm.debian.org/git/pkg-common-lisp/ecl.git
Please use:
git clone http://anonscm.debian.org/git/pkg-common-lisp/ecl.git
to retrieve the latest (possibly unreleased) updates to the package.
Need to get 2895 kB of source archives.
Get:1 http://172.17.0.1/private stretch-staging/main ecl 15.3.7+dfsg1-2+deb9u1 (dsc) [2226 B]
Get:2 http://172.17.0.1/private stretch-staging/main ecl 15.3.7+dfsg1-2+deb9u1 (tar) [2874 kB]
Get:3 http://172.17.0.1/private stretch-staging/main ecl 15.3.7+dfsg1-2+deb9u1 (diff) [18.5 kB]
Fetched 2895 kB in 0s (4821 kB/s)
Download complete and in download only mode
I: NOTICE: Log filtering will replace 'build/ecl-pvDULx/ecl-15.3.7+dfsg1' with '<<PKGBUILDDIR>>'
I: NOTICE: Log filtering will replace 'build/ecl-pvDULx' with '<<BUILDDIR>>'

+------------------------------------------------------------------------------+
| Install build-essential                                                      |
+------------------------------------------------------------------------------+


Setup apt archive
-----------------

Merged Build-Depends: build-essential, fakeroot
Filtered Build-Depends: build-essential, fakeroot
dpkg-deb: building package 'sbuild-build-depends-core-dummy' in '/<<BUILDDIR>>/resolver-2TwtMM/apt_archive/sbuild-build-depends-core-dummy.deb'.
dpkg-scanpackages: warning: Packages in archive but missing from override file:
dpkg-scanpackages: warning:   sbuild-build-depends-core-dummy
dpkg-scanpackages: info: Wrote 1 entries to output Packages file.
gpg: keybox '/<<BUILDDIR>>/resolver-2TwtMM/gpg/pubring.kbx' created
gpg: /<<BUILDDIR>>/resolver-2TwtMM/gpg/trustdb.gpg: trustdb created
gpg: key 35506D9A48F77B2E: public key "Sbuild Signer (Sbuild Build Dependency Archive Key) <buildd-tools-devel@lists.alioth.debian.org>" imported
gpg: Total number processed: 1
gpg:               imported: 1
gpg: key 35506D9A48F77B2E: "Sbuild Signer (Sbuild Build Dependency Archive Key) <buildd-tools-devel@lists.alioth.debian.org>" not changed
gpg: key 35506D9A48F77B2E: secret key imported
gpg: Total number processed: 1
gpg:              unchanged: 1
gpg:       secret keys read: 1
gpg:   secret keys imported: 1
gpg: using "Sbuild Signer" as default secret key for signing
Ign:1 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ InRelease
Get:2 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ Release [957 B]
Get:3 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ Release.gpg [370 B]
Get:4 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ Sources [349 B]
Get:5 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ Packages [434 B]
Fetched 2110 B in 0s (3295 B/s)
Reading package lists...
W: No sandbox user '_apt' on the system, can not drop privileges
Reading package lists...

Install core build dependencies (apt-based resolver)
----------------------------------------------------

Installing build dependencies
Reading package lists...
Building dependency tree...
Reading state information...
The following packages were automatically installed and are no longer required:
  fuse2fs gnupg-l10n libfuse2 manpages
Use 'apt autoremove' to remove them.
The following NEW packages will be installed:
  sbuild-build-depends-core-dummy
0 upgraded, 1 newly installed, 0 to remove and 21 not upgraded.
Need to get 774 B of archives.
After this operation, 0 B of additional disk space will be used.
Get:1 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ sbuild-build-depends-core-dummy 0.invalid.0 [774 B]
debconf: delaying package configuration, since apt-utils is not installed
Fetched 774 B in 0s (2117 B/s)
Selecting previously unselected package sbuild-build-depends-core-dummy.
(Reading database ... 13974 files and directories currently installed.)
Preparing to unpack .../sbuild-build-depends-core-dummy_0.invalid.0_armhf.deb ...
Unpacking sbuild-build-depends-core-dummy (0.invalid.0) ...
Setting up sbuild-build-depends-core-dummy (0.invalid.0) ...
W: No sandbox user '_apt' on the system, can not drop privileges

+------------------------------------------------------------------------------+
| Check architectures                                                          |
+------------------------------------------------------------------------------+

Arch check ok (armhf included in any)

+------------------------------------------------------------------------------+
| Install package build dependencies                                           |
+------------------------------------------------------------------------------+


Setup apt archive
-----------------

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 '/<<BUILDDIR>>/resolver-2TwtMM/apt_archive/sbuild-build-depends-ecl-dummy.deb'.
dpkg-scanpackages: warning: Packages in archive but missing from override file:
dpkg-scanpackages: warning:   sbuild-build-depends-core-dummy sbuild-build-depends-ecl-dummy
dpkg-scanpackages: info: Wrote 2 entries to output Packages file.
gpg: using "Sbuild Signer" as default secret key for signing
Ign:1 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ InRelease
Get:2 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ Release [963 B]
Get:3 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ Release.gpg [370 B]
Get:4 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ Sources [589 B]
Get:5 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ Packages [675 B]
Fetched 2597 B in 0s (4032 B/s)
Reading package lists...
W: No sandbox user '_apt' on the system, can not drop privileges
Reading package lists...

Install ecl build dependencies (apt-based resolver)
---------------------------------------------------

Installing build dependencies
Reading package lists...
Building dependency tree...
Reading state information...
The following packages were automatically installed and are no longer required:
  fuse2fs gnupg-l10n libfuse2 manpages
Use 'apt autoremove' to remove them.
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 libffi6 libfile-stripnondeterminism-perl libgc-dev
  libglib2.0-0 libgmp-dev libgmpxx4ldbl libicu57 libmagic-mgc libmagic1
  libncurses5-dev libpipeline1 libsigsegv2 libtext-unidecode-perl libtinfo-dev
  libtool libunistring0 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 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 libffi6 libfile-stripnondeterminism-perl libgc-dev
  libglib2.0-0 libgmp-dev libgmpxx4ldbl libicu57 libmagic-mgc libmagic1
  libncurses5-dev libpipeline1 libsigsegv2 libtext-unidecode-perl libtinfo-dev
  libtool libunistring0 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, 0 to remove and 21 not upgraded.
Need to get 23.4 MB/23.4 MB of archives.
After this operation, 82.0 MB of additional disk space will be used.
Get:1 copy:/<<BUILDDIR>>/resolver-2TwtMM/apt_archive ./ sbuild-build-depends-ecl-dummy 0.invalid.0 [878 B]
Get:2 http://172.17.0.1/private stretch-staging/main armhf install-info armhf 6.3.0.dfsg.1-1+b1 [307 kB]
Get:3 http://172.17.0.1/private stretch-staging/main armhf groff-base armhf 1.22.3-9 [1005 kB]
Get:4 http://172.17.0.1/private stretch-staging/main armhf libbsd0 armhf 0.8.3-1 [89.0 kB]
Get:5 http://172.17.0.1/private stretch-staging/main armhf bsdmainutils armhf 9.0.12+nmu1 [178 kB]
Get:6 http://172.17.0.1/private stretch-staging/main armhf libpipeline1 armhf 1.4.1-2 [23.7 kB]
Get:7 http://172.17.0.1/private stretch-staging/main armhf man-db armhf 2.7.6.1-2 [1014 kB]
Get:8 http://172.17.0.1/private stretch-staging/main armhf libmagic-mgc armhf 1:5.30-1+deb9u1 [222 kB]
Get:9 http://172.17.0.1/private stretch-staging/main armhf libmagic1 armhf 1:5.30-1+deb9u1 [105 kB]
Get:10 http://172.17.0.1/private stretch-staging/main armhf file armhf 1:5.30-1+deb9u1 [63.6 kB]
Get:11 http://172.17.0.1/private stretch-staging/main armhf gettext-base armhf 0.19.8.1-2 [116 kB]
Get:12 http://172.17.0.1/private stretch-staging/main armhf libicu57 armhf 57.1-6 [7427 kB]
Get:13 http://172.17.0.1/private stretch-staging/main armhf libxml2 armhf 2.9.4+dfsg1-2.2+deb9u1 [805 kB]
Get:14 http://172.17.0.1/private stretch-staging/main armhf ucf all 3.0036 [70.2 kB]
Get:15 http://172.17.0.1/private stretch-staging/main armhf libsigsegv2 armhf 2.10-5 [28.4 kB]
Get:16 http://172.17.0.1/private stretch-staging/main armhf m4 armhf 1.4.18-1 [185 kB]
Get:17 http://172.17.0.1/private stretch-staging/main armhf autoconf all 2.69-10 [338 kB]
Get:18 http://172.17.0.1/private stretch-staging/main armhf autotools-dev all 20161112.1 [73.4 kB]
Get:19 http://172.17.0.1/private stretch-staging/main armhf automake all 1:1.15-6 [733 kB]
Get:20 http://172.17.0.1/private stretch-staging/main armhf autopoint all 0.19.8.1-2 [433 kB]
Get:21 http://172.17.0.1/private stretch-staging/main armhf chrpath armhf 0.16-2 [15.4 kB]
Get:22 http://172.17.0.1/private stretch-staging/main armhf libtool all 2.4.6-2 [545 kB]
Get:23 http://172.17.0.1/private stretch-staging/main armhf dh-autoreconf all 14 [15.9 kB]
Get:24 http://172.17.0.1/private stretch-staging/main armhf libarchive-zip-perl all 1.59-1 [95.5 kB]
Get:25 http://172.17.0.1/private stretch-staging/main armhf libfile-stripnondeterminism-perl all 0.034-1 [16.4 kB]
Get:26 http://172.17.0.1/private stretch-staging/main armhf dh-strip-nondeterminism all 0.034-1 [10.5 kB]
Get:27 http://172.17.0.1/private stretch-staging/main armhf libglib2.0-0 armhf 2.50.3-2 [2527 kB]
Get:28 http://172.17.0.1/private stretch-staging/main armhf libcroco3 armhf 0.6.11-3 [131 kB]
Get:29 http://172.17.0.1/private stretch-staging/main armhf libunistring0 armhf 0.9.6+really0.9.3-0.1 [252 kB]
Get:30 http://172.17.0.1/private stretch-staging/main armhf gettext armhf 0.19.8.1-2 [1434 kB]
Get:31 http://172.17.0.1/private stretch-staging/main armhf intltool-debian all 0.35.0+20060710.4 [26.3 kB]
Get:32 http://172.17.0.1/private stretch-staging/main armhf po-debconf all 1.0.20 [247 kB]
Get:33 http://172.17.0.1/private stretch-staging/main armhf debhelper all 10.2.5 [961 kB]
Get:34 http://172.17.0.1/private stretch-staging/main armhf libatomic-ops-dev armhf 7.4.4-3 [82.4 kB]
Get:35 http://172.17.0.1/private stretch-staging/main armhf libffi-dev armhf 3.2.1-6 [159 kB]
Get:36 http://172.17.0.1/private stretch-staging/main armhf libgc-dev armhf 1:7.4.2-8 [340 kB]
Get:37 http://172.17.0.1/private stretch-staging/main armhf libgmpxx4ldbl armhf 2:6.1.2+dfsg-1 [21.5 kB]
Get:38 http://172.17.0.1/private stretch-staging/main armhf libgmp-dev armhf 2:6.1.2+dfsg-1 [563 kB]
Get:39 http://172.17.0.1/private stretch-staging/main armhf libtinfo-dev armhf 6.0+20161126-1 [65.3 kB]
Get:40 http://172.17.0.1/private stretch-staging/main armhf libncurses5-dev armhf 6.0+20161126-1 [245 kB]
Get:41 http://172.17.0.1/private stretch-staging/main armhf libtext-unidecode-perl all 1.30-1 [103 kB]
Get:42 http://172.17.0.1/private stretch-staging/main armhf libxml-namespacesupport-perl all 1.11-1 [14.8 kB]
Get:43 http://172.17.0.1/private stretch-staging/main armhf libxml-sax-base-perl all 1.07-1 [23.1 kB]
Get:44 http://172.17.0.1/private stretch-staging/main armhf libxml-sax-perl all 0.99+dfsg-2 [68.3 kB]
Get:45 http://172.17.0.1/private stretch-staging/main armhf libxml-libxml-perl armhf 2.0128+dfsg-1+b1 [318 kB]
Get:46 http://172.17.0.1/private stretch-staging/main armhf tex-common all 6.06 [566 kB]
Get:47 http://172.17.0.1/private stretch-staging/main armhf texinfo armhf 6.3.0.dfsg.1-1+b1 [1292 kB]
debconf: delaying package configuration, since apt-utils is not installed
Fetched 23.4 MB in 2s (8071 kB/s)
Selecting previously unselected package install-info.
(Reading database ... 13974 files and directories currently installed.)
Preparing to unpack .../install-info_6.3.0.dfsg.1-1+b1_armhf.deb ...
Unpacking install-info (6.3.0.dfsg.1-1+b1) ...
Setting up install-info (6.3.0.dfsg.1-1+b1) ...
Selecting previously unselected package groff-base.
(Reading database ... 13989 files and directories currently installed.)
Preparing to unpack .../00-groff-base_1.22.3-9_armhf.deb ...
Unpacking groff-base (1.22.3-9) ...
Selecting previously unselected package libbsd0:armhf.
Preparing to unpack .../01-libbsd0_0.8.3-1_armhf.deb ...
Unpacking libbsd0:armhf (0.8.3-1) ...
Selecting previously unselected package bsdmainutils.
Preparing to unpack .../02-bsdmainutils_9.0.12+nmu1_armhf.deb ...
Unpacking bsdmainutils (9.0.12+nmu1) ...
Selecting previously unselected package libpipeline1:armhf.
Preparing to unpack .../03-libpipeline1_1.4.1-2_armhf.deb ...
Unpacking libpipeline1:armhf (1.4.1-2) ...
Selecting previously unselected package man-db.
Preparing to unpack .../04-man-db_2.7.6.1-2_armhf.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+deb9u1_armhf.deb ...
Unpacking libmagic-mgc (1:5.30-1+deb9u1) ...
Selecting previously unselected package libmagic1:armhf.
Preparing to unpack .../06-libmagic1_1%3a5.30-1+deb9u1_armhf.deb ...
Unpacking libmagic1:armhf (1:5.30-1+deb9u1) ...
Selecting previously unselected package file.
Preparing to unpack .../07-file_1%3a5.30-1+deb9u1_armhf.deb ...
Unpacking file (1:5.30-1+deb9u1) ...
Selecting previously unselected package gettext-base.
Preparing to unpack .../08-gettext-base_0.19.8.1-2_armhf.deb ...
Unpacking gettext-base (0.19.8.1-2) ...
Selecting previously unselected package libicu57:armhf.
Preparing to unpack .../09-libicu57_57.1-6_armhf.deb ...
Unpacking libicu57:armhf (57.1-6) ...
Selecting previously unselected package libxml2:armhf.
Preparing to unpack .../10-libxml2_2.9.4+dfsg1-2.2+deb9u1_armhf.deb ...
Unpacking libxml2:armhf (2.9.4+dfsg1-2.2+deb9u1) ...
Selecting previously unselected package ucf.
Preparing to unpack .../11-ucf_3.0036_all.deb ...
Moving old data out of the way
Unpacking ucf (3.0036) ...
Selecting previously unselected package libsigsegv2:armhf.
Preparing to unpack .../12-libsigsegv2_2.10-5_armhf.deb ...
Unpacking libsigsegv2:armhf (2.10-5) ...
Selecting previously unselected package m4.
Preparing to unpack .../13-m4_1.4.18-1_armhf.deb ...
Unpacking m4 (1.4.18-1) ...
Selecting previously unselected package autoconf.
Preparing to unpack .../14-autoconf_2.69-10_all.deb ...
Unpacking autoconf (2.69-10) ...
Selecting previously unselected package autotools-dev.
Preparing to unpack .../15-autotools-dev_20161112.1_all.deb ...
Unpacking autotools-dev (20161112.1) ...
Selecting previously unselected package automake.
Preparing to unpack .../16-automake_1%3a1.15-6_all.deb ...
Unpacking automake (1:1.15-6) ...
Selecting previously unselected package autopoint.
Preparing to unpack .../17-autopoint_0.19.8.1-2_all.deb ...
Unpacking autopoint (0.19.8.1-2) ...
Selecting previously unselected package chrpath.
Preparing to unpack .../18-chrpath_0.16-2_armhf.deb ...
Unpacking chrpath (0.16-2) ...
Selecting previously unselected package libtool.
Preparing to unpack .../19-libtool_2.4.6-2_all.deb ...
Unpacking libtool (2.4.6-2) ...
Selecting previously unselected package dh-autoreconf.
Preparing to unpack .../20-dh-autoreconf_14_all.deb ...
Unpacking dh-autoreconf (14) ...
Selecting previously unselected package libarchive-zip-perl.
Preparing to unpack .../21-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 .../22-libfile-stripnondeterminism-perl_0.034-1_all.deb ...
Unpacking libfile-stripnondeterminism-perl (0.034-1) ...
Selecting previously unselected package dh-strip-nondeterminism.
Preparing to unpack .../23-dh-strip-nondeterminism_0.034-1_all.deb ...
Unpacking dh-strip-nondeterminism (0.034-1) ...
Selecting previously unselected package libffi6:armhf.
Preparing to unpack .../24-libffi6_3.2.1-6_armhf.deb ...
Unpacking libffi6:armhf (3.2.1-6) ...
Selecting previously unselected package libglib2.0-0:armhf.
Preparing to unpack .../25-libglib2.0-0_2.50.3-2_armhf.deb ...
Unpacking libglib2.0-0:armhf (2.50.3-2) ...
Selecting previously unselected package libcroco3:armhf.
Preparing to unpack .../26-libcroco3_0.6.11-3_armhf.deb ...
Unpacking libcroco3:armhf (0.6.11-3) ...
Selecting previously unselected package libunistring0:armhf.
Preparing to unpack .../27-libunistring0_0.9.6+really0.9.3-0.1_armhf.deb ...
Unpacking libunistring0:armhf (0.9.6+really0.9.3-0.1) ...
Selecting previously unselected package gettext.
Preparing to unpack .../28-gettext_0.19.8.1-2_armhf.deb ...
Unpacking gettext (0.19.8.1-2) ...
Selecting previously unselected package intltool-debian.
Preparing to unpack .../29-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 .../30-po-debconf_1.0.20_all.deb ...
Unpacking po-debconf (1.0.20) ...
Selecting previously unselected package debhelper.
Preparing to unpack .../31-debhelper_10.2.5_all.deb ...
Unpacking debhelper (10.2.5) ...
Selecting previously unselected package libatomic-ops-dev.
Preparing to unpack .../32-libatomic-ops-dev_7.4.4-3_armhf.deb ...
Unpacking libatomic-ops-dev (7.4.4-3) ...
Selecting previously unselected package libffi-dev:armhf.
Preparing to unpack .../33-libffi-dev_3.2.1-6_armhf.deb ...
Unpacking libffi-dev:armhf (3.2.1-6) ...
Selecting previously unselected package libgc-dev:armhf.
Preparing to unpack .../34-libgc-dev_1%3a7.4.2-8_armhf.deb ...
Unpacking libgc-dev:armhf (1:7.4.2-8) ...
Selecting previously unselected package libgmpxx4ldbl:armhf.
Preparing to unpack .../35-libgmpxx4ldbl_2%3a6.1.2+dfsg-1_armhf.deb ...
Unpacking libgmpxx4ldbl:armhf (2:6.1.2+dfsg-1) ...
Selecting previously unselected package libgmp-dev:armhf.
Preparing to unpack .../36-libgmp-dev_2%3a6.1.2+dfsg-1_armhf.deb ...
Unpacking libgmp-dev:armhf (2:6.1.2+dfsg-1) ...
Selecting previously unselected package libtinfo-dev:armhf.
Preparing to unpack .../37-libtinfo-dev_6.0+20161126-1_armhf.deb ...
Unpacking libtinfo-dev:armhf (6.0+20161126-1) ...
Selecting previously unselected package libncurses5-dev:armhf.
Preparing to unpack .../38-libncurses5-dev_6.0+20161126-1_armhf.deb ...
Unpacking libncurses5-dev:armhf (6.0+20161126-1) ...
Selecting previously unselected package libtext-unidecode-perl.
Preparing to unpack .../39-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 .../40-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 .../41-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 .../42-libxml-sax-perl_0.99+dfsg-2_all.deb ...
Unpacking libxml-sax-perl (0.99+dfsg-2) ...
Selecting previously unselected package libxml-libxml-perl.
Preparing to unpack .../43-libxml-libxml-perl_2.0128+dfsg-1+b1_armhf.deb ...
Unpacking libxml-libxml-perl (2.0128+dfsg-1+b1) ...
Selecting previously unselected package tex-common.
Preparing to unpack .../44-tex-common_6.06_all.deb ...
Unpacking tex-common (6.06) ...
Selecting previously unselected package texinfo.
Preparing to unpack .../45-texinfo_6.3.0.dfsg.1-1+b1_armhf.deb ...
Unpacking texinfo (6.3.0.dfsg.1-1+b1) ...
Selecting previously unselected package sbuild-build-depends-ecl-dummy.
Preparing to unpack .../46-sbuild-build-depends-ecl-dummy_0.invalid.0_armhf.deb ...
Unpacking sbuild-build-depends-ecl-dummy (0.invalid.0) ...
Setting up chrpath (0.16-2) ...
Setting up libgc-dev:armhf (1:7.4.2-8) ...
Setting up libarchive-zip-perl (1.59-1) ...
Setting up libxml-namespacesupport-perl (1.11-1) ...
Setting up libsigsegv2:armhf (2.10-5) ...
Processing triggers for install-info (6.3.0.dfsg.1-1+b1) ...
Setting up groff-base (1.22.3-9) ...
Setting up libtext-unidecode-perl (1.30-1) ...
Setting up libtinfo-dev:armhf (6.0+20161126-1) ...
Setting up gettext-base (0.19.8.1-2) ...
Setting up libpipeline1:armhf (1.4.1-2) ...
Setting up m4 (1.4.18-1) ...
Setting up libicu57:armhf (57.1-6) ...
Setting up libbsd0:armhf (0.8.3-1) ...
Setting up ucf (3.0036) ...
Setting up libxml2:armhf (2.9.4+dfsg1-2.2+deb9u1) ...
Setting up libmagic-mgc (1:5.30-1+deb9u1) ...
Setting up libmagic1:armhf (1:5.30-1+deb9u1) ...
Setting up libncurses5-dev:armhf (6.0+20161126-1) ...
Setting up libxml-sax-base-perl (1.07-1) ...
Processing triggers for libc-bin (2.24-11) ...
Setting up autotools-dev (20161112.1) ...
Setting up libunistring0:armhf (0.9.6+really0.9.3-0.1) ...
Setting up libatomic-ops-dev (7.4.4-3) ...
Setting up libffi6:armhf (3.2.1-6) ...
Setting up bsdmainutils (9.0.12+nmu1) ...
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:armhf (2:6.1.2+dfsg-1) ...
Setting up autopoint (0.19.8.1-2) ...
Setting up libfile-stripnondeterminism-perl (0.034-1) ...
Setting up libxml-sax-perl (0.99+dfsg-2) ...
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:armhf (2:6.1.2+dfsg-1) ...
Setting up tex-common (6.06) ...
update-language: texlive-base not installed and configured, doing nothing!
Setting up libglib2.0-0:armhf (2.50.3-2) ...
No schema files found: doing nothing.
Setting up libffi-dev:armhf (3.2.1-6) ...
Setting up autoconf (2.69-10) ...
Setting up file (1:5.30-1+deb9u1) ...
Setting up libcroco3:armhf (0.6.11-3) ...
Setting up automake (1:1.15-6) ...
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-1+b1) ...
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 gettext (0.19.8.1-2) ...
Setting up intltool-debian (0.35.0+20060710.4) ...
Setting up texinfo (6.3.0.dfsg.1-1+b1) ...
Setting up po-debconf (1.0.20) ...
Setting up dh-autoreconf (14) ...
Setting up dh-strip-nondeterminism (0.034-1) ...
Setting up debhelper (10.2.5) ...
Setting up sbuild-build-depends-ecl-dummy (0.invalid.0) ...
Processing triggers for libc-bin (2.24-11) ...
W: No sandbox user '_apt' on the system, can not drop privileges

+------------------------------------------------------------------------------+
| Build environment                                                            |
+------------------------------------------------------------------------------+

Kernel: Linux 3.19.0-trunk-armmp armhf (armv7l)
Toolchain package versions: binutils_2.28-5 dpkg-dev_1.18.24 g++-6_6.3.0-18+rpi1 gcc-6_6.3.0-18+rpi1 libc6-dev_2.24-11 libstdc++-4.9-dev_4.9.3-14 libstdc++-6-dev_6.3.0-18+rpi1 libstdc++6_6.3.0-18+rpi1 linux-libc-dev_3.18.5-1~exp1+rpi19+stretch
Package versions: acl_2.2.52-3 adduser_3.115 apt_1.4.6 autoconf_2.69-10 automake_1:1.15-6 autopoint_0.19.8.1-2 autotools-dev_20161112.1 base-files_9.9+rpi1 base-passwd_3.5.43 bash_4.4-5 binutils_2.28-5 bsdmainutils_9.0.12+nmu1 bsdutils_1:2.29.2-1 build-essential_12.3 bzip2_1.0.6-8.1 chrpath_0.16-2 coreutils_8.26-3 cpio_2.11+dfsg-6 cpp_4:6.3.0-4 cpp-6_6.3.0-18+rpi1 dash_0.5.8-2.4 debconf_1.5.61 debfoster_2.7-2.1 debhelper_10.2.5 debianutils_4.8.1.1 dh-autoreconf_14 dh-strip-nondeterminism_0.034-1 diffutils_1:3.5-3 dmsetup_2:1.02.137-2 dpkg_1.18.24 dpkg-dev_1.18.24 e2fslibs_1.43.4-2 e2fsprogs_1.43.4-2 fakeroot_1.21-3.1 file_1:5.30-1+deb9u1 findutils_4.6.0+git+20161106-2 fuse2fs_1.43.4-2 g++_4:6.3.0-4 g++-6_6.3.0-18+rpi1 gcc_4:6.3.0-4 gcc-4.6-base_4.6.4-5+rpi1 gcc-4.7-base_4.7.3-11+rpi1 gcc-4.8-base_4.8.5-4 gcc-4.9-base_4.9.3-14 gcc-6_6.3.0-18+rpi1 gcc-6-base_6.3.0-18+rpi1 gettext_0.19.8.1-2 gettext-base_0.19.8.1-2 gnupg_2.1.18-6 gnupg-agent_2.1.18-6 gnupg-l10n_2.1.18-6 gpgv_2.1.18-6 grep_2.27-2 groff-base_1.22.3-9 gzip_1.6-5 hostname_3.18 init_1.48 init-system-helpers_1.48 initscripts_2.88dsf-59.9 insserv_1.14.0-5.4 install-info_6.3.0.dfsg.1-1+b1 intltool-debian_0.35.0+20060710.4 klibc-utils_2.0.4-9+rpi1 kmod_23-2 libacl1_2.2.52-3 libapparmor1_2.11.0-3 libapt-pkg4.12_1.0.9.10 libapt-pkg5.0_1.4.6 libarchive-zip-perl_1.59-1 libasan1_4.9.3-14 libasan3_6.3.0-18+rpi1 libassuan0_2.4.3-2 libatomic-ops-dev_7.4.4-3 libatomic1_6.3.0-18+rpi1 libattr1_1:2.4.47-2 libaudit-common_1:2.6.7-2 libaudit1_1:2.6.7-2 libblkid1_2.29.2-1 libbsd0_0.8.3-1 libbz2-1.0_1.0.6-8.1 libc-bin_2.24-11 libc-dev-bin_2.24-11 libc6_2.24-11 libc6-dev_2.24-11 libcap-ng0_0.7.7-3 libcap2_1:2.25-1 libcap2-bin_1:2.25-1 libcc1-0_6.3.0-18+rpi1 libcomerr2_1.43.4-2 libcroco3_0.6.11-3 libcryptsetup4_2:1.7.3-4 libdb5.3_5.3.28-12 libdbus-1-3_1.10.18-1 libdebconfclient0_0.227 libdevmapper1.02.1_2:1.02.137-2 libdpkg-perl_1.18.24 libdrm2_2.4.74-1 libfakeroot_1.21-3.1 libfdisk1_2.29.2-1 libffi-dev_3.2.1-6 libffi6_3.2.1-6 libfile-stripnondeterminism-perl_0.034-1 libfuse2_2.9.7-1 libgc-dev_1:7.4.2-8 libgc1c2_1:7.4.2-8 libgcc-4.9-dev_4.9.3-14 libgcc-6-dev_6.3.0-18+rpi1 libgcc1_1:6.3.0-18+rpi1 libgcrypt20_1.7.6-2 libgdbm3_1.8.3-14 libglib2.0-0_2.50.3-2 libgmp-dev_2:6.1.2+dfsg-1 libgmp10_2:6.1.2+dfsg-1 libgmpxx4ldbl_2:6.1.2+dfsg-1 libgomp1_6.3.0-18+rpi1 libgpg-error0_1.26-2 libicu57_57.1-6 libidn11_1.33-1 libip4tc0_1.6.0+snapshot20161117-6 libisl15_0.18-1 libklibc_2.0.4-9+rpi1 libkmod2_23-2 libksba8_1.3.5-2 liblz4-1_0.0~r131-2 liblzma5_5.2.2-1.2 libmagic-mgc_1:5.30-1+deb9u1 libmagic1_1:5.30-1+deb9u1 libmount1_2.29.2-1 libmpc3_1.0.3-1 libmpfr4_3.1.5-1 libncurses5_6.0+20161126-1 libncurses5-dev_6.0+20161126-1 libncursesw5_6.0+20161126-1 libnpth0_1.3-1 libpam-modules_1.1.8-3.6 libpam-modules-bin_1.1.8-3.6 libpam-runtime_1.1.8-3.6 libpam0g_1.1.8-3.6 libpcre3_2:8.39-3 libperl5.24_5.24.1-3 libpipeline1_1.4.1-2 libpng12-0_1.2.54-6 libprocps3_2:3.3.9-9 libprocps6_2:3.3.12-3 libreadline7_7.0-3 libseccomp2_2.3.1-2.1 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-5 libsmartcols1_2.29.2-1 libsqlite3-0_3.16.2-5 libss2_1.43.4-2 libstdc++-4.9-dev_4.9.3-14 libstdc++-6-dev_6.3.0-18+rpi1 libstdc++6_6.3.0-18+rpi1 libsystemd0_232-25 libtext-unidecode-perl_1.30-1 libtimedate-perl_2.3000-2 libtinfo-dev_6.0+20161126-1 libtinfo5_6.0+20161126-1 libtool_2.4.6-2 libubsan0_6.3.0-18+rpi1 libudev1_232-25 libunistring0_0.9.6+really0.9.3-0.1 libusb-0.1-4_2:0.1.12-30 libustr-1.0-1_1.0.4-6 libuuid1_2.29.2-1 libxml-libxml-perl_2.0128+dfsg-1+b1 libxml-namespacesupport-perl_1.11-1 libxml-sax-base-perl_1.07-1 libxml-sax-perl_0.99+dfsg-2 libxml2_2.9.4+dfsg1-2.2+deb9u1 linux-libc-dev_3.18.5-1~exp1+rpi19+stretch login_1:4.4-4.1 lsb-base_9.20161125+rpi1 m4_1.4.18-1 make_4.1-9.1 makedev_2.3.1-93 man-db_2.7.6.1-2 manpages_4.10-2 mawk_1.3.3-17 mount_2.29.2-1 multiarch-support_2.24-11 nano_2.7.4-1 ncurses-base_6.0+20161126-1 ncurses-bin_6.0+20161126-1 passwd_1:4.4-4.1 patch_2.7.5-1 perl_5.24.1-3 perl-base_5.24.1-3 perl-modules-5.24_5.24.1-3 pinentry-curses_1.0.0-2 po-debconf_1.0.20 procps_2:3.3.12-3 raspbian-archive-keyring_20120528.2 readline-common_7.0-3 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 startpar_0.59-3.1 systemd_232-25 systemd-sysv_232-25 sysv-rc_2.88dsf-59.9 sysvinit-utils_2.88dsf-59.9 tar_1.29b-1.1 tex-common_6.06 texinfo_6.3.0.dfsg.1-1+b1 tzdata_2017b-1 ucf_3.0036 udev_232-25 util-linux_2.29.2-1 xz-utils_5.2.2-1.2 zlib1g_1:1.2.8.dfsg-5

+------------------------------------------------------------------------------+
| Build                                                                        |
+------------------------------------------------------------------------------+


Unpack source
-------------

gpgv: unknown type of key resource 'trustedkeys.kbx'
gpgv: keyblock resource '/sbuild-nonexistent/.gnupg/trustedkeys.kbx': General error
gpgv: Signature made Mon Sep 25 11:49:18 2017 UTC
gpgv:                using RSA key 53951D95272E0C5B82BE8C4A2CECE9350ECEBE4A
gpgv: Can't check signature: No public key
dpkg-source: warning: failed to verify signature on ./ecl_15.3.7+dfsg1-2+deb9u1.dsc
dpkg-source: info: extracting ecl in /<<BUILDDIR>>/ecl-15.3.7+dfsg1
dpkg-source: info: unpacking ecl_15.3.7+dfsg1.orig.tar.xz
dpkg-source: info: unpacking ecl_15.3.7+dfsg1-2+deb9u1.debian.tar.xz
dpkg-source: info: applying harden-configure.patch
dpkg-source: info: applying patch-hurd.patch
dpkg-source: info: applying bignums-dont-collect-gmp-internal-memory.patch

Check disc space
----------------

Sufficient free space for build

User Environment
----------------

APT_CONFIG=/var/lib/sbuild/apt.conf
DEB_BUILD_OPTIONS=parallel=4
HOME=/sbuild-nonexistent
LC_ALL=POSIX
LOGNAME=buildd
PATH=/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games
SCHROOT_ALIAS_NAME=stretch-staging-armhf-sbuild
SCHROOT_CHROOT_NAME=stretch-staging-armhf-sbuild
SCHROOT_COMMAND=env
SCHROOT_GID=109
SCHROOT_GROUP=buildd
SCHROOT_SESSION_ID=stretch-staging-armhf-sbuild-b2047e64-a9f4-4106-a213-95e0bd307f70
SCHROOT_UID=104
SCHROOT_USER=buildd
SHELL=/bin/sh
TERM=linux
USER=buildd

dpkg-buildpackage
-----------------

dpkg-buildpackage: info: source package ecl
dpkg-buildpackage: info: source version 15.3.7+dfsg1-2+deb9u1
dpkg-buildpackage: info: source distribution stretch
 dpkg-source --before-build ecl-15.3.7+dfsg1
dpkg-buildpackage: info: host architecture armhf
 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 '/<<BUILDDIR>>/ecl-15.3.7+dfsg1'
dh_autoreconf autoreconf -- -f -i src/
make[1]: Leaving directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1'
   debian/rules override_dh_auto_configure
make[1]: Entering directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1'
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=arm-linux-gnueabihf --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... arm-unknown-linux-gnueabihf
checking host system type... arm-unknown-linux-gnueabihf
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... ARM
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.no"
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_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.15.3
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 ulimit.h usability... yes
checking ulimit.h presence... yes
checking for ulimit.h... yes
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 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... 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:  '/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/Makefile.in' seems to ignore the --datarootdir setting
config.status: creating c/Makefile
config.status: creating doc/Makefile
config.status: WARNING:  '/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 '/<<BUILDDIR>>/ecl-15.3.7+dfsg1'
   dh_auto_build -a
dh_auto_build: Compatibility levels before 9 are deprecated (level 7 in use)
	make -j1
make[1]: Entering directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1'
cd build; make
make[2]: Entering directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build'
cp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/gc-unstable/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,<ffitarget,<ecl/ffitarget,' ecl/ffi.h > 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-15.3.7/,g' < lsp/config.pre > lsp/config.lsp
sed -e 's,@ecldir\\@,"/usr/lib/ecl-15.3.7/",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' /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/h/external.h > c/ecl/external.h
cp -rf /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/h/*.h /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/h/impl ecl/
cd c; make
make[3]: Entering directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c'
cat /<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/symbols_list2.h
if test -f ../CROSS-DPP; then touch dpp; else \
gcc -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I./ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/main.d main.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/main.d main.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/main.d -> main.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/main.d: In function 'cl_boot':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/main.d:520:2: warning: 'GC_dont_gc' is deprecated [-Wdeprecated-declarations]
  GC_disable();
  ^~~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/main.d:20:
/usr/include/gc/gc.h:199:7: note: declared here
   int GC_dont_gc;       /* != 0 ==> Don't collect.  In versions 6.2a1+, */
       ^~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/main.d:632:2: warning: 'GC_dont_gc' is deprecated [-Wdeprecated-declarations]
  GC_enable();
  ^~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/main.d:20:
/usr/include/gc/gc.h:199:7: note: declared here
   int GC_dont_gc;       /* != 0 ==> Don't collect.  In versions 6.2a1+, */
       ^~~~~~~~~~
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/symbol.d symbol.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/symbol.d symbol.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/symbol.d -> symbol.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/package.d package.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/package.d package.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/package.d -> package.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cons.d cons.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cons.d cons.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cons.d -> cons.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/list.d list.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/list.d list.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/list.d -> list.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/apply.d apply.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/apply.d apply.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/apply.d -> apply.c
gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/eval.d eval.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/eval.d eval.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/eval.d -> eval.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/interpreter.d interpreter.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/interpreter.d interpreter.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/interpreter.d -> interpreter.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:83:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/interpreter.d:16:
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/interpreter.d: In function 'ecl_interpret':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/stacks.h:192:25: warning: initialization discards 'volatile' qualifier from pointer target type [-Wdiscarded-qualifiers]
  ecl_ihs_ptr  const r = (rec); \
                         ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/interpreter.d:284:2: 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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/compiler.d compiler.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/compiler.d compiler.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/compiler.d -> compiler.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/disassembler.d disassembler.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/disassembler.d disassembler.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/disassembler.d -> disassembler.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/instance.d instance.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/instance.d instance.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/instance.d -> instance.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/gfun.d gfun.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/gfun.d gfun.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/gfun.d -> gfun.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/gfun.d: In function 'fill_spec_vector':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/gfun.d:138:44: warning: assignment makes pointer from integer without a cast [-Wint-conversion]
                 } else {
                                            ^
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/clos/cache.d clos/cache.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/clos/cache.d clos/cache.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/clos/cache.d -> clos/cache.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/clos/accessor.d clos/accessor.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/clos/accessor.d clos/accessor.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/clos/accessor.d -> clos/accessor.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reference.d reference.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reference.d reference.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reference.d -> reference.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/character.d character.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/character.d character.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/character.d -> character.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/file.d file.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/file.d file.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/file.d -> file.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/file.d: In function 'not_a_file_stream':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/file.d:5418:9: 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);
    ~~~~~~~~~~~~~~~~~
 }
 ~                               
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/file.d: In function 'file_libc_error':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/file.d:5486:1: warning: 'noreturn' function does return
 
 ^
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/read.d read.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/read.d read.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/read.d -> read.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/print.d print.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/print.d print.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/print.d -> print.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d error.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d error.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d -> error.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'si_signal_type_error':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:250:9: warning: function declared 'noreturn' has a 'return' statement
  return cl_error(5, @'type-error', @':expected-type', type,
         ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                         @':datum', value);
                         ~~~~~~~~~~~~~~~~~~            
In file included from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:80:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:18:
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'cl_error':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/object.h:245:19: warning: function declared 'noreturn' has a 'return' statement
 #define ECL_NIL   ((cl_object)t_list)
                   ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:535:30: note: in expansion of macro 'ECL_NIL'
 @)
                              ^      
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'ecl_unrecoverable_error':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:100:1: warning: 'noreturn' function does return
 }
 ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'FEprogram_error':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:158:1: warning: 'noreturn' function does return
 }
 ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'FEprogram_error_noreturn':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:183:1: warning: 'noreturn' function does return
 }
 ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'FEcontrol_error':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:195:1: warning: 'noreturn' function does return
 }
 ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'FEreader_error':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:226:1: warning: 'noreturn' function does return
 }
 ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'FEwrong_type_only_arg':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:281:1: warning: 'noreturn' function does return
 }
 ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'FEwrong_type_nth_arg':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:305:1: warning: 'noreturn' function does return
 }
 ^
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d: In function 'FEwrong_type_key_arg':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/error.d:329:1: warning: 'noreturn' function does return
 }
 ^
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/string.d string.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/string.d string.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/string.d -> string.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cfun.d cfun.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cfun.d cfun.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cfun.d -> cfun.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reader/parse_integer.d reader/parse_integer.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reader/parse_integer.d reader/parse_integer.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reader/parse_integer.d -> reader/parse_integer.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reader/parse_number.d reader/parse_number.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reader/parse_number.d reader/parse_number.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/reader/parse_number.d -> reader/parse_number.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/float_to_digits.d printer/float_to_digits.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/float_to_digits.d printer/float_to_digits.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/float_to_digits.d -> printer/float_to_digits.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/float_to_string.d printer/float_to_string.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/float_to_string.d printer/float_to_string.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/float_to_string.d -> printer/float_to_string.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/integer_to_string.d printer/integer_to_string.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/integer_to_string.d printer/integer_to_string.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/integer_to_string.d -> printer/integer_to_string.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_ugly.d printer/write_ugly.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_ugly.d printer/write_ugly.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_ugly.d -> printer/write_ugly.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_object.d printer/write_object.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_object.d printer/write_object.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_object.d -> printer/write_object.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_symbol.d printer/write_symbol.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_symbol.d printer/write_symbol.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_symbol.d -> printer/write_symbol.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_array.d printer/write_array.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_array.d printer/write_array.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_array.d -> printer/write_array.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_list.d printer/write_list.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_list.d printer/write_list.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_list.d -> printer/write_list.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_code.d printer/write_code.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_code.d printer/write_code.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_code.d -> printer/write_code.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_sse.d printer/write_sse.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_sse.d printer/write_sse.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/write_sse.d -> printer/write_sse.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/print_unreadable.d printer/print_unreadable.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/print_unreadable.d printer/print_unreadable.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/printer/print_unreadable.d -> printer/print_unreadable.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/libraries.d ffi/libraries.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/libraries.d ffi/libraries.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/libraries.d -> ffi/libraries.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/backtrace.d ffi/backtrace.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/backtrace.d ffi/backtrace.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/backtrace.d -> ffi/backtrace.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/mmap.d ffi/mmap.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/mmap.d ffi/mmap.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/mmap.d -> ffi/mmap.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/cdata.d ffi/cdata.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/cdata.d ffi/cdata.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi/cdata.d -> ffi/cdata.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/cos.d numbers/cos.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/cos.d numbers/cos.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/cos.d -> numbers/cos.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sin.d numbers/sin.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sin.d numbers/sin.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sin.d -> numbers/sin.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/tan.d numbers/tan.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/tan.d numbers/tan.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/tan.d -> numbers/tan.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/atan.d numbers/atan.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/atan.d numbers/atan.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/atan.d -> numbers/atan.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/cosh.d numbers/cosh.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/cosh.d numbers/cosh.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/cosh.d -> numbers/cosh.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sinh.d numbers/sinh.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sinh.d numbers/sinh.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sinh.d -> numbers/sinh.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/tanh.d numbers/tanh.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/tanh.d numbers/tanh.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/tanh.d -> numbers/tanh.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/exp.d numbers/exp.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/exp.d numbers/exp.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/exp.d -> numbers/exp.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/expt.d numbers/expt.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/expt.d numbers/expt.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/expt.d -> numbers/expt.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/log.d numbers/log.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/log.d numbers/log.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/log.d -> numbers/log.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sqrt.d numbers/sqrt.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sqrt.d numbers/sqrt.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/sqrt.d -> numbers/sqrt.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/abs.d numbers/abs.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/abs.d numbers/abs.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/abs.d -> numbers/abs.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/zerop.d numbers/zerop.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/zerop.d numbers/zerop.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/zerop.d -> numbers/zerop.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/plusp.d numbers/plusp.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/plusp.d numbers/plusp.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/plusp.d -> numbers/plusp.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minusp.d numbers/minusp.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minusp.d numbers/minusp.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minusp.d -> numbers/minusp.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/negate.d numbers/negate.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/negate.d numbers/negate.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/negate.d -> numbers/negate.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/conjugate.d numbers/conjugate.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/conjugate.d numbers/conjugate.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/conjugate.d -> numbers/conjugate.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/one_plus.d numbers/one_plus.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/one_plus.d numbers/one_plus.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/one_plus.d -> numbers/one_plus.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/one_minus.d numbers/one_minus.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/one_minus.d numbers/one_minus.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/one_minus.d -> numbers/one_minus.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/plus.d numbers/plus.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/plus.d numbers/plus.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/plus.d -> numbers/plus.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minus.d numbers/minus.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minus.d numbers/minus.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minus.d -> numbers/minus.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/times.d numbers/times.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/times.d numbers/times.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/times.d -> numbers/times.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/divide.d numbers/divide.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/divide.d numbers/divide.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/divide.d -> numbers/divide.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/number_compare.d numbers/number_compare.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/number_compare.d numbers/number_compare.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/number_compare.d -> numbers/number_compare.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/number_equalp.d numbers/number_equalp.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/number_equalp.d numbers/number_equalp.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/number_equalp.d -> numbers/number_equalp.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minmax.d numbers/minmax.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minmax.d numbers/minmax.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/minmax.d -> numbers/minmax.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/floor.d numbers/floor.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/floor.d numbers/floor.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/floor.d -> numbers/floor.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/ceiling.d numbers/ceiling.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/ceiling.d numbers/ceiling.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/ceiling.d -> numbers/ceiling.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/round.d numbers/round.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/round.d numbers/round.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/round.d -> numbers/round.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/truncate.d numbers/truncate.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/truncate.d numbers/truncate.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/numbers/truncate.d -> numbers/truncate.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/typespec.d typespec.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/typespec.d typespec.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/typespec.d -> typespec.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/assignment.d assignment.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/assignment.d assignment.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/assignment.d -> assignment.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/predicate.d predicate.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/predicate.d predicate.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/predicate.d -> predicate.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/number.d number.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/number.d number.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/number.d -> number.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_pred.d num_pred.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_pred.d num_pred.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_pred.d -> num_pred.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_arith.d num_arith.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_arith.d num_arith.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_arith.d -> num_arith.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_co.d num_co.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_co.d num_co.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_co.d -> num_co.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_log.d num_log.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_log.d num_log.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_log.d -> num_log.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_rand.d num_rand.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_rand.d num_rand.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/num_rand.d -> num_rand.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/array.d array.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/array.d array.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/array.d -> array.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/vector_push.d vector_push.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/vector_push.d vector_push.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/vector_push.d -> vector_push.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/sequence.d sequence.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/sequence.d sequence.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/sequence.d -> sequence.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cmpaux.d cmpaux.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cmpaux.d cmpaux.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cmpaux.d -> cmpaux.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/macros.d macros.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/macros.d macros.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/macros.d -> macros.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/backq.d backq.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/backq.d backq.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/backq.d -> backq.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/stacks.d stacks.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/stacks.d stacks.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/stacks.d -> stacks.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/time.d time.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/time.d time.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/time.d -> time.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixint.d unixint.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixint.d unixint.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixint.d -> unixint.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/mapfun.d mapfun.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/mapfun.d mapfun.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/mapfun.d -> mapfun.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/multival.d multival.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/multival.d multival.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/multival.d -> multival.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d hash.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d hash.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d -> hash.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d: In function 'copy_entry':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d:509:32: 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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d:20:
/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 */,
                       ^~~~~~~~~~~~~~~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d:515:32: 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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d:20:
/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 */,
                       ^~~~~~~~~~~~~~~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d:521:32: 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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/hash.d:20:
/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/format.d format.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/format.d format.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/format.d -> format.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/pathname.d pathname.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/pathname.d pathname.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/pathname.d -> pathname.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/structure.d structure.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/structure.d structure.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/structure.d -> structure.o.c

Unknown symbol: si::structure-include
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/load.d load.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/load.d load.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/load.d -> load.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixfsys.d unixfsys.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixfsys.d unixfsys.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixfsys.d -> unixfsys.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixsys.d unixsys.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixsys.d unixsys.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixsys.d -> unixsys.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixsys.d: In function 'si_run_program':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixsys.d:762: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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixsys.d:25: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[],
            ^~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixsys.d:764: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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unixsys.d:25: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[])
            ^~~~~~
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/serialize.d serialize.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/serialize.d serialize.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/serialize.d -> serialize.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/serialize.d: In function 'serialize_one':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/serialize.d:313:26: 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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi.d ffi.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi.d ffi.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/ffi.d -> ffi.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/sse2.d sse2.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/sse2.d sse2.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/sse2.d -> sse2.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/big.d big.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/big.d big.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/big.d -> big.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/process.d threads/process.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/process.d threads/process.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/process.d -> threads/process.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/process.d: In function 'mp_exit_process':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/process.d:598:1: warning: 'noreturn' function does return
 
 ^
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d threads/queue.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d threads/queue.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d -> threads/queue.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d: In function 'ecl_wait_on':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d:253:38: 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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d:20:
/usr/include/gc/gc_pthread_redirects.h:43:16: note: expected 'sigset_t * {aka struct <anonymous> *}' but argument is of type 'volatile sigset_t * {aka volatile struct <anonymous> *}'
     GC_API int GC_pthread_sigmask(int /* how */, const sigset_t *,
                ^~~~~~~~~~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d:274:15: warning: passing argument 1 of 'sigsuspend' discards 'volatile' qualifier from pointer target type [-Wdiscarded-qualifiers]
    sigsuspend(&original);
               ^
In file included from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d:19:0:
/usr/include/signal.h:254:12: note: expected 'const sigset_t * {aka const struct <anonymous> *}' but argument is of type 'volatile sigset_t * {aka volatile struct <anonymous> *}'
 extern int sigsuspend (const sigset_t *__set) __nonnull ((1));
            ^~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d:297:32: 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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/queue.d:20:
/usr/include/gc/gc_pthread_redirects.h:43:16: note: expected 'const sigset_t * {aka const struct <anonymous> *}' but argument is of type 'volatile sigset_t * {aka volatile struct <anonymous> *}'
     GC_API int GC_pthread_sigmask(int /* how */, const sigset_t *,
                ^~~~~~~~~~~~~~~~~~
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/mutex.d threads/mutex.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/mutex.d threads/mutex.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/mutex.d -> threads/mutex.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/condition_variable.d threads/condition_variable.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/condition_variable.d threads/condition_variable.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/condition_variable.d -> threads/condition_variable.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/semaphore.d threads/semaphore.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/semaphore.d threads/semaphore.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/semaphore.d -> threads/semaphore.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/barrier.d threads/barrier.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/barrier.d threads/barrier.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/barrier.d -> threads/barrier.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/mailbox.d threads/mailbox.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/mailbox.d threads/mailbox.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/mailbox.d -> threads/mailbox.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/rwlock.d threads/rwlock.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/rwlock.d threads/rwlock.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/rwlock.d -> threads/rwlock.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d alloc_2.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d alloc_2.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d -> alloc_2.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d: In function 'out_of_memory':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:122:9: warning: 'GC_oom_fn' is deprecated [-Wdeprecated-declarations]
         GC_oom_fn = out_of_memory_check;
         ^~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:109:39: note: declared here
 GC_API GC_ATTR_DEPRECATED GC_oom_func GC_oom_fn;
                                       ^~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:125:17: warning: 'GC_oom_fn' is deprecated [-Wdeprecated-declarations]
                 GC_oom_fn = out_of_memory;
                 ^~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:109:39: note: declared here
 GC_API GC_ATTR_DEPRECATED GC_oom_func GC_oom_fn;
                                       ^~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d: In function 'init_alloc':
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:792:2: warning: 'GC_no_dls' is deprecated [-Wdeprecated-declarations]
  GC_no_dls = 1;
  ^~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:257:31: note: declared here
 GC_API GC_ATTR_DEPRECATED int GC_no_dls;
                               ^~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:793:2: warning: 'GC_all_interior_pointers' is deprecated [-Wdeprecated-declarations]
  GC_all_interior_pointers = 0;
  ^~~~~~~~~~~~~~~~~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:143:31: note: declared here
 GC_API GC_ATTR_DEPRECATED int GC_all_interior_pointers;
                               ^~~~~~~~~~~~~~~~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:794:2: warning: 'GC_time_limit' is deprecated [-Wdeprecated-declarations]
  GC_time_limit = GC_TIME_UNLIMITED;
  ^~~~~~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:331:41: note: declared here
 GC_API GC_ATTR_DEPRECATED unsigned long GC_time_limit;
                                         ^~~~~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:809:2: warning: 'GC_dont_gc' is deprecated [-Wdeprecated-declarations]
  GC_disable();
  ^~~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:199:7: note: declared here
   int GC_dont_gc;       /* != 0 ==> Don't collect.  In versions 6.2a1+, */
       ^~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:1106:2: warning: 'GC_java_finalization' is deprecated [-Wdeprecated-declarations]
  GC_java_finalization = 1;
  ^~~~~~~~~~~~~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:169:31: note: declared here
 GC_API GC_ATTR_DEPRECATED int GC_java_finalization;
                               ^~~~~~~~~~~~~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:1107:9: warning: 'GC_oom_fn' is deprecated [-Wdeprecated-declarations]
         GC_oom_fn = out_of_memory;
         ^~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:109:39: note: declared here
 GC_API GC_ATTR_DEPRECATED GC_oom_func GC_oom_fn;
                                       ^~~~~~~~~
/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:1109:2: warning: 'GC_dont_gc' is deprecated [-Wdeprecated-declarations]
  GC_enable();
  ^~~~~~~~~
In file included from /usr/include/gc.h:2:0,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/config.h:83,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecl/ecl.h:35,
                 from /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/alloc_2.d:17:
/usr/include/gc/gc.h:199:7: note: declared here
   int GC_dont_gc;       /* != 0 ==> Don't collect.  In versions 6.2a1+, */
       ^~~~~~~~~~
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/tcp.d tcp.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/tcp.d tcp.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/tcp.d -> tcp.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd-0000.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd-0016.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd-0032.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd-0048.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd-0064.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd-0080.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd-0096.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd_names_char.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd_names_codes.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd_names_pair.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/unicode/ucd_names_str.c
if test -f ../CROSS-DPP ; then ../CROSS-DPP /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/atomic.d threads/atomic.o.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/atomic.d threads/atomic.o.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/threads/atomic.d -> threads/atomic.o.c
gcc -DECLDIR="\"/usr/lib/ecl-15.3.7\"" -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/all_symbols.d all_symbols.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/all_symbols.d all_symbols.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/all_symbols.d -> all_symbols.c
gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cinit.d cinit.c ; else ./dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cinit.d cinit.c ; fi
dpp: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c/cinit.d -> cinit.c
gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 '/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 -lpthread -ldl  -lm ;\
fi
sed -e 's,@ecldir\\@,/usr/lib/ecl-15.3.7/,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 "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmppackage.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmptypes.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpglobals.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/cmp/cmpdefs.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpmac.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpform.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmptables.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpinline.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmputil.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmptype-arith.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmptype-prop.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmptype.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmptype-assert.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpenv-api.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpenv-fun.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpenv-declare.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpenv-proclaim.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpenv-declaim.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpc-machine.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpc-wt.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpc-inliner.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpbind.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpblock.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpcall.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpcatch.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmppolicy.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpeval.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpexit.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpflet.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpfun.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpif.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmplam.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmplet.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmploc.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpmap.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpstack.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpmulti.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpspecial.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmptag.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmptop.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpvar.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpwt.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpffi.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpcbk.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpct.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpnum.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpname.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpopt.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpopt-bits.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpopt-clos.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpopt-constant.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpopt-cons.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpopt-printer.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpopt-sequence.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpopt-type.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpprop.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpclos.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpstructures.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmparray.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpos-run.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpos-features.lsp"
;;; System features: (32-BIT GCC GCC-COMPILER ELF)
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/cmpmain.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/cmp/proclamations.lsp"
;;; Loading "/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 12104
;;;   at (DEFUN MACROLET-FUNCTIONS ...)
;;;   Checking type of #:LET59 to be LIST
;;; Note:
;;;   in file DEFMACRO.LSP, position 12104
;;;   at (DEFUN MACROLET-FUNCTIONS ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST55) to be LIST
;;; Note:
;;;   in file DEFMACRO.LSP, position 12104
;;;   at (DEFUN MACROLET-FUNCTIONS ...)
;;;   Checking type of #:LOOP-LIST-TAIL57 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 #:G43.
;;; Emitting code for #:G42.
;;; Emitting code for MACROLET-FUNCTIONS.
;;; Emitting code for CMP-ENV-REGISTER-MACROLET.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1407
;;;   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 3235
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c lsp/evalmacros.c -o lsp/evalmacros.o 
;;; Finished compiling SRC:LSP;EVALMACROS.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 CHECK-STORES-NUMBER ...).
;;; Compiling (DEFUN DO-SETF-METHOD-EXPANSION ...).
;;; Compiling (DEFUN SETF-METHOD-WRAPPER ...).
;;; Compiling (DEFUN DO-DEFSETF ...).
;;; Function DO-DEFSETF proclaimed (2,2)
;;; 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 PSETF ...).
;;; Compiling (DEFMACRO SHIFTF ...).
;;; Compiling (DEFMACRO ROTATEF ...).
;;; 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 CHECK-STORES-NUMBER.
;;; Emitting code for DO-SETF-METHOD-EXPANSION.
;;; Emitting code for SETF-METHOD-WRAPPER.
;;; Emitting code for #:G6.
;;; Emitting code for DO-DEFSETF.
;;; Emitting code for #:G7.
;;; 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 PSETF.
;;; Emitting code for SHIFTF.
;;; Emitting code for ROTATEF.
;;; Emitting code for DEFINE-MODIFY-MACRO.
;;; Emitting code for REMF.
;;; Emitting code for INCF.
;;; Emitting code for #:G113.
;;; Emitting code for DECF.
;;; Emitting code for #:G125.
;;; Emitting code for PUSH.
;;; Emitting code for PUSHNEW.
;;; Emitting code for POP.
;;; Emitting code for VALUES.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 ...).
;;; Note:
;;;   in file PREDLIB.LSP, position 1848
;;;   at (FSET 'DEFTYPE ...)
;;;   Checking type of #:G56 to be CONS
;;; 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 14030
;;;   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 34223
;;;   at (DEFUN REGISTER-ARRAY-TYPE ...)
;;;   Checking type of #:LET198 to be LIST
;;; Note:
;;;   in file PREDLIB.LSP, position 34223
;;;   at (DEFUN REGISTER-ARRAY-TYPE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST194) to be LIST
;;; Note:
;;;   in file PREDLIB.LSP, position 34223
;;;   at (DEFUN REGISTER-ARRAY-TYPE ...)
;;;   Checking type of #:LOOP-LIST-TAIL196 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 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of #:LET245 to be LIST
;;; Note:
;;;   in file PREDLIB.LSP, position 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST241) to be LIST
;;; Note:
;;;   in file PREDLIB.LSP, position 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of #:LOOP-LIST-TAIL243 to be CONS
;;; Note:
;;;   in file PREDLIB.LSP, position 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of #:LET251 to be LIST
;;; Note:
;;;   in file PREDLIB.LSP, position 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST247) to be LIST
;;; Note:
;;;   in file PREDLIB.LSP, position 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of #:LOOP-LIST-TAIL249 to be CONS
;;; Note:
;;;   in file PREDLIB.LSP, position 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of #:LET258 to be LIST
;;; Note:
;;;   in file PREDLIB.LSP, position 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST254) to be LIST
;;; Note:
;;;   in file PREDLIB.LSP, position 47783
;;;   at (DEFUN CANONICAL-TYPE ...)
;;;   Checking type of #:LOOP-LIST-TAIL256 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 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 #:G190.
;;; Emitting code for #:G191.
;;; Emitting code for REGISTER-ARRAY-TYPE.
;;; 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 #:G219.
;;; Emitting code for #:G220.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 8011
;;;   at (DEFUN COERCE-TO-VECTOR ...)
;;;   Checking type of #:LET35 to be INDEX
;;; Function COERCE-TO-VECTOR proclaimed (4,4)
;;; Compiling (DEFUN CONCATENATE ...).
;;; Note:
;;;   in file SEQ.LSP, position 8774
;;;   at (DEFUN CONCATENATE ...)
;;;   Checking type of #:LET50 to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 8774
;;;   at (DEFUN CONCATENATE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST46) to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 8774
;;;   at (DEFUN CONCATENATE ...)
;;;   Checking type of #:LOOP-LIST-TAIL48 to be CONS
;;; Function CONCATENATE proclaimed (1,65536)
;;; Compiling (DEFUN MAP ...).
;;; Note:
;;;   in file SEQ.LSP, position 9397
;;;   at (DEFUN MAP ...)
;;;   Checking type of #:LET65 to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 9397
;;;   at (DEFUN MAP ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST61) to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 9397
;;;   at (DEFUN MAP ...)
;;;   Checking type of #:LOOP-LIST-TAIL63 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 11525
;;;   at (DEFUN EVERY* ...)
;;;   Checking type of #:LET97 to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 11525
;;;   at (DEFUN EVERY* ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST93) to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 11525
;;;   at (DEFUN EVERY* ...)
;;;   Checking type of #:LOOP-LIST-TAIL95 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 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of #:LET103 to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST99) to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of #:LOOP-LIST-TAIL101 to be CONS
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   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 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of #:LET109 to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST105) to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of #:LOOP-LIST-TAIL107 to be CONS
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of #:LET120 to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST116) to be LIST
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of #:LOOP-LIST-TAIL118 to be CONS
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   at (DEFUN MAP-INTO ...)
;;;   Checking type of V to be CONS
;;; Note:
;;;   in file SEQ.LSP, position 12346
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4502
;;;   at (DEFUN ARRAY-IN-BOUNDS-P ...)
;;;   In function ARRAY-IN-BOUNDS-P, checking types of arguments ARRAY.
;;; Note:
;;;   in file ARRAYLIB.LSP, position 4502
;;;   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 6190
;;;   at (DEFUN ARRAY-ROW-MAJOR-INDEX ...)
;;;   In function ARRAY-ROW-MAJOR-INDEX, checking types of arguments ARRAY.
;;; Note:
;;;   in file ARRAYLIB.LSP, position 6190
;;;   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 6550
;;;   at (DEFUN BIT ...)
;;;   In function BIT, checking types of arguments BIT-ARRAY.
;;; Note:
;;;   in file ARRAYLIB.LSP, position 6550
;;;   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 6855
;;;   at (DEFUN SBIT ...)
;;;   In function SBIT, checking types of arguments BIT-ARRAY.
;;; Note:
;;;   in file ARRAYLIB.LSP, position 6855
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4834
;;;   at (DEFUN REMOVE-OTHERWISE-FROM-CLAUSES ...)
;;;   Checking type of #:LET64 to be LIST
;;; Note:
;;;   in file ASSERT.LSP, position 4834
;;;   at (DEFUN REMOVE-OTHERWISE-FROM-CLAUSES ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST60) to be LIST
;;; Note:
;;;   in file ASSERT.LSP, position 4834
;;;   at (DEFUN REMOVE-OTHERWISE-FROM-CLAUSES ...)
;;;   Checking type of #:LOOP-LIST-TAIL62 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 7927
;;;   at (FSET 'CTYPECASE ...)
;;;   Checking type of #:LET118 to be LIST
;;; Note:
;;;   in file ASSERT.LSP, position 7927
;;;   at (FSET 'CTYPECASE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST114) to be LIST
;;; Note:
;;;   in file ASSERT.LSP, position 7927
;;;   at (FSET 'CTYPECASE ...)
;;;   Checking type of #:LOOP-LIST-TAIL116 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 CCASE.
;;; Emitting code for TYPECASE.
;;; Emitting code for ETYPECASE-ERROR.
;;; Emitting code for ETYPECASE.
;;; Emitting code for CTYPECASE-ERROR.
;;; Emitting code for #:G101.
;;; Emitting code for #:G102.
;;; Emitting code for CTYPECASE.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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:897: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 899
;;;   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 2699
;;;   at (DEFUN PROCESS-BOA-LAMBDA-LIST ...)
;;;   Checking type of #:G13 to be CONS
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 2699
;;;   at (DEFUN PROCESS-BOA-LAMBDA-LIST ...)
;;;   Checking type of #:G17 to be CONS
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 2699
;;;   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 7232
;;;   at (DEFUN MAKE-PREDICATE ...)
;;;   Checking type of #:LET40 to be FIXNUM
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 7232
;;;   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 9628
;;;   at (DEFUN OVERWRITE-SLOT-DESCRIPTIONS ...)
;;;   Checking type of (CDDDR #:G60) to be CONS
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 9628
;;;   at (DEFUN OVERWRITE-SLOT-DESCRIPTIONS ...)
;;;   Checking type of (CDDDDR #:G62) to be CONS
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 9628
;;;   at (DEFUN OVERWRITE-SLOT-DESCRIPTIONS ...)
;;;   Checking type of (NTHCDR 5 #:G64) to be CONS
;;; Compiling (DEFUN DEFINE-STRUCTURE ...).
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 10705
;;;   at (DEFUN DEFINE-STRUCTURE ...)
;;;   Checking type of #:LET73 to be LIST
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 10705
;;;   at (DEFUN DEFINE-STRUCTURE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST69) to be LIST
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 10705
;;;   at (DEFUN DEFINE-STRUCTURE ...)
;;;   Checking type of #:LOOP-LIST-TAIL71 to be CONS
;;; Function DEFINE-STRUCTURE proclaimed (0,65536)
;;; Compiling (DEFMACRO DEFSTRUCT ...).
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 12757
;;;   at (FSET 'DEFSTRUCT ...)
;;;   Checking type of #:LET112 to be LIST
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 12757
;;;   at (FSET 'DEFSTRUCT ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST108) to be LIST
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 12757
;;;   at (FSET 'DEFSTRUCT ...)
;;;   Checking type of #:LOOP-LIST-TAIL110 to be CONS
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 12757
;;;   at (FSET 'DEFSTRUCT ...)
;;;   Checking type of #:LET121 to be LIST
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 12757
;;;   at (FSET 'DEFSTRUCT ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST117) to be LIST
;;; Note:
;;;   in file DEFSTRUCT.LSP, position 12757
;;;   at (FSET 'DEFSTRUCT ...)
;;;   Checking type of #:LOOP-LIST-TAIL119 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 DEFSTRUCT.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 6713
;;;   at (DEFUN SHARP-A-READER ...)
;;;   Checking type of (1+ I) to be FIXNUM
;;; Compiling (DEFUN SHARP-S-READER ...).
;;; Note:
;;;   in file IOLIB.LSP, position 7566
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 580
;;;   at (DEFUN UNION ...)
;;;   Checking type of LAST to be CONS
;;; Note:
;;;   in file LISTLIB.LSP, position 580
;;;   at (DEFUN UNION ...)
;;;   Checking type of LAST to be CONS
;;; Function UNION proclaimed (2,65536)
;;; Compiling (DEFUN NUNION ...).
;;; Note:
;;;   in file LISTLIB.LSP, position 1099
;;;   at (DEFUN NUNION ...)
;;;   Checking type of LAST to be CONS
;;; Note:
;;;   in file LISTLIB.LSP, position 1099
;;;   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 1950
;;;   at (DEFUN NINTERSECTION ...)
;;;   Checking type of LAST to be CONS
;;; Note:
;;;   in file LISTLIB.LSP, position 1950
;;;   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 2733
;;;   at (DEFUN NSET-DIFFERENCE ...)
;;;   Checking type of LAST to be CONS
;;; Note:
;;;   in file LISTLIB.LSP, position 2733
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 723
;;;   at (DEFUN LOAD-LOGICAL-PATHNAME-TRANSLATIONS ...)
;;;   In function LOAD-LOGICAL-PATHNAME-TRANSLATIONS, checking types of arguments HOST.
;;; Note:
;;;   in file MISLIB.LSP, position 723
;;;   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 6608
;;;   at (DEFUN ENCODE-UNIVERSAL-TIME ...)
;;;   Checking type of (+ YEAR #:G25) 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c lsp/mislib.c -o lsp/mislib.o lsp/mislib.c: In function 'si_simple_program_error':
lsp/mislib.c:807:10: warning: function declared 'noreturn' has a 'return' statement
   return value0;
          ^~~~~~
lsp/mislib.c:807: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 5311
;;;   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 5919
;;;   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 7543
;;;   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 8188
;;;   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 10074
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 626
;;;   at (DEFUN FIND-ALL-SYMBOLS ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST1) to be LIST
;;; Note:
;;;   in file PACKLIB.LSP, position 626
;;;   at (DEFUN FIND-ALL-SYMBOLS ...)
;;;   Checking type of #:G6 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 5634
;;;   at (DEFUN APROPOS ...)
;;;   Checking type of #:LET81 to be LIST
;;; Note:
;;;   in file PACKLIB.LSP, position 5634
;;;   at (DEFUN APROPOS ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST79) 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 7070
;;;   at (DEFUN FIND-RELATIVE-PACKAGE ...)
;;;   Checking type of (1+ I) to be FIXNUM
;;; Note:
;;;   in file PACKLIB.LSP, position 7070
;;;   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 8113
;;;   at (DEFUN PACKAGE-PARENT ...)
;;;   Checking type of (1- (LENGTH NAME)) to be FIXNUM
;;; Note:
;;;   in file PACKLIB.LSP, position 8113
;;;   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 9146
;;;   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 PACKAGES-ITERATOR.
;;; Emitting code for #:G18.
;;; 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 #:G82.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 9610
;;;   at (DEFUN REMOVE ...)
;;;   In function REMOVE, checking types of arguments SEQUENCE.
;;; Note:
;;;   in file SEQLIB.LSP, position 9610
;;;   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 26721
;;;   at (DEFUN MISMATCH ...)
;;;   Checking type of (1+ I1) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 26721
;;;   at (DEFUN MISMATCH ...)
;;;   Checking type of (1+ I2) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 26721
;;;   at (DEFUN MISMATCH ...)
;;;   Checking type of #:LET360 to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 26721
;;;   at (DEFUN MISMATCH ...)
;;;   Checking type of #:LET361 to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 26721
;;;   at (DEFUN MISMATCH ...)
;;;   Checking type of (1- I1) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 26721
;;;   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 30537
;;;   at (DEFUN SEARCH-GENERIC ...)
;;;   Checking type of (- END1 START1) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 30537
;;;   at (DEFUN SEARCH-GENERIC ...)
;;;   Checking type of (- END2 L) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 30537
;;;   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 30537
;;;   at (DEFUN SEARCH-GENERIC ...)
;;;   Checking type of (- END1 START1) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 30537
;;;   at (DEFUN SEARCH-GENERIC ...)
;;;   Checking type of (- END2 L) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 30537
;;;   at (DEFUN SEARCH-GENERIC ...)
;;;   Checking type of (1+ I1) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 30537
;;;   at (DEFUN SEARCH-GENERIC ...)
;;;   Checking type of (1+ I2) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 30537
;;;   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 36757
;;;   at (DEFUN MERGE ...)
;;;   Checking type of (1+ I2) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 36757
;;;   at (DEFUN MERGE ...)
;;;   Checking type of (1+ I1) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 36757
;;;   at (DEFUN MERGE ...)
;;;   Checking type of (1+ I1) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 36757
;;;   at (DEFUN MERGE ...)
;;;   Checking type of (1+ I2) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 36757
;;;   at (DEFUN MERGE ...)
;;;   Checking type of (1+ I1) to be FIXNUM
;;; Note:
;;;   in file SEQLIB.LSP, position 36757
;;;   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 #:G462.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2062
;;;   at (DEFUN TRACE* ...)
;;;   Checking type of #:LET11 to be LIST
;;; Note:
;;;   in file TRACE.LSP, position 2062
;;;   at (DEFUN TRACE* ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST7) to be LIST
;;; Note:
;;;   in file TRACE.LSP, position 2062
;;;   at (DEFUN TRACE* ...)
;;;   Checking type of #:LOOP-LIST-TAIL9 to be CONS
;;; Note:
;;;   in file TRACE.LSP, position 2062
;;;   at (DEFUN TRACE* ...)
;;;   Checking type of #:LET16 to be LIST
;;; Note:
;;;   in file TRACE.LSP, position 2062
;;;   at (DEFUN TRACE* ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST14) to be LIST
;;; Compiling (DEFMACRO UNTRACE ...).
;;; Compiling (DEFUN UNTRACE* ...).
;;; Note:
;;;   in file TRACE.LSP, position 2340
;;;   at (DEFUN UNTRACE* ...)
;;;   Checking type of #:LET27 to be LIST
;;; Note:
;;;   in file TRACE.LSP, position 2340
;;;   at (DEFUN UNTRACE* ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST25) 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 11494
;;;   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 #:G73.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3769
;;;   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 13566
;;;   at (FSET 'LOOP-REALLY-DESETQ ...)
;;;   Checking type of #:LET170 to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 13566
;;;   at (FSET 'LOOP-REALLY-DESETQ ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST166) to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 13566
;;;   at (FSET 'LOOP-REALLY-DESETQ ...)
;;;   Checking type of #:G171 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 ...).
;;; Style warning:
;;;   in file LOOP2.LSP, position 20592
;;;   at (FSET 'LOOP-BODY ...)
;;;   ! The variable ENV is not used.
;;; 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 33956
;;;   at (DEFUN LOOP-DECLARE-VARIABLE ...)
;;;   Checking type of (CDR #:G309) 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 52710
;;;   at (DEFUN ADD-LOOP-PATH ...)
;;;   Checking type of #:LET386 to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 52710
;;;   at (DEFUN ADD-LOOP-PATH ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST382) to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 52710
;;;   at (DEFUN ADD-LOOP-PATH ...)
;;;   Checking type of #:LOOP-LIST-TAIL384 to be CONS
;;; Note:
;;;   in file LOOP2.LSP, position 52710
;;;   at (DEFUN ADD-LOOP-PATH ...)
;;;   Checking type of #:LET392 to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 52710
;;;   at (DEFUN ADD-LOOP-PATH ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST388) to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 52710
;;;   at (DEFUN ADD-LOOP-PATH ...)
;;;   Checking type of #:LOOP-LIST-TAIL390 to be CONS
;;; Compiling (DEFUN LOOP-FOR-BEING ...).
;;; Compiling (DEFUN LOOP-NAMED-VAR ...).
;;; Note:
;;;   in file LOOP2.LSP, position 55846
;;;   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 56130
;;;   at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...)
;;;   Checking type of #:LET424 to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 56130
;;;   at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST420) to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 56130
;;;   at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...)
;;;   Checking type of #:G425 to be CONS
;;; Note:
;;;   in file LOOP2.LSP, position 56130
;;;   at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...)
;;;   Checking type of #:LET441 to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 56130
;;;   at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST437) to be LIST
;;; Note:
;;;   in file LOOP2.LSP, position 56130
;;;   at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...)
;;;   Checking type of #:LOOP-LIST-TAIL439 to be CONS
;;; Note:
;;;   in file LOOP2.LSP, position 56130
;;;   at (DEFUN LOOP-COLLECT-PREPOSITIONAL-PHRASES ...)
;;;   Checking type of (IN-GROUP-P TOKEN GROUP) to be SYMBOL
;;; Compiling (DEFUN LOOP-SEQUENCER ...).
;;; Style warning:
;;;   in file LOOP2.LSP, position 58085
;;;   at (DEFUN LOOP-SEQUENCER ...)
;;;   ! The variable INDEXV-USER-SPECIFIED-P is not used.
;;; 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 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 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 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 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 81079
;;;   at (DEFPARAMETER *ILLEGAL-INSIDE-JUSTIFICATION* ...)
;;;   Checking type of #:LET1816 to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 81079
;;;   at (DEFPARAMETER *ILLEGAL-INSIDE-JUSTIFICATION* ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST1812) to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 81079
;;;   at (DEFPARAMETER *ILLEGAL-INSIDE-JUSTIFICATION* ...)
;;;   Checking type of #:LOOP-LIST-TAIL1814 to be CONS
;;; Compiling (DEFUN CHECK-OUTPUT-LAYOUT-MODE ...).
;;; Compiling (DEFUN ILLEGAL-INSIDE-JUSTIFICATION-P ...).
;;; Note:
;;;   in file FORMAT.LSP, position 82001
;;;   at (DEF-COMPLEX-FORMAT-DIRECTIVE < ...)
;;;   Checking type of #:LET1838 to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 82001
;;;   at (DEF-COMPLEX-FORMAT-DIRECTIVE < ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST1834) to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 82001
;;;   at (DEF-COMPLEX-FORMAT-DIRECTIVE < ...)
;;;   Checking type of #:LOOP-LIST-TAIL1836 to be CONS
;;; Note:
;;;   in file FORMAT.LSP, position 82952
;;;   at (DEF-COMPLEX-FORMAT-INTERPRETER < ...)
;;;   Checking type of #:LET1853 to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 82952
;;;   at (DEF-COMPLEX-FORMAT-INTERPRETER < ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST1849) to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 82952
;;;   at (DEF-COMPLEX-FORMAT-INTERPRETER < ...)
;;;   Checking type of #:LOOP-LIST-TAIL1851 to be CONS
;;; Compiling (DEFUN PARSE-FORMAT-JUSTIFICATION ...).
;;; Note:
;;;   in file FORMAT.LSP, position 84043
;;;   at (DEFUN PARSE-FORMAT-JUSTIFICATION ...)
;;;   Checking type of #:G1865 to be CONS
;;; Compiling (DEFUN EXPAND-FORMAT-JUSTIFICATION ...).
;;; Note:
;;;   in file FORMAT.LSP, position 84762
;;;   at (DEFUN EXPAND-FORMAT-JUSTIFICATION ...)
;;;   Checking type of #:LET1922 to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 84762
;;;   at (DEFUN EXPAND-FORMAT-JUSTIFICATION ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST1918) to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 84762
;;;   at (DEFUN EXPAND-FORMAT-JUSTIFICATION ...)
;;;   Checking type of #:LOOP-LIST-TAIL1920 to be CONS
;;; Compiling (DEFUN INTERPRET-FORMAT-JUSTIFICATION ...).
;;; Compiling (DEFUN FORMAT-JUSTIFICATION ...).
;;; Note:
;;;   in file FORMAT.LSP, position 87160
;;;   at (DEFUN FORMAT-JUSTIFICATION ...)
;;;   Checking type of #:LET1983 to be LIST
;;; Note:
;;;   in file FORMAT.LSP, position 87160
;;;   at (DEFUN FORMAT-JUSTIFICATION ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST1980) 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 90602
;;;   at (DEFUN ADD-FILL-STYLE-NEWLINES-AUX ...)
;;;   Checking type of #:G2016 to be CONS
;;; Note:
;;;   in file FORMAT.LSP, position 90602
;;;   at (DEFUN ADD-FILL-STYLE-NEWLINES-AUX ...)
;;;   Checking type of #:G2019 to be CONS
;;; Note:
;;;   in file FORMAT.LSP, position 90602
;;;   at (DEFUN ADD-FILL-STYLE-NEWLINES-AUX ...)
;;;   Checking type of #:G2022 to be CONS
;;; Compiling (DEFUN EXPAND-FORMAT-LOGICAL-BLOCK ...).
;;; Compiling (DEFUN INTERPRET-FORMAT-LOGICAL-BLOCK ...).
;;; Note:
;;;   in file FORMAT.LSP, position 92837
;;;   at (DEF-FORMAT-DIRECTIVE / ...)
;;;   Checking type of #:G2086 to be CONS
;;; Note:
;;;   in file FORMAT.LSP, position 92837
;;;   at (DEF-FORMAT-DIRECTIVE / ...)
;;;   Checking type of #:G2090 to be CONS
;;; Note:
;;;   in file FORMAT.LSP, position 93384
;;;   at (DEF-FORMAT-INTERPRETER / ...)
;;;   Checking type of #:G2115 to be CONS
;;; Note:
;;;   in file FORMAT.LSP, position 93384
;;;   at (DEF-FORMAT-INTERPRETER / ...)
;;;   Checking type of #:G2118 to be CONS
;;; Note:
;;;   in file FORMAT.LSP, position 93384
;;;   at (DEF-FORMAT-INTERPRETER / ...)
;;;   Checking type of #:G2121 to be CONS
;;; Compiling (DEFUN EXTRACT-USER-FUNCTION-NAME ...).
;;; End of Pass 1.
;;; 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 #:G275.
;;; Emitting code for #:G310.
;;; Emitting code for FORMAT-PRIN1.
;;; Emitting code for #:G347.
;;; Emitting code for #:G382.
;;; Emitting code for #:G419.
;;; Emitting code for #:G426.
;;; Emitting code for CHAR-PRINTING-P.
;;; Emitting code for FORMAT-PRINT-NAMED-CHARACTER.
;;; Emitting code for #:G439.
;;; Emitting code for #:G446.
;;; Emitting code for FORMAT-PRINT-INTEGER.
;;; Emitting code for FORMAT-ADD-COMMAS.
;;; Emitting code for EXPAND-FORMAT-INTEGER.
;;; Emitting code for #:G501.
;;; Emitting code for #:G507.
;;; Emitting code for #:G542.
;;; Emitting code for #:G548.
;;; Emitting code for #:G583.
;;; Emitting code for #:G589.
;;; Emitting code for #:G624.
;;; Emitting code for #:G630.
;;; Emitting code for #:G665.
;;; Emitting code for #:G707.
;;; 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 #:G776.
;;; Emitting code for #:G784.
;;; Emitting code for DECIMAL-STRING.
;;; Emitting code for #:G795.
;;; Emitting code for #:G837.
;;; Emitting code for FORMAT-FIXED.
;;; Emitting code for FORMAT-FIXED-AUX.
;;; Emitting code for #:G894.
;;; Emitting code for #:G950.
;;; Emitting code for FORMAT-EXPONENTIAL.
;;; Emitting code for FORMAT-EXPONENT-MARKER.
;;; Emitting code for FORMAT-EXP-AUX.
;;; Emitting code for #:G1026.
;;; Emitting code for #:G1082.
;;; Emitting code for FORMAT-GENERAL.
;;; Emitting code for FORMAT-GENERAL-AUX.
;;; Emitting code for #:G1138.
;;; Emitting code for #:G1173.
;;; Emitting code for FORMAT-DOLLARS.
;;; Emitting code for #:G1216.
;;; Emitting code for #:G1229.
;;; Emitting code for #:G1247.
;;; Emitting code for #:G1260.
;;; Emitting code for #:G1278.
;;; Emitting code for #:G1291.
;;; Emitting code for #:G1309.
;;; Emitting code for #:G1322.
;;; Emitting code for #:G1339.
;;; Emitting code for #:G1345.
;;; Emitting code for #:G1351.
;;; Emitting code for #:G1357.
;;; Emitting code for #:G1364.
;;; Emitting code for #:G1415.
;;; Emitting code for OUTPUT-SPACES.
;;; Emitting code for FORMAT-RELATIVE-TAB.
;;; Emitting code for FORMAT-ABSOLUTE-TAB.
;;; Emitting code for #:G1463.
;;; Emitting code for #:G1470.
;;; Emitting code for #:G1477.
;;; Emitting code for #:G1490.
;;; Emitting code for #:G1503.
;;; Emitting code for #:G1532.
;;; Emitting code for #:G1574.
;;; Emitting code for #:G1583.
;;; Emitting code for #:G1590.
;;; Emitting code for NSTRING-CAPITALIZE-FIRST.
;;; Emitting code for #:G1599.
;;; Emitting code for #:G1605.
;;; Emitting code for #:G1614.
;;; Emitting code for #:G1617.
;;; Emitting code for PARSE-CONDITIONAL-DIRECTIVE.
;;; Emitting code for #:G1626.
;;; Emitting code for EXPAND-MAYBE-CONDITIONAL.
;;; Emitting code for HAIRY.
;;; Emitting code for EXPAND-TRUE-FALSE-CONDITIONAL.
;;; Emitting code for HAIRY.
;;; Emitting code for #:G1664.
;;; Emitting code for #:G1692.
;;; Emitting code for #:G1695.
;;; Emitting code for #:G1698.
;;; Emitting code for #:G1701.
;;; Emitting code for #:G1704.
;;; Emitting code for #:G1733.
;;; Emitting code for #:G1757.
;;; Emitting code for COMPUTE-BINDINGS.
;;; Emitting code for COMPUTE-BLOCK.
;;; Emitting code for COMPUTE-LOOP.
;;; Emitting code for COMPUTE-INSIDES.
;;; Emitting code for #:G1778.
;;; Emitting code for DO-LOOP.
;;; Emitting code for BIND-ARGS.
;;; Emitting code for DO-GUTS.
;;; Emitting code for #:G1793.
;;; Emitting code for #:G1807.
;;; Emitting code for #:G1810.
;;; Emitting code for CHECK-OUTPUT-LAYOUT-MODE.
;;; Emitting code for ILLEGAL-INSIDE-JUSTIFICATION-P.
;;; Emitting code for #:G1827.
;;; Emitting code for #:G1841.
;;; Emitting code for PARSE-FORMAT-JUSTIFICATION.
;;; Emitting code for EXPAND-FORMAT-JUSTIFICATION.
;;; 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-2033.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-2047.
;;; Emitting code for #:G2041.
;;; Emitting code for #:G2055.
;;; Emitting code for #:G2062.
;;; Emitting code for #:G2065.
;;; Emitting code for #:G2096.
;;; Emitting code for EXTRACT-USER-FUNCTION-NAME.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2616
;;;   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 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LET180 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST176) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL178 to be CONS
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:G181 to be CONS
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LET191 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST187) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL189 to be CONS
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LET200 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST196) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:G201 to be CONS
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LET207 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST203) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:G208 to be CONS
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LET216 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST212) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL214 to be CONS
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LET225 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST221) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 2616
;;;   at (FSET 'DEFPACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL223 to be CONS
;;; Compiling (DEFUN DODEFPACKAGE ...).
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 7240
;;;   at (DEFUN DODEFPACKAGE ...)
;;;   Checking type of #:LET246 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 7240
;;;   at (DEFUN DODEFPACKAGE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST244) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 7240
;;;   at (DEFUN DODEFPACKAGE ...)
;;;   Checking type of #:LET252 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 7240
;;;   at (DEFUN DODEFPACKAGE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST248) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 7240
;;;   at (DEFUN DODEFPACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL250 to be CONS
;;; Compiling (DEFUN FIND-OR-MAKE-SYMBOL ...).
;;; Compiling (DEFUN FIND-DUPLICATES ...).
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of #:LET264 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST262) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of #:LET267 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST265) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of #:LET278 to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of (1+ I) to be REAL
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST276) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST276) to be LIST
;;; Note:
;;;   in file DEFPACKAGE.LSP, position 9189
;;;   at (DEFUN FIND-DUPLICATES ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST262) 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1822
;;;   at (DEFUN SIZE-OF-FOREIGN-TYPE ...)
;;;   Checking type of #:LET44 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 1822
;;;   at (DEFUN SIZE-OF-FOREIGN-TYPE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST40) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 1822
;;;   at (DEFUN SIZE-OF-FOREIGN-TYPE ...)
;;;   Checking type of #:LOOP-LIST-TAIL42 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 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of #:LET379 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST375) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL377 to be CONS
;;; Note:
;;;   in file FFI.LSP, position 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of #:LET386 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST382) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL384 to be CONS
;;; Note:
;;;   in file FFI.LSP, position 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of #:LET392 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST388) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 16670
;;;   at (FSET 'DEF-LIB-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL390 to be CONS
;;; Compiling (DEFMACRO DEF-FUNCTION ...).
;;; Note:
;;;   in file FFI.LSP, position 17231
;;;   at (FSET 'DEF-FUNCTION ...)
;;;   Checking type of #:LET414 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 17231
;;;   at (FSET 'DEF-FUNCTION ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST410) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 17231
;;;   at (FSET 'DEF-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL412 to be CONS
;;; Note:
;;;   in file FFI.LSP, position 17231
;;;   at (FSET 'DEF-FUNCTION ...)
;;;   Checking type of #:LET420 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 17231
;;;   at (FSET 'DEF-FUNCTION ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST416) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 17231
;;;   at (FSET 'DEF-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL418 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 22379
;;;   at (FSET 'DEFCALLBACK ...)
;;;   Checking type of #:LET494 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 22379
;;;   at (FSET 'DEFCALLBACK ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST490) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 22379
;;;   at (FSET 'DEFCALLBACK ...)
;;;   Checking type of #:LOOP-LIST-TAIL492 to be CONS
;;; Note:
;;;   in file FFI.LSP, position 22379
;;;   at (FSET 'DEFCALLBACK ...)
;;;   Checking type of #:LET500 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 22379
;;;   at (FSET 'DEFCALLBACK ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST496) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 22379
;;;   at (FSET 'DEFCALLBACK ...)
;;;   Checking type of #:LOOP-LIST-TAIL498 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 ...).
;;; Note:
;;;   in file FFI.LSP, position 24679
;;;   at (FSET 'DEFCBODY ...)
;;;   Checking type of #:LET547 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 24679
;;;   at (FSET 'DEFCBODY ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST543) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 24679
;;;   at (FSET 'DEFCBODY ...)
;;;   Checking type of #:LOOP-LIST-TAIL545 to be CONS
;;; Compiling (DEFMACRO DEFENTRY ...).
;;; Note:
;;;   in file FFI.LSP, position 25291
;;;   at (FSET 'DEFENTRY ...)
;;;   Checking type of #:LET575 to be LIST
;;; Note:
;;;   in file FFI.LSP, position 25291
;;;   at (FSET 'DEFENTRY ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST571) to be LIST
;;; Note:
;;;   in file FFI.LSP, position 25291
;;;   at (FSET 'DEFENTRY ...)
;;;   Checking type of #:LOOP-LIST-TAIL573 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 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 DEF-FUNCTION.
;;; 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 DEFENTRY.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 ...).
;;; End of Pass 1.
;;; Emitting code for WITHOUT-INTERRUPTS.
;;; Emitting code for WITH-INTERRUPTS.
;;; Emitting code for WITH-LOCK.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1296
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 942
;;;   at (UNLESS (FBOUNDP 'COMPILE) ...)
;;;   Checking type of #:LET8 to be LIST
;;; Note:
;;;   in file AUTOLOAD.LSP, position 942
;;;   at (UNLESS (FBOUNDP 'COMPILE) ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST6) 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2872
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 6681
;;;   at (DEFUN STANDARD-INSTANCE-SET ...)
;;;   ! Type mismatch was found in (THE FIXNUM LOCATION).
;;; Style warning:
;;;   in file STD-SLOT-VALUE.LSP, position 6681
;;;   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 6681
;;;   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 ...).
;;; Style warning:
;;;   in file STD-SLOT-VALUE.LSP, position 9476
;;;   at (DEFUN INVALID-SLOT-LOCATION ...)
;;;   ! The variable INSTANCE is not used.
;;; End of Pass 1.
;;; Style warning:
;;;   in file std-slot-value.lsp, position 6681
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4055
;;;   at (LET* (#) ...)
;;;   Checking type of #:LET219 to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST215) to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of #:LOOP-LIST-TAIL217 to be CONS
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of #:LET224 to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST222) to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of #:LET284 to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST282) to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of #:LET287 to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST285) to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of #:LET290 to be LIST
;;; Note:
;;;   in file BOOT.LSP, position 4055
;;;   at (LET* (#) ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST288) 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 ...).
;;; Warning:
;;;   in file KERNEL.LSP, position 2361
;;;   at (DEFUN INSTALL-METHOD ...)
;;;   ! IGNORABLE declaration was found for not bound variable DOC.
;;; Note:
;;;   in file KERNEL.LSP, position 2361
;;;   at (DEFUN INSTALL-METHOD ...)
;;;   Checking type of #:LET9 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 2361
;;;   at (DEFUN INSTALL-METHOD ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 2361
;;;   at (DEFUN INSTALL-METHOD ...)
;;;   Checking type of #:LOOP-LIST-TAIL7 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 4820
;;;   at (DEFUN COMPUTE-DISCRIMINATING-FUNCTION ...)
;;;   Checking type of #:LET48 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 4820
;;;   at (DEFUN COMPUTE-DISCRIMINATING-FUNCTION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 4820
;;;   at (DEFUN COMPUTE-DISCRIMINATING-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL46 to be CONS
;;; Compiling (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...).
;;; Note:
;;;   in file KERNEL.LSP, position 5404
;;;   at (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...)
;;;   Checking type of #:LET52 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 5404
;;;   at (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST50) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 5404
;;;   at (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...)
;;;   Checking type of #:LET55 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 5404
;;;   at (DEFUN SET-GENERIC-FUNCTION-DISPATCH ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST53) to be LIST
;;; Compiling (DEFUN STD-COMPUTE-APPLICABLE-METHODS ...).
;;; Function STD-COMPUTE-APPLICABLE-METHODS proclaimed (2,2)
;;; Compiling (DEFUN APPLICABLE-METHOD-LIST ...).
;;; Note:
;;;   in file KERNEL.LSP, position 8961
;;;   at (DEFUN APPLICABLE-METHOD-LIST ...)
;;;   Checking type of #:LET172 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 8961
;;;   at (DEFUN APPLICABLE-METHOD-LIST ...)
;;;   Checking type of #:LET174 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 8961
;;;   at (DEFUN APPLICABLE-METHOD-LIST ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST169) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 8961
;;;   at (DEFUN APPLICABLE-METHOD-LIST ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST170) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 8961
;;;   at (DEFUN APPLICABLE-METHOD-LIST ...)
;;;   Checking type of #:LET179 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 8961
;;;   at (DEFUN APPLICABLE-METHOD-LIST ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST175) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 8961
;;;   at (DEFUN APPLICABLE-METHOD-LIST ...)
;;;   Checking type of #:LOOP-LIST-TAIL177 to be CONS
;;; Compiling (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...).
;;; Note:
;;;   in file KERNEL.LSP, position 9554
;;;   at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...)
;;;   Checking type of #:LET240 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 9554
;;;   at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...)
;;;   Checking type of #:LET242 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 9554
;;;   at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST237) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 9554
;;;   at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST238) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 9554
;;;   at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...)
;;;   Checking type of #:LET248 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 9554
;;;   at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST244) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 9554
;;;   at (DEFUN STD-COMPUTE-APPLICABLE-METHODS-USING-CLASSES ...)
;;;   Checking type of #:LOOP-LIST-TAIL246 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 13799
;;;   at (DEFUN COMPUTE-G-F-SPEC-LIST ...)
;;;   Checking type of #:G568 to be CONS
;;; Style warning:
;;;   in file KERNEL.LSP, position 13799
;;;   at (DEFUN COMPUTE-G-F-SPEC-LIST ...)
;;;   ! The variable GF is not used.
;;; Note:
;;;   in file KERNEL.LSP, position 13799
;;;   at (DEFUN COMPUTE-G-F-SPEC-LIST ...)
;;;   Checking type of #:LET580 to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 13799
;;;   at (DEFUN COMPUTE-G-F-SPEC-LIST ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST576) to be LIST
;;; Note:
;;;   in file KERNEL.LSP, position 13799
;;;   at (DEFUN COMPUTE-G-F-SPEC-LIST ...)
;;;   Checking type of #:LOOP-LIST-TAIL578 to be CONS
;;; Note:
;;;   in file KERNEL.LSP, position 13799
;;;   at (DEFUN COMPUTE-G-F-SPEC-LIST ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST576) 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 WRAPPED-METHOD-FUNCTION.
;;; Emitting code for #:G12.
;;; 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 #:G42.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1403
;;;   at (FSET 'DEFMETHOD ...)
;;;   Checking type of #:LOOP-LIST-TAIL34 to be CONS
;;; Note:
;;;   in file METHOD.LSP, position 1403
;;;   at (FSET 'DEFMETHOD ...)
;;;   Checking type of #:LET47 to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 1403
;;;   at (FSET 'DEFMETHOD ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST43) to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 1403
;;;   at (FSET 'DEFMETHOD ...)
;;;   Checking type of #:LOOP-LIST-TAIL45 to be CONS
;;; Note:
;;;   in file METHOD.LSP, position 1403
;;;   at (FSET 'DEFMETHOD ...)
;;;   Checking type of #:LET53 to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 1403
;;;   at (FSET 'DEFMETHOD ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST49) to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 1403
;;;   at (FSET 'DEFMETHOD ...)
;;;   Checking type of #:LOOP-LIST-TAIL51 to be CONS
;;; Style warning:
;;;   in file METHOD.LSP, position 1403
;;;   at (FSET 'DEFMETHOD ...)
;;;   ! The variable DECLARATIONS is not used.
;;; Compiling (DEFUN SPECIALIZERS-EXPRESSION ...).
;;; Note:
;;;   in file METHOD.LSP, position 3120
;;;   at (DEFUN SPECIALIZERS-EXPRESSION ...)
;;;   Checking type of #:LET58 to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 3120
;;;   at (DEFUN SPECIALIZERS-EXPRESSION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST54) to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 3120
;;;   at (DEFUN SPECIALIZERS-EXPRESSION ...)
;;;   Checking type of #:LOOP-LIST-TAIL56 to be CONS
;;; Compiling (DEFUN MAYBE-REMOVE-BLOCK ...).
;;; Style warning:
;;;   in file METHOD.LSP, position 3993
;;;   at (DEFUN MAYBE-REMOVE-BLOCK ...)
;;;   ! The variable DOCUMENTATION is not used.
;;; Compiling (DEFUN SIMPLIFY-LAMBDA ...).
;;; Style warning:
;;;   in file METHOD.LSP, position 4452
;;;   at (DEFUN SIMPLIFY-LAMBDA ...)
;;;   ! The variable METHOD-NAME is not used.
;;; Compiling (DEFUN MAKE-RAW-LAMBDA ...).
;;; Note:
;;;   in file METHOD.LSP, position 4963
;;;   at (DEFUN MAKE-RAW-LAMBDA ...)
;;;   Checking type of #:LET75 to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 4963
;;;   at (DEFUN MAKE-RAW-LAMBDA ...)
;;;   Checking type of #:LET77 to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 4963
;;;   at (DEFUN MAKE-RAW-LAMBDA ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST70) to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 4963
;;;   at (DEFUN MAKE-RAW-LAMBDA ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST71) to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 4963
;;;   at (DEFUN MAKE-RAW-LAMBDA ...)
;;;   Checking type of #:G79 to be CONS
;;; Style warning:
;;;   in file METHOD.LSP, position 4963
;;;   at (DEFUN MAKE-RAW-LAMBDA ...)
;;;   ! The variable ENV is not used.
;;; Compiling (DEFUN MAKE-METHOD-LAMBDA ...).
;;; Style warning:
;;;   in file METHOD.LSP, position 7089
;;;   at (DEFUN MAKE-METHOD-LAMBDA ...)
;;;   ! The variable CALL-NEXT-METHOD-P is not used.
;;; Style warning:
;;;   in file METHOD.LSP, position 7089
;;;   at (DEFUN MAKE-METHOD-LAMBDA ...)
;;;   ! The variable NEXT-METHOD-P-P is not used.
;;; Style warning:
;;;   in file METHOD.LSP, position 7089
;;;   at (DEFUN MAKE-METHOD-LAMBDA ...)
;;;   ! The variable METHOD is not used.
;;; Style warning:
;;;   in file METHOD.LSP, position 7089
;;;   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 7541
;;;   at (DEFUN ADD-CALL-NEXT-METHOD-CLOSURE ...)
;;;   ! The variable DECLARATIONS is not used.
;;; Style warning:
;;;   in file METHOD.LSP, position 7541
;;;   at (DEFUN ADD-CALL-NEXT-METHOD-CLOSURE ...)
;;;   ! The variable DOCUMENTATION is not used.
;;; Compiling (DEFUN ENVIRONMENT-CONTAINS-CLOSURE ...).
;;; Note:
;;;   in file METHOD.LSP, position 8216
;;;   at (DEFUN ENVIRONMENT-CONTAINS-CLOSURE ...)
;;;   Checking type of ITEM to be CONS
;;; Note:
;;;   in file METHOD.LSP, position 8216
;;;   at (DEFUN ENVIRONMENT-CONTAINS-CLOSURE ...)
;;;   Checking type of (+ COUNTER #:G85) to be FIXNUM
;;; Compiling (DEFUN WALK-METHOD-LAMBDA ...).
;;; Compiling (DEFUN LEGAL-GENERIC-FUNCTION-NAME-P ...).
;;; Compiling (DEFUN PARSE-DEFMETHOD ...).
;;; 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 11315
;;;   at (DEFUN PARSE-SPECIALIZED-LAMBDA-LIST ...)
;;;   Checking type of #:G116 to be CONS
;;; Compiling (DEFUN DECLARATION-SPECIALIZERS ...).
;;; Compiling (DEFUN COMPUTE-METHOD-KEYWORDS ...).
;;; Note:
;;;   in file METHOD.LSP, position 13688
;;;   at (DEFUN COMPUTE-METHOD-KEYWORDS ...)
;;;   Checking type of #:LET129 to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 13688
;;;   at (DEFUN COMPUTE-METHOD-KEYWORDS ...)
;;;   Checking type of (CDDDDR #:LOOP-LIST125) to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 13688
;;;   at (DEFUN COMPUTE-METHOD-KEYWORDS ...)
;;;   Checking type of #:LOOP-LIST-TAIL127 to be CONS
;;; Compiling (DEFUN MAKE-METHOD ...).
;;; Compiling (DEFUN METHOD-P ...).
;;; Compiling (DEFUN ADD-METHOD ...).
;;; Note:
;;;   in file METHOD.LSP, position 14632
;;;   at (DEFUN ADD-METHOD ...)
;;;   Checking type of #:G254 to be CONS
;;; Compiling (DEFUN FIND-METHOD ...).
;;; Note:
;;;   in file METHOD.LSP, position 15444
;;;   at (DEFUN FIND-METHOD ...)
;;;   Checking type of #:LET272 to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 15444
;;;   at (DEFUN FIND-METHOD ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST268) to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 15444
;;;   at (DEFUN FIND-METHOD ...)
;;;   Checking type of #:LOOP-LIST-TAIL270 to be CONS
;;; Note:
;;;   in file METHOD.LSP, position 15444
;;;   at (DEFUN FIND-METHOD ...)
;;;   Checking type of #:LET274 to be LIST
;;; Note:
;;;   in file METHOD.LSP, position 15444
;;;   at (DEFUN FIND-METHOD ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST266) 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 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2374
;;;   at (DEFUN EFFECTIVE-METHOD-FUNCTION ...)
;;;   Checking type of #:LET6 to be LIST
;;; Note:
;;;   in file COMBIN.LSP, position 2374
;;;   at (DEFUN EFFECTIVE-METHOD-FUNCTION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2) to be LIST
;;; Note:
;;;   in file COMBIN.LSP, position 2374
;;;   at (DEFUN EFFECTIVE-METHOD-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL4 to be CONS
;;; Compiling (DEFUN COMBINE-METHOD-FUNCTIONS ...).
;;; Compiling (DEFMACRO CALL-METHOD ...).
;;; Note:
;;;   in file COMBIN.LSP, position 3677
;;;   at (FSET 'CALL-METHOD ...)
;;;   Checking type of #:LET21 to be LIST
;;; Note:
;;;   in file COMBIN.LSP, position 3677
;;;   at (FSET 'CALL-METHOD ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST17) to be LIST
;;; Note:
;;;   in file COMBIN.LSP, position 3677
;;;   at (FSET 'CALL-METHOD ...)
;;;   Checking type of #:LOOP-LIST-TAIL19 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 7752
;;;   at (DEFUN SEARCH-METHOD-COMBINATION ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK68) to be FIXNUM
;;; Compiling (DEFUN INSTALL-METHOD-COMBINATION ...).
;;; Note:
;;;   in file COMBIN.LSP, position 7940
;;;   at (DEFUN INSTALL-METHOD-COMBINATION ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK84) to be FIXNUM
;;; Compiling (DEFUN MAKE-METHOD-COMBINATION ...).
;;; Compiling (DEFUN FIND-METHOD-COMBINATION ...).
;;; Style warning:
;;;   in file COMBIN.LSP, position 8330
;;;   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 #:G7.
;;; 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 #:G28.
;;; Emitting code for STANDARD-COMPUTE-EFFECTIVE-METHOD.
;;; Emitting code for #:G64.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 841
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2990
;;;   at (DEFUN UNCOMPRESS-SLOT-FORMS ...)
;;;   Checking type of #:LET48 to be LIST
;;; Note:
;;;   in file DEFCLASS.LSP, position 2990
;;;   at (DEFUN UNCOMPRESS-SLOT-FORMS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST
;;; Note:
;;;   in file DEFCLASS.LSP, position 2990
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3231
;;;   at (DEFUN COMPUTE-INSTANCE-SIZE ...)
;;;   Checking type of #:LET65 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 3231
;;;   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 6518
;;;   at (DEFMETHOD INITIALIZE-INSTANCE ...)
;;;   Checking type of #:LET94 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 6518
;;;   at (DEFMETHOD INITIALIZE-INSTANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST90) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 6518
;;;   at (DEFMETHOD INITIALIZE-INSTANCE ...)
;;;   Checking type of #:LOOP-LIST-TAIL92 to be CONS
;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...).
;;; Note:
;;;   in file STANDARD.LSP, position 6881
;;;   at (DEFMETHOD SHARED-INITIALIZE ...)
;;;   Checking type of #:LET106 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 6881
;;;   at (DEFMETHOD SHARED-INITIALIZE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST104) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 6881
;;;   at (DEFMETHOD SHARED-INITIALIZE ...)
;;;   Checking type of #:LET111 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 6881
;;;   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 7637
;;;   at (DEFUN PRECOMPUTE-VALID-INITARG-KEYWORDS ...)
;;;   Checking type of #:LET118 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 7637
;;;   at (DEFUN PRECOMPUTE-VALID-INITARG-KEYWORDS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST114) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 7637
;;;   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 8475
;;;   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 9179
;;;   at (DEFUN CHECK-DIRECT-SUPERCLASSES ...)
;;;   Checking type of #:LET163 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 9179
;;;   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 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of #:LET216 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST212) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of #:LOOP-LIST-TAIL214 to be CONS
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of #:LET219 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST217) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of #:LET222 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST220) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of #:LET226 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST224) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of #:LET240 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 10873
;;;   at (DEFMETHOD FINALIZE-INHERITANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST238) to be LIST
;;; Compiling (DEFMETHOD FINALIZE-INHERITANCE ...).
;;; Compiling (DEFMETHOD COMPUTE-CLASS-PRECEDENCE-LIST ...).
;;; Compiling (DEFMETHOD COMPUTE-SLOTS ...).
;;; Note:
;;;   in file STANDARD.LSP, position 15035
;;;   at (DEFMETHOD COMPUTE-SLOTS ...)
;;;   Checking type of #:LET270 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 15035
;;;   at (DEFMETHOD COMPUTE-SLOTS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST266) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 15035
;;;   at (DEFMETHOD COMPUTE-SLOTS ...)
;;;   Checking type of #:LOOP-LIST-TAIL268 to be CONS
;;; Note:
;;;   in file STANDARD.LSP, position 15035
;;;   at (DEFMETHOD COMPUTE-SLOTS ...)
;;;   Checking type of #:LET276 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 15035
;;;   at (DEFMETHOD COMPUTE-SLOTS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST272) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 15035
;;;   at (DEFMETHOD COMPUTE-SLOTS ...)
;;;   Checking type of #:LOOP-LIST-TAIL274 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 18595
;;;   at (DEFMETHOD COMPUTE-DEFAULT-INITARGS ...)
;;;   Checking type of #:LET365 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 18595
;;;   at (DEFMETHOD COMPUTE-DEFAULT-INITARGS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST361) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 18595
;;;   at (DEFMETHOD COMPUTE-DEFAULT-INITARGS ...)
;;;   Checking type of #:LOOP-LIST-TAIL363 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 20527
;;;   at (DEFUN HELP-ENSURE-CLASS ...)
;;;   Checking type of #:LET388 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 20527
;;;   at (DEFUN HELP-ENSURE-CLASS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST384) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 20527
;;;   at (DEFUN HELP-ENSURE-CLASS ...)
;;;   Checking type of #:LOOP-LIST-TAIL386 to be CONS
;;; Compiling (DEFUN CLASS-COMPUTE-SLOTS ...).
;;; Note:
;;;   in file STANDARD.LSP, position 21090
;;;   at (DEFUN CLASS-COMPUTE-SLOTS ...)
;;;   Checking type of #:LET391 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 21090
;;;   at (DEFUN CLASS-COMPUTE-SLOTS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST389) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 21090
;;;   at (DEFUN CLASS-COMPUTE-SLOTS ...)
;;;   Checking type of #:LET398 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 21090
;;;   at (DEFUN CLASS-COMPUTE-SLOTS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST396) 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 25242
;;;   at (DEFUN VALID-KEYWORDS-FROM-METHODS ...)
;;;   Checking type of #:LET448 to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 25242
;;;   at (DEFUN VALID-KEYWORDS-FROM-METHODS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST444) to be LIST
;;; Note:
;;;   in file STANDARD.LSP, position 25242
;;;   at (DEFUN VALID-KEYWORDS-FROM-METHODS ...)
;;;   Checking type of #:G454 to be CONS
;;; Compiling (DEFUN CHECK-INITARGS ...).
;;; Compiling (DEFMETHOD DESCRIBE-OBJECT ...).
;;; Note:
;;;   in file STANDARD.LSP, position 26933
;;;   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 #:G255.
;;; Emitting code for #:G256.
;;; Emitting code for #:G264.
;;; Emitting code for SLOT-DEFINITION-TO-PLIST.
;;; Emitting code for SAFE-SLOT-DEFINITION-LOCATION.
;;; Emitting code for #:G344.
;;; Emitting code for COMBINE-SLOTDS.
;;; Emitting code for DIRECT-TO-EFFECTIVE.
;;; Emitting code for #:G359.
;;; Emitting code for #:G372.
;;; Emitting code for COERCE-TO-CLASS.
;;; Emitting code for HELP-ENSURE-CLASS.
;;; Emitting code for CLASS-COMPUTE-SLOTS.
;;; Emitting code for #:G407.
;;; Emitting code for STD-CLASS-COMPUTE-SLOTS.
;;; Emitting code for #:G435.
;;; Emitting code for #:G436.
;;; Emitting code for VALID-KEYWORDS-FROM-METHODS.
;;; Emitting code for CHECK-INITARGS.
;;; Emitting code for #:G474.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3474
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1261
;;;   at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...)
;;;   Checking type of #:LET11 to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 1261
;;;   at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST7) to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 1261
;;;   at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...)
;;;   Checking type of #:LOOP-LIST-TAIL9 to be CONS
;;; Note:
;;;   in file CHANGE.LSP, position 1261
;;;   at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...)
;;;   Checking type of #:LET17 to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 1261
;;;   at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST13) to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 1261
;;;   at (DEFMETHOD UPDATE-INSTANCE-FOR-DIFFERENT-CLASS ...)
;;;   Checking type of #:LOOP-LIST-TAIL15 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 5497
;;;   at (DEFMETHOD UPDATE-INSTANCE-FOR-REDEFINED-CLASS ...)
;;;   ! The variable INITARGS is not used.
;;; Compiling (DEFUN UPDATE-INSTANCE ...).
;;; Note:
;;;   in file CHANGE.LSP, position 6153
;;;   at (DEFUN UPDATE-INSTANCE ...)
;;;   Checking type of #:LET320 to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 6153
;;;   at (DEFUN UPDATE-INSTANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST316) to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 6153
;;;   at (DEFUN UPDATE-INSTANCE ...)
;;;   Checking type of #:LOOP-LIST-TAIL318 to be CONS
;;; Note:
;;;   in file CHANGE.LSP, position 6153
;;;   at (DEFUN UPDATE-INSTANCE ...)
;;;   Checking type of #:LET326 to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 6153
;;;   at (DEFUN UPDATE-INSTANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST322) to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 6153
;;;   at (DEFUN UPDATE-INSTANCE ...)
;;;   Checking type of #:LOOP-LIST-TAIL324 to be CONS
;;; Note:
;;;   in file CHANGE.LSP, position 6153
;;;   at (DEFUN UPDATE-INSTANCE ...)
;;;   Checking type of (+ NEW-I #:G336) to be FIXNUM
;;; Compiling (DEFMETHOD REINITIALIZE-INSTANCE ...).
;;; Note:
;;;   in file CHANGE.LSP, position 8015
;;;   at (DEFMETHOD REINITIALIZE-INSTANCE ...)
;;;   Checking type of #:LET369 to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 8015
;;;   at (DEFMETHOD REINITIALIZE-INSTANCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST365) to be LIST
;;; Note:
;;;   in file CHANGE.LSP, position 8015
;;;   at (DEFMETHOD REINITIALIZE-INSTANCE ...)
;;;   Checking type of #:LOOP-LIST-TAIL367 to be CONS
;;; Style warning:
;;;   in file CHANGE.LSP, position 8015
;;;   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 #:G30.
;;; Emitting code for #:G37.
;;; Emitting code for #:G38.
;;; Emitting code for #:G255.
;;; Emitting code for UPDATE-INSTANCE.
;;; Emitting code for #:G361.
;;; Emitting code for #:G385.
;;; Emitting code for REMOVE-OPTIONAL-SLOT-ACCESSORS.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1032
;;;   at (DEFMETHOD SHARED-INITIALIZE ...)
;;;   Checking type of #:LET14 to be LIST
;;; Note:
;;;   in file STDMETHOD.LSP, position 1032
;;;   at (DEFMETHOD SHARED-INITIALIZE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST12) to be LIST
;;; Style warning:
;;;   in file STDMETHOD.LSP, position 1032
;;;   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 2176
;;;   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 3092
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 566
;;;   at (FSET 'DEFGENERIC ...)
;;;   Checking type of #:LET34 to be LIST
;;; Note:
;;;   in file GENERIC.LSP, position 566
;;;   at (FSET 'DEFGENERIC ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST30) to be LIST
;;; Note:
;;;   in file GENERIC.LSP, position 566
;;;   at (FSET 'DEFGENERIC ...)
;;;   Checking type of #:LOOP-LIST-TAIL32 to be CONS
;;; Note:
;;;   in file GENERIC.LSP, position 566
;;;   at (FSET 'DEFGENERIC ...)
;;;   Checking type of #:LET39 to be LIST
;;; Note:
;;;   in file GENERIC.LSP, position 566
;;;   at (FSET 'DEFGENERIC ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST35) to be LIST
;;; Note:
;;;   in file GENERIC.LSP, position 566
;;;   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 3732
;;;   at (DEFUN VALID-DECLARATION-P ...)
;;;   Checking type of #:LET55 to be LIST
;;; Note:
;;;   in file GENERIC.LSP, position 3732
;;;   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 4225
;;;   at (DEFMETHOD SHARED-INITIALIZE ...)
;;;   Checking type of #:LET74 to be LIST
;;; Note:
;;;   in file GENERIC.LSP, position 4225
;;;   at (DEFMETHOD SHARED-INITIALIZE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST70) to be LIST
;;; Note:
;;;   in file GENERIC.LSP, position 4225
;;;   at (DEFMETHOD SHARED-INITIALIZE ...)
;;;   Checking type of #:LOOP-LIST-TAIL72 to be CONS
;;; Compiling (DEFMETHOD SHARED-INITIALIZE ...).
;;; Style warning:
;;;   in file GENERIC.LSP, position 6928
;;;   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 #:G79.
;;; Emitting code for ASSOCIATE-METHODS-TO-GFUN.
;;; Emitting code for #:G110.
;;; Emitting code for #:G145.
;;; Emitting code for ENSURE-GENERIC-FUNCTION.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1852
;;;   at (DEFUN REGISTER-METHOD-WITH-SPECIALIZERS ...)
;;;   Checking type of #:LET6 to be LIST
;;; Note:
;;;   in file FIXUP.LSP, position 1852
;;;   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 7205
;;;   at (DEFUN REMOVE-METHOD ...)
;;;   Checking type of #:LET39 to be LIST
;;; Note:
;;;   in file FIXUP.LSP, position 7205
;;;   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 9013
;;;   at (DEFMETHOD NO-APPLICABLE-METHOD ...)
;;;   Checking type of #:LET52 to be LIST
;;; Note:
;;;   in file FIXUP.LSP, position 9013
;;;   at (DEFMETHOD NO-APPLICABLE-METHOD ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST
;;; Note:
;;;   in file FIXUP.LSP, position 9013
;;;   at (DEFMETHOD NO-APPLICABLE-METHOD ...)
;;;   Checking type of #:LOOP-LIST-TAIL50 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 11259
;;;   at (DEFUN RECURSIVELY-UPDATE-CLASSES ...)
;;;   Checking type of #:LET111 to be LIST
;;; Note:
;;;   in file FIXUP.LSP, position 11259
;;;   at (DEFUN RECURSIVELY-UPDATE-CLASSES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST109) to be LIST
;;; Compiling (DEFMETHOD UPDATE-DEPENDENT ...).
;;; End of Pass 1.
;;; Style warning:
;;;   in file fixup.lsp, position 2019
;;;   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 #:G53.
;;; Emitting code for NO-PRIMARY-METHOD.
;;; Emitting code for SETF-FIND-CLASS.
;;; Emitting code for #:G70.
;;; Emitting code for #:G80.
;;; Emitting code for #:G88.
;;; Emitting code for #:G95.
;;; Emitting code for #:G98.
;;; Emitting code for #:G102.
;;; Emitting code for RECURSIVELY-UPDATE-CLASSES.
;;; Emitting code for #:G112.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2505
;;;   at (DEFUN BIND-SIMPLE-RESTARTS ...)
;;;   Checking type of #:LET22 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 2505
;;;   at (DEFUN BIND-SIMPLE-RESTARTS ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST18) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 2505
;;;   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 2886
;;;   at (DEFUN BIND-SIMPLE-HANDLERS ...)
;;;   Checking type of #:LET28 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 2886
;;;   at (DEFUN BIND-SIMPLE-HANDLERS ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST24) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 2886
;;;   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 3199
;;;   at (FSET 'RESTART-BIND ...)
;;;   Checking type of #:LET41 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 3199
;;;   at (FSET 'RESTART-BIND ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST37) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 3199
;;;   at (FSET 'RESTART-BIND ...)
;;;   Checking type of #:LOOP-LIST-TAIL39 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 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of #:LET56 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST52) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of #:LOOP-LIST-TAIL54 to be CONS
;;; Note:
;;;   in file CONDITIONS.LSP, position 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of #:LET67 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST63) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of #:LOOP-LIST-TAIL65 to be CONS
;;; Note:
;;;   in file CONDITIONS.LSP, position 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of #:LET74 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST70) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 4401
;;;   at (FSET 'RESTART-CASE ...)
;;;   Checking type of #:G75 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 8963
;;;   at (DEFUN FIND-SUBCLASSES-OF-TYPE ...)
;;;   Checking type of #:LET136 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 8963
;;;   at (DEFUN FIND-SUBCLASSES-OF-TYPE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST132) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 8963
;;;   at (DEFUN FIND-SUBCLASSES-OF-TYPE ...)
;;;   Checking type of #:G137 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 12097
;;;   at (FSET 'HANDLER-BIND ...)
;;;   Checking type of #:LET152 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 12097
;;;   at (FSET 'HANDLER-BIND ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST148) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 12097
;;;   at (FSET 'HANDLER-BIND ...)
;;;   Checking type of #:LOOP-LIST-TAIL150 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 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of #:LET214 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST210) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of #:LOOP-LIST-TAIL212 to be CONS
;;; Note:
;;;   in file CONDITIONS.LSP, position 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of #:LET221 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST217) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of #:LOOP-LIST-TAIL219 to be CONS
;;; Note:
;;;   in file CONDITIONS.LSP, position 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of #:LET228 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST224) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 22901
;;;   at (FSET 'HANDLER-CASE ...)
;;;   Checking type of #:G229 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 25751
;;;   at (DEFUN ASSERT-FAILURE ...)
;;;   Checking type of #:LET251 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 25751
;;;   at (DEFUN ASSERT-FAILURE ...)
;;;   Checking type of #:LET253 to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 25751
;;;   at (DEFUN ASSERT-FAILURE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST246) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 25751
;;;   at (DEFUN ASSERT-FAILURE ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST247) to be LIST
;;; Note:
;;;   in file CONDITIONS.LSP, position 25751
;;;   at (DEFUN ASSERT-FAILURE ...)
;;;   Checking type of #:LOOP-LIST-TAIL249 to be CONS
;;; Function ASSERT-FAILURE proclaimed (0,65536)
;;; Compiling (DEFUN UNIVERSAL-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 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 WITH-SIMPLE-RESTART.
;;; Emitting code for WITH-CONDITION-RESTARTS.
;;; Emitting code for #:G99.
;;; 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 #:G146.
;;; Emitting code for SIGNAL.
;;; Emitting code for COERCE-TO-CONDITION.
;;; Emitting code for BREAK.
;;; Emitting code for #:G164.
;;; Emitting code for #:G165.
;;; Emitting code for WARN.
;;; Emitting code for #:G173.
;;; Emitting code for #:G174.
;;; Emitting code for #:G176.
;;; Emitting code for #:G177.
;;; Emitting code for #:G178.
;;; Emitting code for #:G179.
;;; Emitting code for #:G180.
;;; 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 #:G200.
;;; Emitting code for #:G201.
;;; Emitting code for #:G199.
;;; Emitting code for SIGNAL-SIMPLE-ERROR.
;;; Emitting code for HANDLER-CASE.
;;; 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 #:G243.
;;; Emitting code for #:G244.
;;; Emitting code for UNIVERSAL-ERROR-HANDLER.
;;; Emitting code for #:G258.
;;; Emitting code for #:G259.
;;; Emitting code for #:G265.
;;; Emitting code for #:G266.
;;; Emitting code for #:G272.
;;; Emitting code for #:G273.
;;; Emitting code for #:G278.
;;; Emitting code for #:G279.
;;; Emitting code for #:G284.
;;; Emitting code for #:G285.
;;; Emitting code for TPL-CONTINUE-COMMAND.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3389
;;;   at (DEFMETHOD MAKE-LOAD-FORM ...)
;;;   Checking type of #:LOOP-LIST-TAIL34 to be CONS
;;; Note:
;;;   in file PRINT.LSP, position 3389
;;;   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 5502
;;;   at (DEFMETHOD MAKE-LOAD-FORM ...)
;;;   ! The variable ENVIRONMENT is not used.
;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...).
;;; Style warning:
;;;   in file PRINT.LSP, position 5608
;;;   at (DEFMETHOD MAKE-LOAD-FORM ...)
;;;   ! The variable ENVIRONMENT is not used.
;;; Compiling (DEFMETHOD MAKE-LOAD-FORM ...).
;;; Style warning:
;;;   in file PRINT.LSP, position 5715
;;;   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 9368
;;;   at (DEFMETHOD DESCRIBE-OBJECT ...)
;;;   Checking type of (1+ I) to be FIXNUM
;;; Compiling (DEFMETHOD DESCRIBE-OBJECT ...).
;;; Note:
;;;   in file PRINT.LSP, position 9845
;;;   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 #: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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 19316
;;;   at (DEFMETHOD STREAM-WRITE-STRING ...)
;;;   In function G101, checking types of arguments START STRING.
;;; Note:
;;;   in file STREAMS.LSP, position 19316
;;;   at (DEFMETHOD STREAM-WRITE-STRING ...)
;;;   Checking type of STRING to be STRING
;;; Note:
;;;   in file STREAMS.LSP, position 19316
;;;   at (DEFMETHOD STREAM-WRITE-STRING ...)
;;;   Checking type of START to be FIXNUM
;;; Note:
;;;   in file STREAMS.LSP, position 19316
;;;   at (DEFMETHOD STREAM-WRITE-STRING ...)
;;;   Checking type of (OR END (LENGTH STRING)) to be FIXNUM
;;; Note:
;;;   in file STREAMS.LSP, position 19316
;;;   at (DEFMETHOD STREAM-WRITE-STRING ...)
;;;   Checking type of START to be SI::INDEX
;;; Note:
;;;   in file STREAMS.LSP, position 19316
;;;   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 24387
;;;   at (DEFUN REDEFINE-CL-FUNCTIONS ...)
;;;   Checking type of #:LET138 to be LIST
;;; Note:
;;;   in file STREAMS.LSP, position 24387
;;;   at (DEFUN REDEFINE-CL-FUNCTIONS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST136) to be LIST
;;; Style warning:
;;;   in file STREAMS.LSP, position 25147
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4754
;;;   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 4896
;;;   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 5034
;;;   at (DEFUN POSN-COLUMN ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 5034
;;;   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 5428
;;;   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 5579
;;;   at (DEFUN PRETTY-OUT ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 5579
;;;   at (DEFUN PRETTY-OUT ...)
;;;   Inlining read access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 5579
;;;   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 6018
;;;   at (DEFUN PRETTY-SOUT ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 6018
;;;   at (DEFUN PRETTY-SOUT ...)
;;;   Inlining read access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 6018
;;;   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 7615
;;;   at (DEFUN REALLY-START-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 7615
;;;   at (DEFUN REALLY-START-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot LINE-NUMBER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 7615
;;;   at (DEFUN REALLY-START-LOGICAL-BLOCK ...)
;;;   Inlining write access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 7615
;;;   at (DEFUN REALLY-START-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot PREFIX from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 7615
;;;   at (DEFUN REALLY-START-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot SUFFIX from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 7615
;;;   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 9385
;;;   at (DEFUN SET-INDENTATION ...)
;;;   Inlining read access to slot PREFIX from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 9385
;;;   at (DEFUN SET-INDENTATION ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 9385
;;;   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 10152
;;;   at (DEFUN REALLY-END-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 10152
;;;   at (DEFUN REALLY-END-LOGICAL-BLOCK ...)
;;;   Inlining write access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 10152
;;;   at (DEFUN REALLY-END-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 10152
;;;   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 11640
;;;   at (DEFUN ENQUEUE-NEWLINE ...)
;;;   Inlining read access to slot PENDING-BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 11640
;;;   at (DEFUN ENQUEUE-NEWLINE ...)
;;;   Inlining INDEX-POSN
;;; Note:
;;;   in file PPRINT.LSP, position 11640
;;;   at (DEFUN ENQUEUE-NEWLINE ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 11640
;;;   at (DEFUN ENQUEUE-NEWLINE ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 11640
;;;   at (DEFUN ENQUEUE-NEWLINE ...)
;;;   Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 11640
;;;   at (DEFUN ENQUEUE-NEWLINE ...)
;;;   Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 11640
;;;   at (DEFUN ENQUEUE-NEWLINE ...)
;;;   Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 11640
;;;   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 12334
;;;   at (DEFUN ENQUEUE-INDENT ...)
;;;   Inlining INDEX-POSN
;;; Note:
;;;   in file PPRINT.LSP, position 12334
;;;   at (DEFUN ENQUEUE-INDENT ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12334
;;;   at (DEFUN ENQUEUE-INDENT ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12334
;;;   at (DEFUN ENQUEUE-INDENT ...)
;;;   Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12334
;;;   at (DEFUN ENQUEUE-INDENT ...)
;;;   Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12334
;;;   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 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   In function START-LOGICAL-BLOCK, checking types of arguments SUFFIX PREFIX STREAM.
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Checking type of STREAM to be PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Checking type of PREFIX to be STRING
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Checking type of SUFFIX to be STRING
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot PENDING-BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Inlining INDEX-POSN
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   at (DEFUN START-LOGICAL-BLOCK ...)
;;;   Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 12639
;;;   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 13366
;;;   at (DEFUN END-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot PENDING-BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13366
;;;   at (DEFUN END-LOGICAL-BLOCK ...)
;;;   Inlining write access to slot PENDING-BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13366
;;;   at (DEFUN END-LOGICAL-BLOCK ...)
;;;   Inlining INDEX-POSN
;;; Note:
;;;   in file PPRINT.LSP, position 13366
;;;   at (DEFUN END-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13366
;;;   at (DEFUN END-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13366
;;;   at (DEFUN END-LOGICAL-BLOCK ...)
;;;   Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13366
;;;   at (DEFUN END-LOGICAL-BLOCK ...)
;;;   Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13366
;;;   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 13900
;;;   at (DEFUN ENQUEUE-TAB ...)
;;;   Inlining INDEX-POSN
;;; Note:
;;;   in file PPRINT.LSP, position 13900
;;;   at (DEFUN ENQUEUE-TAB ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13900
;;;   at (DEFUN ENQUEUE-TAB ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13900
;;;   at (DEFUN ENQUEUE-TAB ...)
;;;   Inlining read access to slot QUEUE-HEAD from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13900
;;;   at (DEFUN ENQUEUE-TAB ...)
;;;   Inlining write access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 13900
;;;   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 14876
;;;   at (DEFUN INDEX-COLUMN ...)
;;;   Inlining read access to slot BUFFER-START-COLUMN from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 14876
;;;   at (DEFUN INDEX-COLUMN ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 14876
;;;   at (DEFUN INDEX-COLUMN ...)
;;;   Inlining INDEX-POSN
;;; Note:
;;;   in file PPRINT.LSP, position 14876
;;;   at (DEFUN INDEX-COLUMN ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 14876
;;;   at (DEFUN INDEX-COLUMN ...)
;;;   Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 14876
;;;   at (DEFUN INDEX-COLUMN ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 14876
;;;   at (DEFUN INDEX-COLUMN ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 14876
;;;   at (DEFUN INDEX-COLUMN ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 14876
;;;   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 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining read access to slot BUFFER-START-COLUMN from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining read access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining write access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining write access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   at (DEFUN EXPAND-TABS ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 15566
;;;   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 17405
;;;   at (DEFUN ASSURE-SPACE-IN-BUFFER ...)
;;;   Inlining read access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 17405
;;;   at (DEFUN ASSURE-SPACE-IN-BUFFER ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 17405
;;;   at (DEFUN ASSURE-SPACE-IN-BUFFER ...)
;;;   Inlining read access to slot LINE-LENGTH from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 17405
;;;   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 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining write access to slot QUEUE-HEAD from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining read access to slot LINE-NUMBER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining POSN-COLUMN
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining POSN-COLUMN
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   at (DEFUN MAYBE-OUTPUT ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 18186
;;;   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 20091
;;;   at (DEFUN MISERING-P ...)
;;;   Inlining read access to slot LINE-LENGTH from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 20091
;;;   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 20353
;;;   at (DEFUN FITS-ON-LINE-P ...)
;;;   Inlining read access to slot LINE-LENGTH from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 20353
;;;   at (DEFUN FITS-ON-LINE-P ...)
;;;   Inlining read access to slot LINE-NUMBER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 20353
;;;   at (DEFUN FITS-ON-LINE-P ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 20353
;;;   at (DEFUN FITS-ON-LINE-P ...)
;;;   Inlining POSN-COLUMN
;;; Note:
;;;   in file PPRINT.LSP, position 20353
;;;   at (DEFUN FITS-ON-LINE-P ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 20353
;;;   at (DEFUN FITS-ON-LINE-P ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 20353
;;;   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 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot TARGET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot LINE-NUMBER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot SUFFIX from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining write access to slot LINE-NUMBER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining write access to slot BUFFER-START-COLUMN from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot BLOCKS from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining write access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot PREFIX from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining write access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   at (DEFUN OUTPUT-LINE ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 21009
;;;   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 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining read access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining read access to slot QUEUE-TAIL from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining POSN-INDEX
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining read access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining read access to slot TARGET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining read access to slot BUFFER-START-COLUMN from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining write access to slot BUFFER-START-COLUMN from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining write access to slot BUFFER-FILL-POINTER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   at (DEFUN OUTPUT-PARTIAL-LINE ...)
;;;   Inlining read access to slot BUFFER-OFFSET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 23422
;;;   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 24230
;;;   at (DEFUN FORCE-PRETTY-OUTPUT ...)
;;;   Inlining read access to slot BUFFER from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 24230
;;;   at (DEFUN FORCE-PRETTY-OUTPUT ...)
;;;   Inlining read access to slot TARGET from class PRETTY-STREAM
;;; Note:
;;;   in file PPRINT.LSP, position 24230
;;;   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 ...).
;;; Warning:
;;;   in file PPRINT.LSP, position 31542
;;;   at (DEFUN PPRINT-NEWLINE ...)
;;;   ! Unknown declaration specifier VALUES
;;; Note:
;;;   in file PPRINT.LSP, position 31542
;;;   at (DEFUN PPRINT-NEWLINE ...)
;;;   In function PPRINT-NEWLINE, checking types of arguments STREAM KIND.
;;; Note:
;;;   in file PPRINT.LSP, position 31542
;;;   at (DEFUN PPRINT-NEWLINE ...)
;;;   Checking type of KIND to be (MEMBER LINEAR MISER FILL MANDATORY)
;;; Note:
;;;   in file PPRINT.LSP, position 31542
;;;   at (DEFUN PPRINT-NEWLINE ...)
;;;   Checking type of STREAM to be (OR STREAM (MEMBER T NIL))
;;; Warning:
;;;   in file PPRINT.LSP, position 31542
;;;   at (DEFUN PPRINT-NEWLINE ...)
;;;   ! Unknown declaration specifier VALUES
;;; Function PPRINT-NEWLINE proclaimed (1,2)
;;; Compiling (DEFUN PPRINT-INDENT ...).
;;; Warning:
;;;   in file PPRINT.LSP, position 33028
;;;   at (DEFUN PPRINT-INDENT ...)
;;;   ! Unknown declaration specifier VALUES
;;; Note:
;;;   in file PPRINT.LSP, position 33028
;;;   at (DEFUN PPRINT-INDENT ...)
;;;   In function PPRINT-INDENT, checking types of arguments STREAM N RELATIVE-TO.
;;; Note:
;;;   in file PPRINT.LSP, position 33028
;;;   at (DEFUN PPRINT-INDENT ...)
;;;   Checking type of RELATIVE-TO to be (MEMBER BLOCK CURRENT)
;;; Note:
;;;   in file PPRINT.LSP, position 33028
;;;   at (DEFUN PPRINT-INDENT ...)
;;;   Checking type of N to be REAL
;;; Note:
;;;   in file PPRINT.LSP, position 33028
;;;   at (DEFUN PPRINT-INDENT ...)
;;;   Checking type of STREAM to be (OR STREAM (MEMBER T NIL))
;;; Warning:
;;;   in file PPRINT.LSP, position 33028
;;;   at (DEFUN PPRINT-INDENT ...)
;;;   ! Unknown declaration specifier VALUES
;;; Function PPRINT-INDENT proclaimed (2,3)
;;; Compiling (DEFUN PPRINT-TAB ...).
;;; Warning:
;;;   in file PPRINT.LSP, position 34024
;;;   at (DEFUN PPRINT-TAB ...)
;;;   ! Unknown declaration specifier VALUES
;;; Note:
;;;   in file PPRINT.LSP, position 34024
;;;   at (DEFUN PPRINT-TAB ...)
;;;   In function PPRINT-TAB, checking types of arguments STREAM COLINC COLNUM KIND.
;;; Note:
;;;   in file PPRINT.LSP, position 34024
;;;   at (DEFUN PPRINT-TAB ...)
;;;   Checking type of KIND to be (MEMBER LINE SECTION LINE-RELATIVE SECTION-RELATIVE)
;;; Note:
;;;   in file PPRINT.LSP, position 34024
;;;   at (DEFUN PPRINT-TAB ...)
;;;   Checking type of COLNUM to be UNSIGNED-BYTE
;;; Note:
;;;   in file PPRINT.LSP, position 34024
;;;   at (DEFUN PPRINT-TAB ...)
;;;   Checking type of COLINC to be UNSIGNED-BYTE
;;; Note:
;;;   in file PPRINT.LSP, position 34024
;;;   at (DEFUN PPRINT-TAB ...)
;;;   Checking type of STREAM to be (OR STREAM (MEMBER T NIL))
;;; Warning:
;;;   in file PPRINT.LSP, position 34024
;;;   at (DEFUN PPRINT-TAB ...)
;;;   ! Unknown declaration specifier VALUES
;;; Function PPRINT-TAB proclaimed (3,4)
;;; Compiling (DEFUN PPRINT-FILL ...).
;;; Note:
;;;   in file PPRINT.LSP, position 35138
;;;   at (DEFUN PPRINT-FILL ...)
;;;   In function PPRINT-FILL, checking types of arguments ATSIGN? COLON? STREAM.
;;; Note:
;;;   in file PPRINT.LSP, position 35138
;;;   at (DEFUN PPRINT-FILL ...)
;;;   Checking type of STREAM to be (OR STREAM (MEMBER T NIL))
;;; Note:
;;;   in file PPRINT.LSP, position 35138
;;;   at (DEFUN PPRINT-FILL ...)
;;;   Checking type of COLON? to be GEN-BOOL
;;; Note:
;;;   in file PPRINT.LSP, position 35138
;;;   at (DEFUN PPRINT-FILL ...)
;;;   Checking type of ATSIGN? to be GEN-BOOL
;;; Style warning:
;;;   in file PPRINT.LSP, position 35138
;;;   at (DEFUN PPRINT-FILL ...)
;;;   ! Variable ATSIGN?, declared as IGNORE, found in a lisp form.
;;; Style warning:
;;;   in file PPRINT.LSP, position 35138
;;;   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 35913
;;;   at (DEFUN PPRINT-LINEAR ...)
;;;   In function PPRINT-LINEAR, checking types of arguments ATSIGN? COLON? STREAM.
;;; Note:
;;;   in file PPRINT.LSP, position 35913
;;;   at (DEFUN PPRINT-LINEAR ...)
;;;   Checking type of STREAM to be (OR STREAM (MEMBER T NIL))
;;; Note:
;;;   in file PPRINT.LSP, position 35913
;;;   at (DEFUN PPRINT-LINEAR ...)
;;;   Checking type of COLON? to be GEN-BOOL
;;; Note:
;;;   in file PPRINT.LSP, position 35913
;;;   at (DEFUN PPRINT-LINEAR ...)
;;;   Checking type of ATSIGN? to be GEN-BOOL
;;; Style warning:
;;;   in file PPRINT.LSP, position 35913
;;;   at (DEFUN PPRINT-LINEAR ...)
;;;   ! Variable ATSIGN?, declared as IGNORE, found in a lisp form.
;;; Style warning:
;;;   in file PPRINT.LSP, position 35913
;;;   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 36696
;;;   at (DEFUN PPRINT-TABULAR ...)
;;;   In function PPRINT-TABULAR, checking types of arguments TABSIZE ATSIGN? COLON? STREAM.
;;; Note:
;;;   in file PPRINT.LSP, position 36696
;;;   at (DEFUN PPRINT-TABULAR ...)
;;;   Checking type of STREAM to be (OR STREAM (MEMBER T NIL))
;;; Note:
;;;   in file PPRINT.LSP, position 36696
;;;   at (DEFUN PPRINT-TABULAR ...)
;;;   Checking type of COLON? to be GEN-BOOL
;;; Note:
;;;   in file PPRINT.LSP, position 36696
;;;   at (DEFUN PPRINT-TABULAR ...)
;;;   Checking type of ATSIGN? to be GEN-BOOL
;;; Note:
;;;   in file PPRINT.LSP, position 36696
;;;   at (DEFUN PPRINT-TABULAR ...)
;;;   Checking type of TABSIZE to be UNSIGNED-BYTE
;;; Style warning:
;;;   in file PPRINT.LSP, position 36696
;;;   at (DEFUN PPRINT-TABULAR ...)
;;;   ! Variable ATSIGN?, declared as IGNORE, found in a lisp form.
;;; Style warning:
;;;   in file PPRINT.LSP, position 36696
;;;   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 40012
;;;   at (DEFUN COPY-PPRINT-DISPATCH ...)
;;;   In function COPY-PPRINT-DISPATCH, checking types of arguments TABLE.
;;; Note:
;;;   in file PPRINT.LSP, position 40012
;;;   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 40635
;;;   at (DEFUN PPRINT-DISPATCH ...)
;;;   In function PPRINT-DISPATCH, checking types of arguments TABLE.
;;; Note:
;;;   in file PPRINT.LSP, position 40635
;;;   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 41361
;;;   at (DEFUN SET-PPRINT-DISPATCH ...)
;;;   In function SET-PPRINT-DISPATCH, checking types of arguments TABLE PRIORITY FUNCTION.
;;; Note:
;;;   in file PPRINT.LSP, position 41361
;;;   at (DEFUN SET-PPRINT-DISPATCH ...)
;;;   Checking type of FUNCTION to be (OR NULL FUNCTION SYMBOL)
;;; Note:
;;;   in file PPRINT.LSP, position 41361
;;;   at (DEFUN SET-PPRINT-DISPATCH ...)
;;;   Checking type of PRIORITY to be REAL
;;; Note:
;;;   in file PPRINT.LSP, position 41361
;;;   at (DEFUN SET-PPRINT-DISPATCH ...)
;;;   Checking type of TABLE to be PPRINT-DISPATCH-TABLE
;;; Note:
;;;   in file PPRINT.LSP, position 41361
;;;   at (DEFUN SET-PPRINT-DISPATCH ...)
;;;   Checking type of #:G558 to be CONS
;;; Note:
;;;   in file PPRINT.LSP, position 41361
;;;   at (DEFUN SET-PPRINT-DISPATCH ...)
;;;   Checking type of #:G561 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 46977
;;;   at (DEFUN PPRINT-LAMBDA ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 46977
;;;   at (DEFUN PPRINT-LAMBDA ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47157
;;;   at (DEFUN PPRINT-BLOCK ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47157
;;;   at (DEFUN PPRINT-BLOCK ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47305
;;;   at (DEFUN PPRINT-FLET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47305
;;;   at (DEFUN PPRINT-FLET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47305
;;;   at (DEFUN PPRINT-FLET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47305
;;;   at (DEFUN PPRINT-FLET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47305
;;;   at (DEFUN PPRINT-FLET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47305
;;;   at (DEFUN PPRINT-FLET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47305
;;;   at (DEFUN PPRINT-FLET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47544
;;;   at (DEFUN PPRINT-LET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47544
;;;   at (DEFUN PPRINT-LET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47544
;;;   at (DEFUN PPRINT-LET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47544
;;;   at (DEFUN PPRINT-LET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47544
;;;   at (DEFUN PPRINT-LET ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47735
;;;   at (DEFUN PPRINT-PROGN ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47869
;;;   at (DEFUN PPRINT-PROGV ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47869
;;;   at (DEFUN PPRINT-PROGV ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47869
;;;   at (DEFUN PPRINT-PROGV ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 47869
;;;   at (DEFUN PPRINT-PROGV ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 49953
;;;   at (DEFUN PPRINT-CASE ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 49953
;;;   at (DEFUN PPRINT-CASE ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 49953
;;;   at (DEFUN PPRINT-CASE ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 49953
;;;   at (DEFUN PPRINT-CASE ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50149
;;;   at (DEFUN PPRINT-DEFUN ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50149
;;;   at (DEFUN PPRINT-DEFUN ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50149
;;;   at (DEFUN PPRINT-DEFUN ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50340
;;;   at (DEFUN PPRINT-DESTRUCTURING-BIND ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50340
;;;   at (DEFUN PPRINT-DESTRUCTURING-BIND ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50340
;;;   at (DEFUN PPRINT-DESTRUCTURING-BIND ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50340
;;;   at (DEFUN PPRINT-DESTRUCTURING-BIND ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50541
;;;   at (DEFUN PPRINT-DO ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50541
;;;   at (DEFUN PPRINT-DO ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 50541
;;;   at (DEFUN PPRINT-DO ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 51143
;;;   at (DEFUN PPRINT-DOLIST ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 51143
;;;   at (DEFUN PPRINT-DOLIST ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 51620
;;;   at (DEFUN PPRINT-TYPECASE ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 51620
;;;   at (DEFUN PPRINT-TYPECASE ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 51620
;;;   at (DEFUN PPRINT-TYPECASE ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 51620
;;;   at (DEFUN PPRINT-TYPECASE ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 52190
;;;   at (DEFUN PPRINT-FUNCTION-CALL ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 52190
;;;   at (DEFUN PPRINT-FUNCTION-CALL ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Style warning:
;;;   in file pprint.lsp, position 52190
;;;   at (DEFUN PPRINT-FUNCTION-CALL ...)
;;;   ! The argument 1 of function <= has type
;;; NIL
;;; instead of expected
;;; REAL
;;; Emitting code for #:G0.
;;; Emitting code for #:G1.
;;; Emitting code for #:G2.
;;; Emitting code for #:G3.
;;; Emitting code for #:G4.
;;; Emitting code for PRETTY-STREAM-P.
;;; Emitting code for MAKE-PRETTY-STREAM.
;;; Emitting code for #:G5.
;;; Emitting code for INDEX-POSN.
;;; Emitting code for POSN-INDEX.
;;; Emitting code for POSN-COLUMN.
;;; Emitting code for #:G8.
;;; Emitting code for #:G9.
;;; Emitting code for #:G10.
;;; 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-487.
;;; Emitting code for PPRINT-LINEAR.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-503.
;;; Emitting code for PPRINT-TABULAR.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-524.
;;; 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 #:G540.
;;; 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-569.
;;; Emitting code for PPRINT-ARRAY-CONTENTS.
;;; Emitting code for OUTPUT-GUTS.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-583.
;;; Emitting code for PPRINT-MULTI-DIM-ARRAY.
;;; Emitting code for PPRINT-RAW-ARRAY.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-602.
;;; Emitting code for PPRINT-LAMBDA-LIST.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-611.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-636.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-645.
;;; Emitting code for PPRINT-LAMBDA.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-684.
;;; Emitting code for PPRINT-BLOCK.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-723.
;;; Emitting code for PPRINT-FLET.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-762.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-791.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-809.
;;; Emitting code for PPRINT-LET.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-864.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-893.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-911.
;;; Emitting code for PPRINT-PROGN.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-954.
;;; Emitting code for PPRINT-PROGV.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-984.
;;; Emitting code for PPRINT-QUOTE.
;;; Emitting code for PPRINT-SETQ.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1033.
;;; Emitting code for PPRINT-TAGBODY.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1063.
;;; Emitting code for PPRINT-CASE.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1084.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1120.
;;; Emitting code for PPRINT-DEFUN.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1153.
;;; Emitting code for PPRINT-DESTRUCTURING-BIND.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1201.
;;; Emitting code for PPRINT-DO.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1249.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1269.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1287.
;;; Emitting code for PPRINT-DOLIST.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1335.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1355.
;;; Emitting code for PPRINT-TYPECASE.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1399.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1435.
;;; Emitting code for PPRINT-PROG.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1465.
;;; Emitting code for PPRINT-FUNCTION-CALL.
;;; Emitting code for #:PPRINT-LOGICAL-BLOCK-1490.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 9039
;;;   at (DEFUN INSPECT-CONS ...)
;;;   Checking type of (NTHCDR #:G48 #:G49) to be CONS
;;; Note:
;;;   in file DESCRIBE.LSP, position 9039
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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-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 16274
;;;   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 16274
;;;   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 16274
;;;   at (DEFUN GRAB-CONSOLE ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK34) to be FIXNUM
;;; Compiling (DEFUN RELEASE-CONSOLE ...).
;;; Note:
;;;   in file TOP.LSP, position 16274
;;;   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 17988
;;;   at (DEFUN SHOW-PROCESS-LIST ...)
;;;   Checking type of #:LET77 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 17988
;;;   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 18920
;;;   at (DEFUN TERMINAL-INTERRUPT ...)
;;;   Checking type of #:LET100 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 18920
;;;   at (DEFUN TERMINAL-INTERRUPT ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST96) to be LIST
;;; Note:
;;;   in file TOP.LSP, position 18920
;;;   at (DEFUN TERMINAL-INTERRUPT ...)
;;;   Checking type of #:LOOP-LIST-TAIL98 to be CONS
;;; Note:
;;;   in file TOP.LSP, position 18920
;;;   at (DEFUN TERMINAL-INTERRUPT ...)
;;;   Checking type of #:LET104 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 18920
;;;   at (DEFUN TERMINAL-INTERRUPT ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST102) to be LIST
;;; Note:
;;;   in file TOP.LSP, position 18920
;;;   at (DEFUN TERMINAL-INTERRUPT ...)
;;;   Checking type of #:LET122 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 18920
;;;   at (DEFUN TERMINAL-INTERRUPT ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST120) to be LIST
;;; Style warning:
;;;   in file TOP.LSP, position 18920
;;;   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 28248
;;;   at (DEFUN RECONSTRUCT-BYTECODES-LAMBDA-LIST ...)
;;;   Checking type of (1+ N) to be FIXNUM
;;; Note:
;;;   in file TOP.LSP, position 28248
;;;   at (DEFUN RECONSTRUCT-BYTECODES-LAMBDA-LIST ...)
;;;   Checking type of (POP DATA) to be FIXNUM
;;; Note:
;;;   in file TOP.LSP, position 28248
;;;   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 32081
;;;   at (DEFUN DECODE-IHS-ENV ...)
;;;   Checking type of #:LET234 to be REAL
;;; Compiling (DEFUN IHS-ENVIRONMENT ...).
;;; Note:
;;;   in file TOP.LSP, position 32574
;;;   at (DEFUN IHS-ENVIRONMENT ...)
;;;   Checking type of #:LET239 to be REAL
;;; Note:
;;;   in file TOP.LSP, position 32574
;;;   at (DEFUN IHS-ENVIRONMENT ...)
;;;   Checking type of #:LET240 to be REAL
;;; Note:
;;;   in file TOP.LSP, position 32574
;;;   at (DEFUN IHS-ENVIRONMENT ...)
;;;   Checking type of #:LOOP-LIST-TAIL238 to be CONS
;;; Note:
;;;   in file TOP.LSP, position 32574
;;;   at (DEFUN IHS-ENVIRONMENT ...)
;;;   Checking type of #:LET242 to be REAL
;;; Note:
;;;   in file TOP.LSP, position 32574
;;;   at (DEFUN IHS-ENVIRONMENT ...)
;;;   Checking type of #:LET243 to be REAL
;;; Note:
;;;   in file TOP.LSP, position 32574
;;;   at (DEFUN IHS-ENVIRONMENT ...)
;;;   Checking type of #:LET250 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 32574
;;;   at (DEFUN IHS-ENVIRONMENT ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST246) to be LIST
;;; Note:
;;;   in file TOP.LSP, position 32574
;;;   at (DEFUN IHS-ENVIRONMENT ...)
;;;   Checking type of #:LOOP-LIST-TAIL248 to be CONS
;;; Compiling (DEFUN TPL-PRINT-VARIABLES ...).
;;; Note:
;;;   in file TOP.LSP, position 35495
;;;   at (DEFUN TPL-PRINT-VARIABLES ...)
;;;   Checking type of #:LET262 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 35495
;;;   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 36119
;;;   at (DEFUN TPL-VARIABLES-COMMAND ...)
;;;   Checking type of #:LET265 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 36119
;;;   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 46183
;;;   at (DEFUN COMPUTE-RESTART-COMMANDS ...)
;;;   Checking type of #:LET351 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 46183
;;;   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 48647
;;;   at (DEFUN TPL-WAITING-COMMAND ...)
;;;   Checking type of #:LET371 to be LIST
;;; Note:
;;;   in file TOP.LSP, position 48647
;;;   at (DEFUN TPL-WAITING-COMMAND ...)
;;;   Checking type of (CONS-CDR #:LOOP-LIST369) to be LIST
;;; Note:
;;;   in file TOP.LSP, position 48647
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3097
;;;   at (DEFUN WRITE-VECTOR ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-1) to be FIXNUM
;;; Compiling (DEFUN TO-CDB-HASH ...).
;;; Warning:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   ! Declaration of type
;;; (ARRAY (UNSIGNED-BYTE 8) (*))
;;; was found for not bound variable VECTOR.
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Unknown type (UNSIGNED-INTEGER 32). Assuming it is T.
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Checking type of #:LET10 to be (UNSIGNED-BYTE 8)
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Checking type of #:LET11 to be VECTOR
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   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 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-8) to be FIXNUM
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Unknown type (UNSIGNED-INTEGER 32). Assuming it is T.
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   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 5752
;;;   at (DEFUN DUMP-CDB ...)
;;;   Checking type of #:LET61 to be VECTOR
;;; Note:
;;;   in file ECL-CDB.LISP, position 5752
;;;   at (DEFUN DUMP-CDB ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-58) to be FIXNUM
;;; Note:
;;;   in file ECL-CDB.LISP, position 5752
;;;   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 7190
;;;   at (DEFUN LOOKUP-CDB ...)
;;;   Checking type of #:LET74 to be REAL
;;; Compiling (DEFUN MAP-CDB ...).
;;; Note:
;;;   in file ECL-CDB.LISP, position 8275
;;;   at (DEFUN MAP-CDB ...)
;;;   Checking type of #:LET83 to be REAL
;;; Note:
;;;   in file ECL-CDB.LISP, position 8275
;;;   at (DEFUN MAP-CDB ...)
;;;   Checking type of TABLE-POSITION to be REAL
;;; End of Pass 1.
;;; Note:
;;;   in file ecl-cdb.lisp, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Unknown type (UNSIGNED-INTEGER 32). Assuming it is T.
;;; Note:
;;;   in file ecl-cdb.lisp, position 3250
;;;   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.
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Unknown type (UNSIGNED-INTEGER 32). Assuming it is T.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 9155
;;;   at (DEFUN NOTE-DECLARATION ...)
;;;   Checking type of (CDDR #:G53) to be CONS
;;; Compiling (DEFUN NOTE-LEXICAL-BINDING ...).
;;; Note:
;;;   in file WALK.LSP, position 9270
;;;   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 32591
;;;   at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of #:LET105 to be LIST
;;; Note:
;;;   in file WALK.LSP, position 32591
;;;   at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST101) to be LIST
;;; Note:
;;;   in file WALK.LSP, position 32591
;;;   at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of #:LOOP-LIST-TAIL103 to be CONS
;;; Note:
;;;   in file WALK.LSP, position 32591
;;;   at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of #:LET114 to be LIST
;;; Note:
;;;   in file WALK.LSP, position 32591
;;;   at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of #:LET116 to be LIST
;;; Note:
;;;   in file WALK.LSP, position 32591
;;;   at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST109) to be LIST
;;; Note:
;;;   in file WALK.LSP, position 32591
;;;   at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST110) to be LIST
;;; Note:
;;;   in file WALK.LSP, position 32591
;;;   at (DEFUN WALK-MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of #:LOOP-LIST-TAIL112 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 36804
;;;   at (DEFUN WALK-SYMBOL-MACROLET ...)
;;;   Checking type of #:LET137 to be LIST
;;; Note:
;;;   in file WALK.LSP, position 36804
;;;   at (DEFUN WALK-SYMBOL-MACROLET ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST133) to be LIST
;;; Note:
;;;   in file WALK.LSP, position 36804
;;;   at (DEFUN WALK-SYMBOL-MACROLET ...)
;;;   Checking type of #:LOOP-LIST-TAIL135 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 ...).
;;; Style warning:
;;;   in file WALK.LSP, position 41037
;;;   at (DEFUN WALK-C-INLINE ...)
;;;   ! The variable CONTEXT is not used.
;;; 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 WALK-MULTIPLE-VALUE-BIND.
;;; Emitting code for #:G119.
;;; 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 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c clos/walk.c -o clos/walk.o 
;;; Finished compiling SRC:CLOS;WALK.LSP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_LSP
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -DECL_API -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/c -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitu7iMpF.c -o eclinitu7iMpF.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr liblsp.a eclinitu7iMpF.o lsp/export.o lsp/defmacro.o lsp/helpfile.o lsp/evalmacros.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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ c/main.o c/all_symbols2.o liblsp.a libeclmin.a -shared -Wl,-soname,libecl.so.15.3 -latomic_ops -lgmp -lgc -lffi -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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 *SUPPRESS-COMPILER-NOTES* ...).
;;; Compiling (DEFVAR *SUPPRESS-COMPILER-WARNINGS* ...).
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 *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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 449
;;;   at (FSET 'DEFUN-CACHED ...)
;;;   Checking type of #:LET31 to be LIST
;;; Note:
;;;   in file CMPMAC.LSP, position 449
;;;   at (FSET 'DEFUN-CACHED ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST27) to be LIST
;;; Note:
;;;   in file CMPMAC.LSP, position 449
;;;   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 2142
;;;   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 2142
;;;   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 2142
;;;   at (DEFUN-CACHED ENV-VAR-NAME ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPMAC.LSP, position 2142
;;;   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 2203
;;;   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 2203
;;;   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 2203
;;;   at (DEFUN-CACHED LEX-ENV-VAR-NAME ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPMAC.LSP, position 2203
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4088
;;;   at (DEFUN FIND-FORM-IN-NODE-LIST ...)
;;;   Checking type of #:LET39 to be LIST
;;; Note:
;;;   in file CMPFORM.LSP, position 4088
;;;   at (DEFUN FIND-FORM-IN-NODE-LIST ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST36) to be LIST
;;; Note:
;;;   in file CMPFORM.LSP, position 4088
;;;   at (DEFUN FIND-FORM-IN-NODE-LIST ...)
;;;   Checking type of #:LET43 to be LIST
;;; Note:
;;;   in file CMPFORM.LSP, position 4088
;;;   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 4888
;;;   at (DEFUN TRAVERSE-C1FORM-TREE ...)
;;;   Checking type of #:LET46 to be LIST
;;; Note:
;;;   in file CMPFORM.LSP, position 4888
;;;   at (DEFUN TRAVERSE-C1FORM-TREE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST
;;; Note:
;;;   in file CMPFORM.LSP, position 4888
;;;   at (DEFUN TRAVERSE-C1FORM-TREE ...)
;;;   Checking type of #:LET49 to be LIST
;;; Note:
;;;   in file CMPFORM.LSP, position 4888
;;;   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 7165
;;;   at (DEFUN RELOCATE-PARENTS-LIST ...)
;;;   Checking type of #:G65 to be CONS
;;; Note:
;;;   in file CMPFORM.LSP, position 7165
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 9655
;;;   at (DEFUN MAKE-DISPATCH-TABLE ...)
;;;   Checking type of #:LET13 to be LIST
;;; Note:
;;;   in file CMPTABLES.LSP, position 9655
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3669
;;;   at (DEFUN EMIT-INLINED-VALUES ...)
;;;   Checking type of #:LET32 to be LIST
;;; Note:
;;;   in file CMPINLINE.LSP, position 3669
;;;   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 6086
;;;   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 6527
;;;   at (DEFUN CLOSE-INLINE-BLOCKS ...)
;;;   Checking type of #:LET40 to be FIXNUM
;;; Style warning:
;;;   in file CMPINLINE.LSP, position 6527
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1573
;;;   at (DEFUN INNERMOST-NON-EXPANDED-FORM ...)
;;;   Checking type of #:LET2 to be LIST
;;; Note:
;;;   in file CMPUTIL.LSP, position 1573
;;;   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 6213
;;;   at (DEFUN DO-COMPILATION-UNIT ...)
;;;   Checking type of #:LET23 to be LIST
;;; Note:
;;;   in file CMPUTIL.LSP, position 6213
;;;   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 7431
;;;   at (DEFUN PRINT-C1FORMS ...)
;;;   Checking type of #:LET51 to be LIST
;;; Note:
;;;   in file CMPUTIL.LSP, position 7431
;;;   at (DEFUN PRINT-C1FORMS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST49) 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 #:G77.
;;; Emitting code for #:G78.
;;; 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 #:G93.
;;; Emitting code for CMP-MACRO-FUNCTION.
;;; Emitting code for CMP-EXPAND-MACRO.
;;; Emitting code for #:G97.
;;; Emitting code for CMP-EXPAND-COMPILER-MACRO.
;;; Emitting code for #:G101.
;;; Emitting code for SI::COMPILER-CLEAR-COMPILER-PROPERTIES.
;;; Emitting code for LISP-TO-C-NAME.
;;; Emitting code for #:G102.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2369
;;;   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 2369
;;;   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 2369
;;;   at (DEFUN-EQUAL-CACHED TYPE-AND ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 2369
;;;   at (DEFUN-EQUAL-CACHED TYPE-AND ...)
;;;   Checking type of #:G19 to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 2369
;;;   at (DEFUN-EQUAL-CACHED TYPE-AND ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 2369
;;;   at (DEFUN-EQUAL-CACHED TYPE-AND ...)
;;;   Checking type of #:G21 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 3991
;;;   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 3991
;;;   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 3991
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 3991
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-PRIMARY-TYPE ...)
;;;   Checking type of #:G36 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 4482
;;;   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 4482
;;;   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 4482
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 4482
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...)
;;;   Checking type of #:G47 to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 4482
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 4482
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-TO-N-TYPES ...)
;;;   Checking type of #:G49 to be CONS
;;; Compiling (DEFUN DO-VALUES-TYPE-TO-N-TYPES ...).
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 4609
;;;   at (DEFUN DO-VALUES-TYPE-TO-N-TYPES ...)
;;;   Checking type of #:LET59 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 4609
;;;   at (DEFUN DO-VALUES-TYPE-TO-N-TYPES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST55) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 4609
;;;   at (DEFUN DO-VALUES-TYPE-TO-N-TYPES ...)
;;;   Checking type of #:LOOP-LIST-TAIL57 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 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of #:LET75 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST73) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of #:LET86 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST84) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of #:LET97 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST95) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of #:LET101 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST99) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   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 6030
;;;   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 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of #:G110 to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 6030
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-OR ...)
;;;   Checking type of #:G112 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 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of #:LET123 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST121) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of #:LET135 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST133) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of #:LET147 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST145) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of #:LET151 to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST149) to be LIST
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   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 7719
;;;   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 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of #:G159 to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 7719
;;;   at (DEFUN-EQUAL-CACHED VALUES-TYPE-AND ...)
;;;   Checking type of #:G161 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 9254
;;;   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 9254
;;;   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 9254
;;;   at (DEFUN-EQUAL-CACHED TYPE-OR ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 9254
;;;   at (DEFUN-EQUAL-CACHED TYPE-OR ...)
;;;   Checking type of #:G174 to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 9254
;;;   at (DEFUN-EQUAL-CACHED TYPE-OR ...)
;;;   Checking type of ELT to be CONS
;;; Note:
;;;   in file CMPTYPE-ARITH.LSP, position 9254
;;;   at (DEFUN-EQUAL-CACHED TYPE-OR ...)
;;;   Checking type of #:G176 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 #:G11.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 584
;;;   at (DEFUN INFER-ARG-AND-RETURN-TYPES ...)
;;;   Checking type of #:LET7 to be LIST
;;; Note:
;;;   in file CMPTYPE-PROP.LSP, position 584
;;;   at (DEFUN INFER-ARG-AND-RETURN-TYPES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3) to be LIST
;;; Note:
;;;   in file CMPTYPE-PROP.LSP, position 584
;;;   at (DEFUN INFER-ARG-AND-RETURN-TYPES ...)
;;;   Checking type of #:LOOP-LIST-TAIL5 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 3127
;;;   at (DEFUN COPY-TYPE-PROPAGATOR ...)
;;;   Checking type of #:LET36 to be LIST
;;; Note:
;;;   in file CMPTYPE-PROP.LSP, position 3127
;;;   at (DEFUN COPY-TYPE-PROPAGATOR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST34) 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 EXPAND-DEFTYPE ...).
;;; Compiling (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...).
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LET17 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LET19 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST12) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST13) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LOOP-LIST-TAIL15 to be CONS
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LET25 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LET27 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of (CDDDR #:LOOP-LIST20) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of (CDDDR #:LOOP-LIST21) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LOOP-LIST-TAIL23 to be CONS
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LOOP-LIST-TAIL29 to be CONS
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LET34 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST30) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LOOP-LIST-TAIL32 to be CONS
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LET39 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of (CDDDR #:LOOP-LIST35) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LOOP-LIST-TAIL37 to be CONS
;;; Note:
;;;   in file CMPTYPE.LSP, position 1925
;;;   at (DEFUN LAMBDA-TYPE-CHECK-ASSOCIATE ...)
;;;   Checking type of #:LOOP-LIST-TAIL41 to be CONS
;;; Compiling (DEFUN LAMBDA-TYPE-CHECK-PRECISE ...).
;;; Note:
;;;   in file CMPTYPE.LSP, position 3417
;;;   at (DEFUN LAMBDA-TYPE-CHECK-PRECISE ...)
;;;   Checking type of #:LET44 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 3417
;;;   at (DEFUN LAMBDA-TYPE-CHECK-PRECISE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST42) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 3417
;;;   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 3844
;;;   at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...)
;;;   Checking type of #:LET48 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 3844
;;;   at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST45) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 3844
;;;   at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...)
;;;   Checking type of #:LET51 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 3844
;;;   at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST49) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 3844
;;;   at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...)
;;;   Checking type of #:LET63 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 3844
;;;   at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST59) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 3844
;;;   at (DEFUN EXTRACT-LAMBDA-TYPE-CHECKS ...)
;;;   Checking type of #:LOOP-LIST-TAIL61 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 7323
;;;   at (DEFUN REPLACE-INVALID-TYPES ...)
;;;   Checking type of #:LET78 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 7323
;;;   at (DEFUN REPLACE-INVALID-TYPES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST74) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 7323
;;;   at (DEFUN REPLACE-INVALID-TYPES ...)
;;;   Checking type of #:LOOP-LIST-TAIL76 to be CONS
;;; Compiling (DEFMACRO OPTIONAL-TYPE-CHECK ...).
;;; Compiling (DEFMACRO WITH-LET*-TYPE-CHECK ...).
;;; Note:
;;;   in file CMPTYPE.LSP, position 7984
;;;   at (FSET 'WITH-LET*-TYPE-CHECK ...)
;;;   Checking type of #:LET110 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 7984
;;;   at (FSET 'WITH-LET*-TYPE-CHECK ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST104) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 7984
;;;   at (FSET 'WITH-LET*-TYPE-CHECK ...)
;;;   Checking type of #:LOOP-LIST-TAIL106 to be CONS
;;; Note:
;;;   in file CMPTYPE.LSP, position 7984
;;;   at (FSET 'WITH-LET*-TYPE-CHECK ...)
;;;   Checking type of #:LET116 to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 7984
;;;   at (FSET 'WITH-LET*-TYPE-CHECK ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST112) to be LIST
;;; Note:
;;;   in file CMPTYPE.LSP, position 7984
;;;   at (FSET 'WITH-LET*-TYPE-CHECK ...)
;;;   Checking type of #:LOOP-LIST-TAIL114 to be CONS
;;; End of Pass 1.
;;; Emitting code for AND-FORM-TYPE.
;;; Emitting code for DEFAULT-INIT.
;;; Emitting code for EXPAND-DEFTYPE.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 539
;;;   at (DEFUN C1COMPILER-TYPECASE ...)
;;;   Checking type of #:LET3 to be LIST
;;; Note:
;;;   in file CMPTYPE-ASSERT.LSP, position 539
;;;   at (DEFUN C1COMPILER-TYPECASE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST
;;; Note:
;;;   in file CMPTYPE-ASSERT.LSP, position 539
;;;   at (DEFUN C1COMPILER-TYPECASE ...)
;;;   Checking type of #:LET11 to be LIST
;;; Note:
;;;   in file CMPTYPE-ASSERT.LSP, position 539
;;;   at (DEFUN C1COMPILER-TYPECASE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST6) to be LIST
;;; Note:
;;;   in file CMPTYPE-ASSERT.LSP, position 539
;;;   at (DEFUN C1COMPILER-TYPECASE ...)
;;;   Checking type of #:LOOP-LIST-TAIL8 to be CONS
;;; Compiling (DEFUN C2COMPILER-TYPECASE ...).
;;; Note:
;;;   in file CMPTYPE-ASSERT.LSP, position 1593
;;;   at (DEFUN C2COMPILER-TYPECASE ...)
;;;   Checking type of #:LET16 to be LIST
;;; Note:
;;;   in file CMPTYPE-ASSERT.LSP, position 1593
;;;   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 2301
;;;   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 4923
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1056
;;;   at (DEFUN CMP-ENV-CLEANUPS ...)
;;;   Checking type of #:LET22 to be LIST
;;; Note:
;;;   in file CMPENV-API.LSP, position 1056
;;;   at (DEFUN CMP-ENV-CLEANUPS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST18) to be LIST
;;; Note:
;;;   in file CMPENV-API.LSP, position 1056
;;;   at (DEFUN CMP-ENV-CLEANUPS ...)
;;;   Checking type of #:LOOP-LIST-TAIL20 to be CONS
;;; Compiling (DEFUN CMP-ENV-REGISTER-VAR ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 1753
;;;   at (DEFUN CMP-ENV-REGISTER-VAR ...)
;;;   Checking type of #:G23 to be CONS
;;; Compiling (DEFUN CMP-ENV-DECLARE-SPECIAL ...).
;;; Compiling (DEFUN CMP-ENV-ADD-DECLARATION ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 2152
;;;   at (DEFUN CMP-ENV-ADD-DECLARATION ...)
;;;   Checking type of #:G27 to be CONS
;;; Compiling (DEFUN CMP-ENV-EXTEND-DECLARATION ...).
;;; Compiling (DEFUN CMP-ENV-REGISTER-FUNCTION ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 2523
;;;   at (DEFUN CMP-ENV-REGISTER-FUNCTION ...)
;;;   Checking type of #:G30 to be CONS
;;; Compiling (DEFUN CMP-ENV-REGISTER-GLOBAL-MACRO ...).
;;; Compiling (DEFUN CMP-ENV-REGISTER-MACRO ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 2839
;;;   at (DEFUN CMP-ENV-REGISTER-MACRO ...)
;;;   Checking type of #:G33 to be CONS
;;; Compiling (DEFUN CMP-ENV-REGISTER-FTYPE ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 2985
;;;   at (DEFUN CMP-ENV-REGISTER-FTYPE ...)
;;;   Checking type of #:G36 to be CONS
;;; Compiling (DEFUN CMP-ENV-REGISTER-SYMBOL-MACRO ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 3143
;;;   at (DEFUN CMP-ENV-REGISTER-SYMBOL-MACRO ...)
;;;   Checking type of #:G39 to be CONS
;;; Compiling (DEFUN CMP-ENV-REGISTER-BLOCK ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 3354
;;;   at (DEFUN CMP-ENV-REGISTER-BLOCK ...)
;;;   Checking type of #:G43 to be CONS
;;; Compiling (DEFUN CMP-ENV-REGISTER-TAG ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 3491
;;;   at (DEFUN CMP-ENV-REGISTER-TAG ...)
;;;   Checking type of #:G46 to be CONS
;;; Compiling (DEFUN CMP-ENV-REGISTER-CLEANUP ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 3626
;;;   at (DEFUN CMP-ENV-REGISTER-CLEANUP ...)
;;;   Checking type of #:G49 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 6258
;;;   at (DEFUN CMP-ENV-NEW-VARIABLES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST85) to be LIST
;;; Note:
;;;   in file CMPENV-API.LSP, position 6258
;;;   at (DEFUN CMP-ENV-NEW-VARIABLES ...)
;;;   Checking type of #:LOOP-LIST-TAIL87 to be CONS
;;; Compiling (DEFUN CMP-ENV-SEARCH-DECLARATION ...).
;;; Note:
;;;   in file CMPENV-API.LSP, position 6453
;;;   at (DEFUN CMP-ENV-SEARCH-DECLARATION ...)
;;;   Checking type of #:LET92 to be LIST
;;; Note:
;;;   in file CMPENV-API.LSP, position 6453
;;;   at (DEFUN CMP-ENV-SEARCH-DECLARATION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST90) 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 #:G42.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 582
;;;   at (DEFUN FUNCTION-ARG-TYPES ...)
;;;   Checking type of ARG-TYPES to be OBJECT
;;; Note:
;;;   in file CMPENV-FUN.LSP, position 582
;;;   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 3281
;;;   at (DEFUN GET-LOCAL-RETURN-TYPE ...)
;;;   ! The variable ENV is not used.
;;; Compiling (DEFUN GET-PROCLAIMED-NARG ...).
;;; Note:
;;;   in file CMPENV-FUN.LSP, position 3462
;;;   at (DEFUN GET-PROCLAIMED-NARG ...)
;;;   Checking type of #:LET16 to be LIST
;;; Note:
;;;   in file CMPENV-FUN.LSP, position 3462
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1036
;;;   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 1585
;;;   at (DEFUN PARSE-IGNORE-DECLARATION ...)
;;;   Checking type of #:LET5 to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 1585
;;;   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 2058
;;;   at (DEFUN COLLECT-DECLARED ...)
;;;   Checking type of #:LET9 to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 2058
;;;   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 2331
;;;   at (DEFUN C1BODY ...)
;;;   Checking type of #:LET13 to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 2331
;;;   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 4959
;;;   at (DEFUN ADD-ONE-DECLARATION ...)
;;;   Checking type of #:LET29 to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 4959
;;;   at (DEFUN ADD-ONE-DECLARATION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST27) to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 4959
;;;   at (DEFUN ADD-ONE-DECLARATION ...)
;;;   Checking type of #:LET33 to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 4959
;;;   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 7124
;;;   at (DEFUN CHECK-VDECL ...)
;;;   Checking type of #:LET41 to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 7124
;;;   at (DEFUN CHECK-VDECL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST38) to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 7124
;;;   at (DEFUN CHECK-VDECL ...)
;;;   Checking type of #:LET45 to be LIST
;;; Note:
;;;   in file CMPENV-DECLARE.LSP, position 7124
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 957
;;;   at (DEFUN PROCLAIM ...)
;;;   Checking type of #:LET32 to be LIST
;;; Note:
;;;   in file CMPENV-PROCLAIM.LSP, position 957
;;;   at (DEFUN PROCLAIM ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST30) 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 840
;;;   at (DEFUN PROCESS-DECLAIM-ARGS ...)
;;;   Checking type of #:LET2 to be LIST
;;; Note:
;;;   in file CMPENV-DECLAIM.LSP, position 840
;;;   at (DEFUN PROCESS-DECLAIM-ARGS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST
;;; Note:
;;;   in file CMPENV-DECLAIM.LSP, position 840
;;;   at (DEFUN PROCESS-DECLAIM-ARGS ...)
;;;   Checking type of #:LET7 to be LIST
;;; Note:
;;;   in file CMPENV-DECLAIM.LSP, position 840
;;;   at (DEFUN PROCESS-DECLAIM-ARGS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4) to be LIST
;;; Style warning:
;;;   in file CMPENV-DECLAIM.LSP, position 840
;;;   at (DEFUN PROCESS-DECLAIM-ARGS ...)
;;;   ! The variable BODY is not used.
;;; Style warning:
;;;   in file CMPENV-DECLAIM.LSP, position 840
;;;   at (DEFUN PROCESS-DECLAIM-ARGS ...)
;;;   ! The variable DOC is not used.
;;; Style warning:
;;;   in file CMPENV-DECLAIM.LSP, position 840
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 5766
;;;   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 5874
;;;   at (DEFUN DEFAULT-MACHINE ...)
;;;   Checking type of #:LET7 to be LIST
;;; Note:
;;;   in file CMPC-MACHINE.LSP, position 5874
;;;   at (DEFUN DEFAULT-MACHINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3) to be LIST
;;; Note:
;;;   in file CMPC-MACHINE.LSP, position 5874
;;;   at (DEFUN DEFAULT-MACHINE ...)
;;;   Checking type of #:LOOP-LIST-TAIL5 to be CONS
;;; Note:
;;;   in file CMPC-MACHINE.LSP, position 5874
;;;   at (DEFUN DEFAULT-MACHINE ...)
;;;   Checking type of #:LET18 to be LIST
;;; Note:
;;;   in file CMPC-MACHINE.LSP, position 5874
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1044
;;;   at (DEFUN WT ...)
;;;   Checking type of #:LET6 to be LIST
;;; Note:
;;;   in file CMPC-WT.LSP, position 1044
;;;   at (DEFUN WT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4) to be LIST
;;; Compiling (DEFUN WT-H ...).
;;; Note:
;;;   in file CMPC-WT.LSP, position 1091
;;;   at (DEFUN WT-H ...)
;;;   Checking type of #:LET11 to be LIST
;;; Note:
;;;   in file CMPC-WT.LSP, position 1091
;;;   at (DEFUN WT-H ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST9) to be LIST
;;; Compiling (DEFUN WT-NL-H ...).
;;; Note:
;;;   in file CMPC-WT.LSP, position 1142
;;;   at (DEFUN WT-NL-H ...)
;;;   Checking type of #:LET16 to be LIST
;;; Note:
;;;   in file CMPC-WT.LSP, position 1142
;;;   at (DEFUN WT-NL-H ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST14) to be LIST
;;; Compiling (DEFUN PRINC-H ...).
;;; Compiling (DEFUN WT-NL ...).
;;; Note:
;;;   in file CMPC-WT.LSP, position 1284
;;;   at (DEFUN WT-NL ...)
;;;   Checking type of #:LET21 to be LIST
;;; Note:
;;;   in file CMPC-WT.LSP, position 1284
;;;   at (DEFUN WT-NL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST19) to be LIST
;;; Compiling (DEFUN WT-NL1 ...).
;;; Note:
;;;   in file CMPC-WT.LSP, position 1351
;;;   at (DEFUN WT-NL1 ...)
;;;   Checking type of #:LET26 to be LIST
;;; Note:
;;;   in file CMPC-WT.LSP, position 1351
;;;   at (DEFUN WT-NL1 ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST24) 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 2019
;;;   at (DEFUN WT-NL-CLOSE-MANY-BRACES ...)
;;;   Checking type of #:LET36 to be REAL
;;; Compiling (DEFUN WT-NL-CLOSE-BRACE ...).
;;; Compiling (DEFMACRO WITH-INDENTATION ...).
;;; Compiling (DEFUN WT-GO ...).
;;; Note:
;;;   in file CMPC-WT.LSP, position 2584
;;;   at (DEFUN WT-GO ...)
;;;   Checking type of #:G45 to be CONS
;;; Compiling (DEFUN WT-LABEL ...).
;;; Compiling (DEFUN WT-FILTERED-COMMENT ...).
;;; Note:
;;;   in file CMPC-WT.LSP, position 2849
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1140
;;;   at (DEFUN DEFAULT-C-INLINER ...)
;;;   Checking type of #:LET13 to be LIST
;;; Note:
;;;   in file CMPC-INLINER.LSP, position 1140
;;;   at (DEFUN DEFAULT-C-INLINER ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST9) to be LIST
;;; Note:
;;;   in file CMPC-INLINER.LSP, position 1140
;;;   at (DEFUN DEFAULT-C-INLINER ...)
;;;   Checking type of #:LOOP-LIST-TAIL11 to be CONS
;;; Compiling (DEFUN INLINE-FUNCTION ...).
;;; Style warning:
;;;   in file CMPC-INLINER.LSP, position 1516
;;;   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 1941
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 562
;;;   at (DEFUN UNOPTIMIZED-LONG-CALL ...)
;;;   Checking type of #:LET4 to be LIST
;;; Note:
;;;   in file CMPCALL.LSP, position 562
;;;   at (DEFUN UNOPTIMIZED-LONG-CALL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST
;;; Note:
;;;   in file CMPCALL.LSP, position 562
;;;   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 9081
;;;   at (DEFUN WT-CALL-NORMAL ...)
;;;   Checking type of (NTHCDR #:G53 #:G54) to be CONS
;;; Note:
;;;   in file CMPCALL.LSP, position 9081
;;;   at (DEFUN WT-CALL-NORMAL ...)
;;;   Checking type of (NTHCDR #:G60 #:G61) to be CONS
;;; Style warning:
;;;   in file CMPCALL.LSP, position 9081
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1275
;;;   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 1275
;;;   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 1275
;;;   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 1275
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4730
;;;   at (DEFUN C1CALL-CONSTANT-FOLD ...)
;;;   Checking type of #:LET19 to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 4730
;;;   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 5911
;;;   at (DEFUN C1WITH-BACKEND ...)
;;;   Checking type of #:LOOP-LIST-TAIL22 to be CONS
;;; Compiling (DEFUN C1PROGN ...).
;;; Note:
;;;   in file CMPEVAL.LSP, position 6107
;;;   at (DEFUN C1PROGN ...)
;;;   Checking type of #:LET32 to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 6107
;;;   at (DEFUN C1PROGN ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST28) to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 6107
;;;   at (DEFUN C1PROGN ...)
;;;   Checking type of #:LOOP-LIST-TAIL30 to be CONS
;;; Compiling (DEFUN C2PROGN ...).
;;; Compiling (DEFUN C1ARGS* ...).
;;; Note:
;;;   in file CMPEVAL.LSP, position 6992
;;;   at (DEFUN C1ARGS* ...)
;;;   Checking type of #:LET42 to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 6992
;;;   at (DEFUN C1ARGS* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST38) to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 6992
;;;   at (DEFUN C1ARGS* ...)
;;;   Checking type of #:LOOP-LIST-TAIL40 to be CONS
;;; Compiling (DEFVAR *COMPILER-TEMPS* ...).
;;; Compiling (DEFMACRO SI::DEFINE-INLINE-FUNCTION ...).
;;; Note:
;;;   in file CMPEVAL.LSP, position 7200
;;;   at (FSET 'DEFINE-INLINE-FUNCTION ...)
;;;   Checking type of #:LET83 to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 7200
;;;   at (FSET 'DEFINE-INLINE-FUNCTION ...)
;;;   Checking type of #:LET85 to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 7200
;;;   at (FSET 'DEFINE-INLINE-FUNCTION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST78) to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 7200
;;;   at (FSET 'DEFINE-INLINE-FUNCTION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST79) to be LIST
;;; Note:
;;;   in file CMPEVAL.LSP, position 7200
;;;   at (FSET 'DEFINE-INLINE-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL81 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.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1877
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 678
;;;   at (DEFUN C1LABELS/FLET ...)
;;;   Checking type of #:LET15 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 678
;;;   at (DEFUN C1LABELS/FLET ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST13) to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 678
;;;   at (DEFUN C1LABELS/FLET ...)
;;;   Checking type of #:LET18 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 678
;;;   at (DEFUN C1LABELS/FLET ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST16) to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 678
;;;   at (DEFUN C1LABELS/FLET ...)
;;;   Checking type of #:LET23 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 678
;;;   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 4833
;;;   at (DEFUN PREPEND-NEW ...)
;;;   Checking type of #:LET47 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 4833
;;;   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 4911
;;;   at (DEFUN UPDATE-FUN-CLOSURE-TYPE ...)
;;;   Checking type of #:LET56 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 4911
;;;   at (DEFUN UPDATE-FUN-CLOSURE-TYPE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST52) to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 4911
;;;   at (DEFUN UPDATE-FUN-CLOSURE-TYPE ...)
;;;   Checking type of #:LOOP-LIST-TAIL54 to be CONS
;;; Compiling (DEFUN C2LOCALS ...).
;;; Note:
;;;   in file CMPFLET.LSP, position 6301
;;;   at (DEFUN C2LOCALS ...)
;;;   Checking type of #:LET78 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 6301
;;;   at (DEFUN C2LOCALS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST76) to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 6301
;;;   at (DEFUN C2LOCALS ...)
;;;   Checking type of #:LET86 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 6301
;;;   at (DEFUN C2LOCALS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST84) to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 6301
;;;   at (DEFUN C2LOCALS ...)
;;;   Checking type of #:LET91 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 6301
;;;   at (DEFUN C2LOCALS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST89) to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 6301
;;;   at (DEFUN C2LOCALS ...)
;;;   Checking type of #:LET94 to be LIST
;;; Note:
;;;   in file CMPFLET.LSP, position 6301
;;;   at (DEFUN C2LOCALS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST92) to be LIST
;;; Style warning:
;;;   in file CMPFLET.LSP, position 6301
;;;   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 8656
;;;   at (DEFUN LOCAL-FUNCTION-REF ...)
;;;   ! The variable UNW is not used.
;;; Compiling (DEFUN C2CALL-LOCAL ...).
;;; Style warning:
;;;   in file CMPFLET.LSP, position 9672
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4909
;;;   at (DEFUN C2FMLA-AND ...)
;;;   Checking type of #:LET8 to be LIST
;;; Note:
;;;   in file CMPIF.LSP, position 4909
;;;   at (DEFUN C2FMLA-AND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST6) to be LIST
;;; Note:
;;;   in file CMPIF.LSP, position 4909
;;;   at (DEFUN C2FMLA-AND ...)
;;;   Checking type of #:LET13 to be LIST
;;; Note:
;;;   in file CMPIF.LSP, position 4909
;;;   at (DEFUN C2FMLA-AND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST11) to be LIST
;;; Compiling (DEFUN C2FMLA-OR ...).
;;; Note:
;;;   in file CMPIF.LSP, position 5273
;;;   at (DEFUN C2FMLA-OR ...)
;;;   Checking type of #:LET18 to be LIST
;;; Note:
;;;   in file CMPIF.LSP, position 5273
;;;   at (DEFUN C2FMLA-OR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST16) to be LIST
;;; Note:
;;;   in file CMPIF.LSP, position 5273
;;;   at (DEFUN C2FMLA-OR ...)
;;;   Checking type of #:LET23 to be LIST
;;; Note:
;;;   in file CMPIF.LSP, position 5273
;;;   at (DEFUN C2FMLA-OR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST21) 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2072
;;;   at (DEFUN ADD-TO-FUN-REFERENCED-VARS ...)
;;;   Checking type of #:LET3 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 2072
;;;   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 2503
;;;   at (DEFUN ADD-TO-FUN-REFERENCED-FUNS ...)
;;;   Checking type of #:LET10 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 2503
;;;   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 2990
;;;   at (DEFUN C1COMPILE-FUNCTION ...)
;;;   Checking type of #:LET55 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 2990
;;;   at (DEFUN C1COMPILE-FUNCTION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST53) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 2990
;;;   at (DEFUN C1COMPILE-FUNCTION ...)
;;;   Checking type of #:LET58 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 2990
;;;   at (DEFUN C1COMPILE-FUNCTION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST56) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 2990
;;;   at (DEFUN C1COMPILE-FUNCTION ...)
;;;   Checking type of #:LET64 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 2990
;;;   at (DEFUN C1COMPILE-FUNCTION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST60) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 2990
;;;   at (DEFUN C1COMPILE-FUNCTION ...)
;;;   Checking type of #:LOOP-LIST-TAIL62 to be CONS
;;; Compiling (DEFUN CMP-PROCESS-LAMBDA-LIST ...).
;;; Compiling (DEFUN C1LAMBDA-EXPR ...).
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:G72 to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:G77 to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (CDR #:G79) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (CDDR #:G81) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (CDR #:G86) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (CDDR #:G88) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (CDDDR #:G90) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:LOOP-LIST-TAIL94 to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:LET100 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST96) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:LOOP-LIST-TAIL98 to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:LET106 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST102) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:LOOP-LIST-TAIL104 to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:LET113 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST108) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:LOOP-LIST-TAIL110 to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of #:LET118 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 5855
;;;   at (DEFUN C1LAMBDA-EXPR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST115) to be LIST
;;; Compiling (DEFUN LAMBDA-FORM-ALLOWED-NARGS ...).
;;; Style warning:
;;;   in file CMPLAM.LSP, position 10796
;;;   at (DEFUN LAMBDA-FORM-ALLOWED-NARGS ...)
;;;   ! The variable KEYWORDS is not used.
;;; Compiling (DEFUN C2LAMBDA-EXPR ...).
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (/ (LENGTH KEYWORDS) 4) to be FIXNUM
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (FIRST (TRULY-THE CONS #:G136)) to be VAR
;;; Warning:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   ! The expression NIL is not of the expected type VAR
;;; Warning:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   ! In LET body, the type of the form VAR is SYMBOL, not VAR.
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of #:LET150 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST146) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of #:G151 to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of #:LET157 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST155) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of #:LET170 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of #:LET172 to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST167) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST168) to be LIST
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (CDR #:G190) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (CDR #:G192) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (CDR #:G196) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (CDR #:G198) to be CONS
;;; Note:
;;;   in file CMPLAM.LSP, position 11674
;;;   at (DEFUN C2LAMBDA-EXPR ...)
;;;   Checking type of (1+ I) to be FIXNUM
;;; Compiling (DEFUN OPTIMIZE-FUNCALL/APPLY-LAMBDA ...).
;;; Note:
;;;   in file CMPLAM.LSP, position 19198
;;;   at (DEFUN OPTIMIZE-FUNCALL/APPLY-LAMBDA ...)
;;;   Checking type of #:G208 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 #:G68.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 554
;;;   at (DEFUN C1LET ...)
;;;   Checking type of #:LET10 to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 554
;;;   at (DEFUN C1LET ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2) to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 554
;;;   at (DEFUN C1LET ...)
;;;   Checking type of #:LOOP-LIST-TAIL4 to be CONS
;;; Note:
;;;   in file CMPLET.LSP, position 554
;;;   at (DEFUN C1LET ...)
;;;   Checking type of #:LOOP-LIST-TAIL6 to be CONS
;;; Note:
;;;   in file CMPLET.LSP, position 554
;;;   at (DEFUN C1LET ...)
;;;   Checking type of #:LOOP-LIST-TAIL8 to be CONS
;;; Note:
;;;   in file CMPLET.LSP, position 554
;;;   at (DEFUN C1LET ...)
;;;   Checking type of #:LOOP-LIST-TAIL4 to be CONS
;;; Compiling (DEFUN C1LET* ...).
;;; Compiling (DEFUN C1LET/LET* ...).
;;; Note:
;;;   in file CMPLET.LSP, position 1670
;;;   at (DEFUN C1LET/LET* ...)
;;;   Checking type of #:LET18 to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 1670
;;;   at (DEFUN C1LET/LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST16) to be LIST
;;; Style warning:
;;;   in file CMPLET.LSP, position 1670
;;;   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 2567
;;;   at (DEFUN PROCESS-LET-BINDINGS ...)
;;;   Checking type of #:LET44 to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 2567
;;;   at (DEFUN PROCESS-LET-BINDINGS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST42) to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 2567
;;;   at (DEFUN PROCESS-LET-BINDINGS ...)
;;;   Checking type of #:LET50 to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 2567
;;;   at (DEFUN PROCESS-LET-BINDINGS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST46) to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 2567
;;;   at (DEFUN PROCESS-LET-BINDINGS ...)
;;;   Checking type of #:LOOP-LIST-TAIL48 to be CONS
;;; Compiling (DEFUN C1LET-OPTIMIZE-READ-ONLY-VARS ...).
;;; Note:
;;;   in file CMPLET.LSP, position 4238
;;;   at (DEFUN C1LET-OPTIMIZE-READ-ONLY-VARS ...)
;;;   Checking type of #:LOOP-LIST-TAIL52 to be CONS
;;; Note:
;;;   in file CMPLET.LSP, position 4238
;;;   at (DEFUN C1LET-OPTIMIZE-READ-ONLY-VARS ...)
;;;   Checking type of #:LOOP-LIST-TAIL54 to be CONS
;;; Compiling (DEFUN FIX-READ-ONLY-VARIABLE-TYPE ...).
;;; Style warning:
;;;   in file CMPLET.LSP, position 5321
;;;   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 6034
;;;   at (DEFUN C1LET-CONSTANT-VALUE-P ...)
;;;   ! The variable REST-FORMS is not used.
;;; Style warning:
;;;   in file CMPLET.LSP, position 6034
;;;   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 7046
;;;   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* ...).
;;; Warning:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   ! Declaration of type
;;; BOOLEAN
;;; was found for not bound variable BLOCK-P.
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of #:LET72 to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST66) to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of #:LOOP-LIST-TAIL68 to be CONS
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of #:LOOP-LIST-TAIL70 to be CONS
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST66) to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of #:LET77 to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST75) to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of #:LET83 to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of #:LET85 to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST80) to be LIST
;;; Note:
;;;   in file CMPLET.LSP, position 9522
;;;   at (DEFUN C2LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST81) 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 #:G58.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4954
;;;   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 5094
;;;   at (DEFUN WT-NUMBER ...)
;;;   ! The variable VV is not used.
;;; Compiling (DEFUN WT-CHARACTER ...).
;;; Style warning:
;;;   in file CMPLOC.LSP, position 5147
;;;   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 5841
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 559
;;;   at (DEFUN EXPAND-MAPCAR ...)
;;;   Checking type of #:LET16 to be LIST
;;; Note:
;;;   in file CMPMAP.LSP, position 559
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1744
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 664
;;;   at (DEFUN C1MULTIPLE-VALUE-CALL ...)
;;;   Checking type of #:LET6 to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 664
;;;   at (DEFUN C1MULTIPLE-VALUE-CALL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2) to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 664
;;;   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 1994
;;;   at (DEFUN C2VALUES ...)
;;;   Checking type of #:LET11 to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 1994
;;;   at (DEFUN C2VALUES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST9) to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 1994
;;;   at (DEFUN C2VALUES ...)
;;;   Checking type of #:LET14 to be FIXNUM
;;; Note:
;;;   in file CMPMULTI.LSP, position 1994
;;;   at (DEFUN C2VALUES ...)
;;;   Checking type of (1- I) to be FIXNUM
;;; Compiling (DEFUN C1MULTIPLE-VALUE-SETQ ...).
;;; Note:
;;;   in file CMPMULTI.LSP, position 4329
;;;   at (DEFUN C1MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of #:LET30 to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 4329
;;;   at (DEFUN C1MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 4329
;;;   at (DEFUN C1MULTIPLE-VALUE-SETQ ...)
;;;   Checking type of #:LOOP-LIST-TAIL28 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 5765
;;;   at (DEFUN DO-M-V-SETQ ...)
;;;   Checking type of #:LET48 to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 5765
;;;   at (DEFUN DO-M-V-SETQ ...)
;;;   Checking type of MIN-VALUES to be REAL
;;; Note:
;;;   in file CMPMULTI.LSP, position 5765
;;;   at (DEFUN DO-M-V-SETQ ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST46) to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 5765
;;;   at (DEFUN DO-M-V-SETQ ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST46) to be LIST
;;; Style warning:
;;;   in file CMPMULTI.LSP, position 5765
;;;   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 7555
;;;   at (DEFUN C1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of #:LET57 to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 7555
;;;   at (DEFUN C1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST53) to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 7555
;;;   at (DEFUN C1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of #:LOOP-LIST-TAIL55 to be CONS
;;; Note:
;;;   in file CMPMULTI.LSP, position 7555
;;;   at (DEFUN C1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of #:LET62 to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 7555
;;;   at (DEFUN C1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST60) to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 7555
;;;   at (DEFUN C1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of #:LET67 to be LIST
;;; Note:
;;;   in file CMPMULTI.LSP, position 7555
;;;   at (DEFUN C1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST65) to be LIST
;;; Compiling (DEFUN C2MULTIPLE-VALUE-BIND ...).
;;; Note:
;;;   in file CMPMULTI.LSP, position 8456
;;;   at (DEFUN C2MULTIPLE-VALUE-BIND ...)
;;;   Checking type of (FIRST (TRULY-THE CONS #:G68)) to be VAR
;;; Style warning:
;;;   in file CMPMULTI.LSP, position 8456
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3312
;;;   at (DEFUN C2FUNCTION ...)
;;;   ! The variable FUNOB is not used.
;;; Compiling (DEFUN NEW-LOCAL ...).
;;; Style warning:
;;;   in file CMPSPECIAL.LSP, position 3578
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2458
;;;   at (DEFUN C1TAGBODY ...)
;;;   Checking type of #:LET23 to be LIST
;;; Note:
;;;   in file CMPTAG.LSP, position 2458
;;;   at (DEFUN C1TAGBODY ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST19) to be LIST
;;; Note:
;;;   in file CMPTAG.LSP, position 2458
;;;   at (DEFUN C1TAGBODY ...)
;;;   Checking type of #:LOOP-LIST-TAIL21 to be CONS
;;; Note:
;;;   in file CMPTAG.LSP, position 2458
;;;   at (DEFUN C1TAGBODY ...)
;;;   Checking type of #:LET28 to be LIST
;;; Note:
;;;   in file CMPTAG.LSP, position 2458
;;;   at (DEFUN C1TAGBODY ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST
;;; Style warning:
;;;   in file CMPTAG.LSP, position 2458
;;;   at (DEFUN C1TAGBODY ...)
;;;   ! The variable THIS-TAG is not used.
;;; Note:
;;;   in file CMPTAG.LSP, position 2458
;;;   at (DEFUN C1TAGBODY ...)
;;;   Checking type of #:LET36 to be LIST
;;; Note:
;;;   in file CMPTAG.LSP, position 2458
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3479
;;;   at (DEFUN CTOP-WRITE ...)
;;;   Checking type of #:LET24 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 3479
;;;   at (DEFUN CTOP-WRITE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST22) to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 3479
;;;   at (DEFUN CTOP-WRITE ...)
;;;   Checking type of #:LET38 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 3479
;;;   at (DEFUN CTOP-WRITE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST34) to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 3479
;;;   at (DEFUN CTOP-WRITE ...)
;;;   Checking type of #:LET44 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 3479
;;;   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 10308
;;;   at (DEFUN T2PROGN ...)
;;;   Checking type of #:LET75 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 10308
;;;   at (DEFUN T2PROGN ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST73) to be LIST
;;; Compiling (DEFUN EXPORTED-FNAME ...).
;;; Compiling (DEFUN NEW-DEFUN ...).
;;; Style warning:
;;;   in file CMPTOP.LSP, position 10647
;;;   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 14648
;;;   at (DEFUN WT-FUNCTION-LOCALS ...)
;;;   Checking type of #:LET91 to be REAL
;;; Compiling (DEFUN WT-GLOBAL-ENTRY ...).
;;; Note:
;;;   in file CMPTOP.LSP, position 15891
;;;   at (DEFUN WT-GLOBAL-ENTRY ...)
;;;   Checking type of #:LET93 to be FIXNUM
;;; Note:
;;;   in file CMPTOP.LSP, position 15891
;;;   at (DEFUN WT-GLOBAL-ENTRY ...)
;;;   Checking type of (1+ LCL) to be FIXNUM
;;; Note:
;;;   in file CMPTOP.LSP, position 15891
;;;   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 17879
;;;   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 18486
;;;   at (DEFUN T1DEFMACRO ...)
;;;   ! The variable PPRINT is not used.
;;; Style warning:
;;;   in file CMPTOP.LSP, position 18486
;;;   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 19969
;;;   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 21510
;;;   at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...)
;;;   Checking type of #:LET128 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 21510
;;;   at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST126) to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 21510
;;;   at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...)
;;;   Checking type of #:LET135 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 21510
;;;   at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST132) to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 21510
;;;   at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST132) to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 21510
;;;   at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...)
;;;   Checking type of #:LET138 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 21510
;;;   at (DEFUN BUILD-DEBUG-LEXICAL-ENV ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST136) 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 25190
;;;   at (DEFUN T3LOCAL-FUN-DECLARATION ...)
;;;   Checking type of #:LET145 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 25190
;;;   at (DEFUN T3LOCAL-FUN-DECLARATION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST141) to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 25190
;;;   at (DEFUN T3LOCAL-FUN-DECLARATION ...)
;;;   Checking type of #:LOOP-LIST-TAIL143 to be CONS
;;; Note:
;;;   in file CMPTOP.LSP, position 25190
;;;   at (DEFUN T3LOCAL-FUN-DECLARATION ...)
;;;   Checking type of #:LET157 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 25190
;;;   at (DEFUN T3LOCAL-FUN-DECLARATION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST155) 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 29174
;;;   at (DEFUN C1FSET ...)
;;;   ! The variable LABELS is not used.
;;; Compiling (DEFUN P1FSET ...).
;;; Style warning:
;;;   in file CMPTOP.LSP, position 30738
;;;   at (DEFUN P1FSET ...)
;;;   ! The variable C1FORMS is not used.
;;; Style warning:
;;;   in file CMPTOP.LSP, position 30738
;;;   at (DEFUN P1FSET ...)
;;;   ! The variable PPRINT is not used.
;;; Style warning:
;;;   in file CMPTOP.LSP, position 30738
;;;   at (DEFUN P1FSET ...)
;;;   ! The variable MACRO is not used.
;;; Style warning:
;;;   in file CMPTOP.LSP, position 30738
;;;   at (DEFUN P1FSET ...)
;;;   ! The variable FNAME is not used.
;;; Style warning:
;;;   in file CMPTOP.LSP, position 30738
;;;   at (DEFUN P1FSET ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN T2FSET ...).
;;; Style warning:
;;;   in file CMPTOP.LSP, position 30851
;;;   at (DEFUN T2FSET ...)
;;;   ! The variable ARGS is not used.
;;; Compiling (DEFUN C2FSET ...).
;;; Style warning:
;;;   in file CMPTOP.LSP, position 30913
;;;   at (DEFUN C2FSET ...)
;;;   ! The variable PPRINT is not used.
;;; Compiling (DEFUN OUTPUT-CFUNS ...).
;;; Note:
;;;   in file CMPTOP.LSP, position 31618
;;;   at (DEFUN OUTPUT-CFUNS ...)
;;;   Checking type of #:LET189 to be LIST
;;; Note:
;;;   in file CMPTOP.LSP, position 31618
;;;   at (DEFUN OUTPUT-CFUNS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST185) 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 FUN-CLOSURE-VARIABLES.
;;; Emitting code for #:G161.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 770
;;;   at (DEFUN VAR-REFERENCED-IN-FORM-LIST ...)
;;;   Checking type of #:LET7 to be LIST
;;; Note:
;;;   in file CMPVAR.LSP, position 770
;;;   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 895
;;;   at (DEFUN VAR-CHANGED-IN-FORM-LIST ...)
;;;   Checking type of #:LET11 to be LIST
;;; Note:
;;;   in file CMPVAR.LSP, position 895
;;;   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 1866
;;;   at (DEFUN UPDATE-VARIABLE-TYPE ...)
;;;   Checking type of #:LET14 to be LIST
;;; Note:
;;;   in file CMPVAR.LSP, position 1866
;;;   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 2532
;;;   at (DEFUN VAR-READ-FORMS ...)
;;;   Checking type of #:LET24 to be LIST
;;; Note:
;;;   in file CMPVAR.LSP, position 2532
;;;   at (DEFUN VAR-READ-FORMS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST20) to be LIST
;;; Note:
;;;   in file CMPVAR.LSP, position 2532
;;;   at (DEFUN VAR-READ-FORMS ...)
;;;   Checking type of #:LOOP-LIST-TAIL22 to be CONS
;;; Compiling (DEFUN ASSERT-VAR-REF-VALUE ...).
;;; Style warning:
;;;   in file CMPVAR.LSP, position 2602
;;;   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 5523
;;;   at (DEFUN VARIABLE-TYPE-IN-ENV ...)
;;;   ! The variable CCB is not used.
;;; Style warning:
;;;   in file CMPVAR.LSP, position 5523
;;;   at (DEFUN VARIABLE-TYPE-IN-ENV ...)
;;;   ! The variable CLB is not used.
;;; Style warning:
;;;   in file CMPVAR.LSP, position 5523
;;;   at (DEFUN VARIABLE-TYPE-IN-ENV ...)
;;;   ! The variable UNW is not used.
;;; Style warning:
;;;   in file CMPVAR.LSP, position 5523
;;;   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 8042
;;;   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 11194
;;;   at (DEFUN C1DECLARE-SPECIALS ...)
;;;   Checking type of #:LET95 to be LIST
;;; Note:
;;;   in file CMPVAR.LSP, position 11194
;;;   at (DEFUN C1DECLARE-SPECIALS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST93) to be LIST
;;; Compiling (DEFUN REGISTER-GLOBAL ...).
;;; Compiling (DEFUN C1SETQ ...).
;;; Note:
;;;   in file CMPVAR.LSP, position 11353
;;;   at (DEFUN C1SETQ ...)
;;;   Checking type of #:LOOP-LIST-TAIL98 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1635
;;;   at (DEFUN DATA-GET-ALL-OBJECTS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5) to be LIST
;;; Note:
;;;   in file CMPWT.LSP, position 1635
;;;   at (DEFUN DATA-GET-ALL-OBJECTS ...)
;;;   Checking type of #:LET20 to be VECTOR
;;; Note:
;;;   in file CMPWT.LSP, position 1635
;;;   at (DEFUN DATA-GET-ALL-OBJECTS ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-11) to be FIXNUM
;;; Note:
;;;   in file CMPWT.LSP, position 1635
;;;   at (DEFUN DATA-GET-ALL-OBJECTS ...)
;;;   Checking type of #:LOOP-LIST-TAIL14 to be CONS
;;; Note:
;;;   in file CMPWT.LSP, position 1635
;;;   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 3114
;;;   at (DEFUN DATA-C-DUMP ...)
;;;   Checking type of #:LET28 to be LIST
;;; Note:
;;;   in file CMPWT.LSP, position 3114
;;;   at (DEFUN DATA-C-DUMP ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST24) to be LIST
;;; Note:
;;;   in file CMPWT.LSP, position 3114
;;;   at (DEFUN DATA-C-DUMP ...)
;;;   Checking type of #:LOOP-LIST-TAIL26 to be CONS
;;; Note:
;;;   in file CMPWT.LSP, position 3114
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 9950
;;;   at (DEFUN OUTPUT-CLINES ...)
;;;   Checking type of #:LET50 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 9950
;;;   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 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LET82 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST78) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LOOP-LIST-TAIL80 to be CONS
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LET90 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST86) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LOOP-LIST-TAIL88 to be CONS
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LET96 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST92) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LOOP-LIST-TAIL94 to be CONS
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LET104 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST100) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LOOP-LIST-TAIL102 to be CONS
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of #:LET107 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 11016
;;;   at (DEFUN C1C-INLINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST105) to be LIST
;;; Compiling (DEFUN C1C-PROGN ...).
;;; Note:
;;;   in file CMPFFI.LSP, position 13692
;;;   at (DEFUN C1C-PROGN ...)
;;;   Checking type of #:LET113 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 13692
;;;   at (DEFUN C1C-PROGN ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST109) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 13692
;;;   at (DEFUN C1C-PROGN ...)
;;;   Checking type of #:LOOP-LIST-TAIL111 to be CONS
;;; Note:
;;;   in file CMPFFI.LSP, position 13692
;;;   at (DEFUN C1C-PROGN ...)
;;;   Checking type of #:LET120 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 13692
;;;   at (DEFUN C1C-PROGN ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST116) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 13692
;;;   at (DEFUN C1C-PROGN ...)
;;;   Checking type of #:LOOP-LIST-TAIL118 to be CONS
;;; Compiling (DEFUN C2C-PROGN ...).
;;; Note:
;;;   in file CMPFFI.LSP, position 14055
;;;   at (DEFUN C2C-PROGN ...)
;;;   Checking type of #:LET123 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 14055
;;;   at (DEFUN C2C-PROGN ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST121) to be LIST
;;; Style warning:
;;;   in file CMPFFI.LSP, position 14055
;;;   at (DEFUN C2C-PROGN ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN PRODUCE-INLINE-LOC ...).
;;; Note:
;;;   in file CMPFFI.LSP, position 14389
;;;   at (DEFUN PRODUCE-INLINE-LOC ...)
;;;   Checking type of #:LET135 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 14389
;;;   at (DEFUN PRODUCE-INLINE-LOC ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST131) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 14389
;;;   at (DEFUN PRODUCE-INLINE-LOC ...)
;;;   Checking type of #:LOOP-LIST-TAIL133 to be CONS
;;; Note:
;;;   in file CMPFFI.LSP, position 14389
;;;   at (DEFUN PRODUCE-INLINE-LOC ...)
;;;   Checking type of #:LET138 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 14389
;;;   at (DEFUN PRODUCE-INLINE-LOC ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST136) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 14389
;;;   at (DEFUN PRODUCE-INLINE-LOC ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST136) to be LIST
;;; Compiling (DEFUN C2C-INLINE ...).
;;; Compiling (DEFUN COERCE-LOCS ...).
;;; Note:
;;;   in file CMPFFI.LSP, position 17216
;;;   at (DEFUN COERCE-LOCS ...)
;;;   Checking type of #:LET147 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 17216
;;;   at (DEFUN COERCE-LOCS ...)
;;;   Checking type of #:LET149 to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 17216
;;;   at (DEFUN COERCE-LOCS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST141) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 17216
;;;   at (DEFUN COERCE-LOCS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST142) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 17216
;;;   at (DEFUN COERCE-LOCS ...)
;;;   Checking type of #:LOOP-LIST-TAIL144 to be CONS
;;; Note:
;;;   in file CMPFFI.LSP, position 17216
;;;   at (DEFUN COERCE-LOCS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST141) to be LIST
;;; Note:
;;;   in file CMPFFI.LSP, position 17216
;;;   at (DEFUN COERCE-LOCS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST142) to be LIST
;;; Compiling (DEFUN WT-C-INLINE-LOC ...).
;;; Style warning:
;;;   in file CMPFFI.LSP, position 18384
;;;   at (DEFUN WT-C-INLINE-LOC ...)
;;;   ! The variable SIDE-EFFECTS is not used.
;;; Style warning:
;;;   in file CMPFFI.LSP, position 18384
;;;   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 19720
;;;   at (DEFUN C-INLINE-SAFE-STRING ...)
;;;   Checking type of #:LET162 to be VECTOR
;;; Note:
;;;   in file CMPFFI.LSP, position 19720
;;;   at (DEFUN C-INLINE-SAFE-STRING ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-157) to be FIXNUM
;;; Note:
;;;   in file CMPFFI.LSP, position 19720
;;;   at (DEFUN C-INLINE-SAFE-STRING ...)
;;;   Checking type of #:LOOP-LIST-TAIL160 to be CONS
;;; Note:
;;;   in file CMPFFI.LSP, position 19720
;;;   at (DEFUN C-INLINE-SAFE-STRING ...)
;;;   Checking type of #:LOOP-LIST-TAIL160 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2874
;;;   at (DEFUN T3-DEFCALLBACK ...)
;;;   Checking type of #:LET29 to be LIST
;;; Note:
;;;   in file CMPCBK.LSP, position 2874
;;;   at (DEFUN T3-DEFCALLBACK ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST
;;; Note:
;;;   in file CMPCBK.LSP, position 2874
;;;   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 2874
;;;   at (DEFUN T3-DEFCALLBACK ...)
;;;   Checking type of #:LET37 to be LIST
;;; Note:
;;;   in file CMPCBK.LSP, position 2874
;;;   at (DEFUN T3-DEFCALLBACK ...)
;;;   Checking type of #:LET39 to be LIST
;;; Note:
;;;   in file CMPCBK.LSP, position 2874
;;;   at (DEFUN T3-DEFCALLBACK ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST33) to be LIST
;;; Note:
;;;   in file CMPCBK.LSP, position 2874
;;;   at (DEFUN T3-DEFCALLBACK ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST34) to be LIST
;;; Note:
;;;   in file CMPCBK.LSP, position 2874
;;;   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 2874
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3536
;;;   at (DEFUN MAKE-OPTIMIZABLE-CONSTANTS ...)
;;;   Checking type of #:LET9 to be LIST
;;; Note:
;;;   in file CMPCT.LSP, position 3536
;;;   at (DEFUN MAKE-OPTIMIZABLE-CONSTANTS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4) to be LIST
;;; Note:
;;;   in file CMPCT.LSP, position 3536
;;;   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 3705
;;;   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 3705
;;;   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 3705
;;;   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 3705
;;;   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 3705
;;;   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 3705
;;;   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 3705
;;;   at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...)
;;;   Checking type of '(#<"CL" package> "cl_core.lisp_package") to be CONS
;;; Note:
;;;   in file CMPCT.LSP, position 3705
;;;   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 3705
;;;   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 3705
;;;   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 3705
;;;   at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...)
;;;   Checking type of '(#<"KEYWORD" package> "cl_core.keyword_package") to be CONS
;;; Note:
;;;   in file CMPCT.LSP, position 3705
;;;   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 3705
;;;   at (DEFUN OPTIMIZABLE-CONSTANTS-LIST ...)
;;;   Checking type of '(#<"CLOS" package> "cl_core.clos_package") to be CONS
;;; Note:
;;;   in file CMPCT.LSP, position 3705
;;;   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 3705
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3659
;;;   at (DEFUN ARITHMETIC-PROPAGATOR ...)
;;;   Checking type of #:LET29 to be LIST
;;; Note:
;;;   in file CMPNUM.LSP, position 3659
;;;   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 8529
;;;   at (DEF-TYPE-PROPAGATOR ACOS ...)
;;;   ! The variable OUTPUT-TYPE is not used.
;;; Style warning:
;;;   in file CMPNUM.LSP, position 8699
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 INIT-NAME-TAG ...).
;;; Compiling (DEFUN SEARCH-TAG ...).
;;; Compiling (DEFUN READ-NAME ...).
;;; Note:
;;;   in file CMPNAME.LSP, position 2577
;;;   at (DEFUN READ-NAME ...)
;;;   Checking type of #:LOOP-LIST-TAIL9 to be CONS
;;; Compiling (DEFUN FIND-INIT-NAME ...).
;;; Compiling (DEFUN REMOVE-PREFIX ...).
;;; Compiling (DEFUN GUESS-INIT-NAME ...).
;;; Compiling (DEFUN COMPUTE-INIT-NAME ...).
;;; Compiling (DEFUN COMPUTE-MAIN-NAME ...).
;;; Compiling (DEFUN INIT-FUNCTION-NAME ...).
;;; Style warning:
;;;   in file CMPNAME.LSP, position 4663
;;;   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 INIT-NAME-TAG.
;;; Emitting code for SEARCH-TAG.
;;; Emitting code for READ-NAME.
;;; Emitting code for FIND-INIT-NAME.
;;; Emitting code for REMOVE-PREFIX.
;;; Emitting code for GUESS-INIT-NAME.
;;; Emitting code for COMPUTE-INIT-NAME.
;;; Emitting code for COMPUTE-MAIN-NAME.
;;; Emitting code for INIT-FUNCTION-NAME.
;;; Emitting code for DISAMBIGUATION.
;;; Emitting code for TRANSLATE-CHAR.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1182
;;;   at (DEFUN EXPAND-TYPEP ...)
;;;   Checking type of #:LET13 to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 1182
;;;   at (DEFUN EXPAND-TYPEP ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST10) to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 1182
;;;   at (DEFUN EXPAND-TYPEP ...)
;;;   Checking type of #:LET22 to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 1182
;;;   at (DEFUN EXPAND-TYPEP ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST18) to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 1182
;;;   at (DEFUN EXPAND-TYPEP ...)
;;;   Checking type of #:LOOP-LIST-TAIL20 to be CONS
;;; Style warning:
;;;   in file CMPOPT.LSP, position 5300
;;;   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 6783
;;;   at (DEFUN EXPAND-COERCE ...)
;;;   Checking type of #:LET47 to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 6783
;;;   at (DEFUN EXPAND-COERCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 6783
;;;   at (DEFUN EXPAND-COERCE ...)
;;;   Checking type of #:LET51 to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 6783
;;;   at (DEFUN EXPAND-COERCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 6783
;;;   at (DEFUN EXPAND-COERCE ...)
;;;   Checking type of #:LET58 to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 6783
;;;   at (DEFUN EXPAND-COERCE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST54) to be LIST
;;; Note:
;;;   in file CMPOPT.LSP, position 6783
;;;   at (DEFUN EXPAND-COERCE ...)
;;;   Checking type of #:LOOP-LIST-TAIL56 to be CONS
;;; Style warning:
;;;   in file CMPOPT.LSP, position 10459
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 5677
;;;   at (DEF-TYPE-PROPAGATOR LOGAND ...)
;;;   Checking type of #:LET45 to be LIST
;;; Note:
;;;   in file CMPOPT-BITS.LSP, position 5677
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 533
;;;   at (DEFUN CONSTANT-EXPRESSION-P ...)
;;;   Checking type of #:LET2 to be LIST
;;; Note:
;;;   in file CMPOPT-CONSTANT.LSP, position 533
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 532
;;;   at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...)
;;;   Checking type of #:LET5 to be LIST
;;; Note:
;;;   in file CMPOPT-CONS.LSP, position 532
;;;   at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...)
;;;   Checking type of #:LET7 to be LIST
;;; Note:
;;;   in file CMPOPT-CONS.LSP, position 532
;;;   at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST
;;; Note:
;;;   in file CMPOPT-CONS.LSP, position 532
;;;   at (DEFUN EXPAND-SIMPLE-OPTIMIZER ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1) to be LIST
;;; Note:
;;;   in file CMPOPT-CONS.LSP, position 532
;;;   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 3787
;;;   at (DEFINE-COMPILER-MACRO POP ...)
;;;   Checking type of #:LET100 to be LIST
;;; Note:
;;;   in file CMPOPT-CONS.LSP, position 3787
;;;   at (DEFINE-COMPILER-MACRO POP ...)
;;;   Checking type of #:LET102 to be LIST
;;; Note:
;;;   in file CMPOPT-CONS.LSP, position 3787
;;;   at (DEFINE-COMPILER-MACRO POP ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST95) to be LIST
;;; Note:
;;;   in file CMPOPT-CONS.LSP, position 3787
;;;   at (DEFINE-COMPILER-MACRO POP ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST96) to be LIST
;;; Note:
;;;   in file CMPOPT-CONS.LSP, position 3787
;;;   at (DEFINE-COMPILER-MACRO POP ...)
;;;   Checking type of #:LOOP-LIST-TAIL98 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2753
;;;   at (DEFINE-COMPILER-MACRO TERPRI ...)
;;;   ! The variable ENV is not used.
;;; Style warning:
;;;   in file CMPOPT-PRINTER.LSP, position 2948
;;;   at (DEFINE-COMPILER-MACRO PRINT ...)
;;;   ! The variable ENV is not used.
;;; Style warning:
;;;   in file CMPOPT-PRINTER.LSP, position 3165
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 6431
;;;   at (DEFUN EXPAND-MEMBER ...)
;;;   Checking type of #:LOOP-LIST-TAIL60 to be CONS
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 8492
;;;   at (DEFINE-COMPILER-MACRO MEMBER ...)
;;;   ! The variable VALUE is not used.
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 8492
;;;   at (DEFINE-COMPILER-MACRO MEMBER ...)
;;;   ! The variable LIST is not used.
;;; Compiling (DEFUN EXPAND-ASSOC ...).
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 10416
;;;   at (DEFINE-COMPILER-MACRO ASSOC ...)
;;;   ! The variable VALUE is not used.
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 10416
;;;   at (DEFINE-COMPILER-MACRO ASSOC ...)
;;;   ! The variable LIST is not used.
;;; Compiling (DEFUN EXPAND-FIND ...).
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 10629
;;;   at (DEFUN EXPAND-FIND ...)
;;;   ! The variable KEY-FLAG is not used.
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 10629
;;;   at (DEFUN EXPAND-FIND ...)
;;;   ! The variable TEST-FLAG is not used.
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 10629
;;;   at (DEFUN EXPAND-FIND ...)
;;;   ! The variable TEST is not used.
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 10629
;;;   at (DEFUN EXPAND-FIND ...)
;;;   ! The variable START is not used.
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 10629
;;;   at (DEFUN EXPAND-FIND ...)
;;;   ! The variable END is not used.
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 11154
;;;   at (DEFINE-COMPILER-MACRO FIND ...)
;;;   ! The variable VALUE is not used.
;;; Style warning:
;;;   in file CMPOPT-SEQUENCE.LSP, position 11154
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2565
;;;   at (DEFUN P1VALUES ...)
;;;   Checking type of #:LET9 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 2565
;;;   at (DEFUN P1VALUES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5) to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 2565
;;;   at (DEFUN P1VALUES ...)
;;;   Checking type of #:LOOP-LIST-TAIL7 to be CONS
;;; Style warning:
;;;   in file CMPPROP.LSP, position 2565
;;;   at (DEFUN P1VALUES ...)
;;;   ! The variable FORM is not used.
;;; Compiling (DEFUN P1PROPAGATE-LIST ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 2893
;;;   at (DEFUN P1PROPAGATE-LIST ...)
;;;   Checking type of #:LET13 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 2893
;;;   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 3576
;;;   at (DEFUN REVISE-VAR-TYPE ...)
;;;   ! The variable VARIABLE is not used.
;;; Compiling (DEFUN P1BLOCK ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 3778
;;;   at (DEFUN P1BLOCK ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1RETURN-FROM ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 4076
;;;   at (DEFUN P1RETURN-FROM ...)
;;;   ! The variable VARIABLE-OR-NIL is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 4076
;;;   at (DEFUN P1RETURN-FROM ...)
;;;   ! The variable RETURN-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 4076
;;;   at (DEFUN P1RETURN-FROM ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1CALL-GLOBAL ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 4386
;;;   at (DEFUN P1CALL-GLOBAL ...)
;;;   Checking type of #:LET20 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 4386
;;;   at (DEFUN P1CALL-GLOBAL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST18) to be LIST
;;; Style warning:
;;;   in file CMPPROP.LSP, position 4386
;;;   at (DEFUN P1CALL-GLOBAL ...)
;;;   ! The variable ARG-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 4386
;;;   at (DEFUN P1CALL-GLOBAL ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1CALL-LOCAL ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 4926
;;;   at (DEFUN P1CALL-LOCAL ...)
;;;   Checking type of #:LET24 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 4926
;;;   at (DEFUN P1CALL-LOCAL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST22) to be LIST
;;; Style warning:
;;;   in file CMPPROP.LSP, position 4926
;;;   at (DEFUN P1CALL-LOCAL ...)
;;;   ! The variable ARG-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 4926
;;;   at (DEFUN P1CALL-LOCAL ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1CATCH ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 5225
;;;   at (DEFUN P1CATCH ...)
;;;   ! The variable TAG-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 5225
;;;   at (DEFUN P1CATCH ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1THROW ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 5415
;;;   at (DEFUN P1THROW ...)
;;;   ! The variable TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 5415
;;;   at (DEFUN P1THROW ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1IF ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 5641
;;;   at (DEFUN P1IF ...)
;;;   ! The variable FMLA-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 5641
;;;   at (DEFUN P1IF ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1FMLA-NOT ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 6062
;;;   at (DEFUN P1FMLA-NOT ...)
;;;   ! The variable TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 6062
;;;   at (DEFUN P1FMLA-NOT ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1FMLA-AND ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 6229
;;;   at (DEFUN P1FMLA-AND ...)
;;;   Checking type of #:LET30 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 6229
;;;   at (DEFUN P1FMLA-AND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST26) to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 6229
;;;   at (DEFUN P1FMLA-AND ...)
;;;   Checking type of #:LOOP-LIST-TAIL28 to be CONS
;;; Style warning:
;;;   in file CMPPROP.LSP, position 6229
;;;   at (DEFUN P1FMLA-AND ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1FMLA-OR ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 6701
;;;   at (DEFUN P1FMLA-OR ...)
;;;   Checking type of #:LET35 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 6701
;;;   at (DEFUN P1FMLA-OR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST31) to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 6701
;;;   at (DEFUN P1FMLA-OR ...)
;;;   Checking type of #:LOOP-LIST-TAIL33 to be CONS
;;; Style warning:
;;;   in file CMPPROP.LSP, position 6701
;;;   at (DEFUN P1FMLA-OR ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1LAMBDA ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 7246
;;;   at (DEFUN P1LAMBDA ...)
;;;   ! The variable NOT-USED is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 7246
;;;   at (DEFUN P1LAMBDA ...)
;;;   ! The variable DOC is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 7246
;;;   at (DEFUN P1LAMBDA ...)
;;;   ! The variable LAMBDA-LIST is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 7246
;;;   at (DEFUN P1LAMBDA ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1PROPAGATE-FUNCTION ...).
;;; Compiling (DEFUN P1LET* ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 7680
;;;   at (DEFUN P1LET* ...)
;;;   Checking type of #:LET42 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 7680
;;;   at (DEFUN P1LET* ...)
;;;   Checking type of #:LET44 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 7680
;;;   at (DEFUN P1LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST39) to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 7680
;;;   at (DEFUN P1LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST40) to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 7680
;;;   at (DEFUN P1LET* ...)
;;;   Checking type of #:LET49 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 7680
;;;   at (DEFUN P1LET* ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST47) to be LIST
;;; Style warning:
;;;   in file CMPPROP.LSP, position 7680
;;;   at (DEFUN P1LET* ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1LOCALS ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 8368
;;;   at (DEFUN P1LOCALS ...)
;;;   Checking type of #:LET52 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 8368
;;;   at (DEFUN P1LOCALS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST50) to be LIST
;;; Style warning:
;;;   in file CMPPROP.LSP, position 8368
;;;   at (DEFUN P1LOCALS ...)
;;;   ! The variable LABELS is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 8368
;;;   at (DEFUN P1LOCALS ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1MULTIPLE-VALUE-BIND ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 8525
;;;   at (DEFUN P1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of #:LET56 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 8525
;;;   at (DEFUN P1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of #:LET58 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 8525
;;;   at (DEFUN P1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST53) to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 8525
;;;   at (DEFUN P1MULTIPLE-VALUE-BIND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST54) to be LIST
;;; Style warning:
;;;   in file CMPPROP.LSP, position 8525
;;;   at (DEFUN P1MULTIPLE-VALUE-BIND ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1MULTIPLE-VALUE-SETQ ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 9058
;;;   at (DEFUN P1MULTIPLE-VALUE-SETQ ...)
;;;   ! The variable VARS-LIST is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 9058
;;;   at (DEFUN P1MULTIPLE-VALUE-SETQ ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1PROGN ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 9271
;;;   at (DEFUN P1PROGN ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1COMPILER-TYPECASE ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 9354
;;;   at (DEFUN P1COMPILER-TYPECASE ...)
;;;   Checking type of #:LET64 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 9354
;;;   at (DEFUN P1COMPILER-TYPECASE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST61) to be LIST
;;; Style warning:
;;;   in file CMPPROP.LSP, position 9354
;;;   at (DEFUN P1COMPILER-TYPECASE ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1CHECKED-VALUE ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 9773
;;;   at (DEFUN P1CHECKED-VALUE ...)
;;;   ! The variable ALT-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 9773
;;;   at (DEFUN P1CHECKED-VALUE ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1PROGV ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 9997
;;;   at (DEFUN P1PROGV ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1SETQ ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10278
;;;   at (DEFUN P1SETQ ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1PSETQ ...).
;;; Note:
;;;   in file CMPPROP.LSP, position 10508
;;;   at (DEFUN P1PSETQ ...)
;;;   Checking type of #:LET69 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 10508
;;;   at (DEFUN P1PSETQ ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST67) to be LIST
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10508
;;;   at (DEFUN P1PSETQ ...)
;;;   ! The variable NEW-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10508
;;;   at (DEFUN P1PSETQ ...)
;;;   ! The variable ASSUMPTIONS is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10508
;;;   at (DEFUN P1PSETQ ...)
;;;   ! The variable VARS is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10508
;;;   at (DEFUN P1PSETQ ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1WITH-STACK ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10704
;;;   at (DEFUN P1WITH-STACK ...)
;;;   ! The variable C1FORM is not used.
;;; Compiling (DEFUN P1STACK-PUSH-VALUES ...).
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10785
;;;   at (DEFUN P1STACK-PUSH-VALUES ...)
;;;   ! The variable FORM-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10785
;;;   at (DEFUN P1STACK-PUSH-VALUES ...)
;;;   ! The variable INLINE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 10785
;;;   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 11172
;;;   at (DEFUN P1GO ...)
;;;   ! The variable RETURN-TYPE is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 11172
;;;   at (DEFUN P1GO ...)
;;;   ! The variable TAG-VAR is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 11172
;;;   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 11740
;;;   at (DEFUN P1TAGBODY-ONE-PASS ...)
;;;   Checking type of #:LET72 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 11740
;;;   at (DEFUN P1TAGBODY-ONE-PASS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST70) to be LIST
;;; Style warning:
;;;   in file CMPPROP.LSP, position 11740
;;;   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 12752
;;;   at (DEFUN TYPE-FROM-ARRAY-ELT ...)
;;;   Checking type of #:LET84 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 12752
;;;   at (DEFUN TYPE-FROM-ARRAY-ELT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST80) to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 12752
;;;   at (DEFUN TYPE-FROM-ARRAY-ELT ...)
;;;   Checking type of #:LOOP-LIST-TAIL82 to be CONS
;;; Note:
;;;   in file CMPPROP.LSP, position 12752
;;;   at (DEFUN TYPE-FROM-ARRAY-ELT ...)
;;;   Checking type of #:LET91 to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 12752
;;;   at (DEFUN TYPE-FROM-ARRAY-ELT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST87) to be LIST
;;; Note:
;;;   in file CMPPROP.LSP, position 12752
;;;   at (DEFUN TYPE-FROM-ARRAY-ELT ...)
;;;   Checking type of #:LOOP-LIST-TAIL89 to be CONS
;;; Style warning:
;;;   in file CMPPROP.LSP, position 14526
;;;   at (DEF-TYPE-PROPAGATOR ROW-MAJOR-ASET ...)
;;;   ! The variable OBJ is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 14526
;;;   at (DEF-TYPE-PROPAGATOR ROW-MAJOR-ASET ...)
;;;   ! The variable INDEX is not used.
;;; Style warning:
;;;   in file CMPPROP.LSP, position 14754
;;;   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 #:G97.
;;; Emitting code for #:G101.
;;; Emitting code for #:G106.
;;; Emitting code for #:G111.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1127
;;;   at (DEFUN PRECOMPUTE-APPLICABLE-METHODS ...)
;;;   Checking type of #:LET3 to be LIST
;;; Note:
;;;   in file CMPCLOS.LSP, position 1127
;;;   at (DEFUN PRECOMPUTE-APPLICABLE-METHODS ...)
;;;   Checking type of #:LET5 to be LIST
;;; Note:
;;;   in file CMPCLOS.LSP, position 1127
;;;   at (DEFUN PRECOMPUTE-APPLICABLE-METHODS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST
;;; Note:
;;;   in file CMPCLOS.LSP, position 1127
;;;   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 2094
;;;   at (DEFUN FIND-SLOT-ACCESSORS ...)
;;;   Checking type of #:LET8 to be LIST
;;; Note:
;;;   in file CMPCLOS.LSP, position 2094
;;;   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 3862
;;;   at (DEFUN TRY-OPTIMIZE-SLOT-WRITER ...)
;;;   Checking type of #:LET16 to be LIST
;;; Note:
;;;   in file CMPCLOS.LSP, position 3862
;;;   at (DEFUN TRY-OPTIMIZE-SLOT-WRITER ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST12) to be LIST
;;; Note:
;;;   in file CMPCLOS.LSP, position 3862
;;;   at (DEFUN TRY-OPTIMIZE-SLOT-WRITER ...)
;;;   Checking type of #:LOOP-LIST-TAIL14 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1773
;;;   at (DEFINE-COMPILER-MACRO MAKE-ARRAY ...)
;;;   ! The variable ENV is not used.
;;; Compiling (DEFUN EXPAND-VECTOR-PUSH ...).
;;; Style warning:
;;;   in file CMPARRAY.LSP, position 3697
;;;   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 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LET40 to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST36) to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LOOP-LIST-TAIL38 to be CONS
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LET46 to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST42) to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LOOP-LIST-TAIL44 to be CONS
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LET53 to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LET55 to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LET57 to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST47) to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST48) to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST49) to be LIST
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LOOP-LIST-TAIL51 to be CONS
;;; Note:
;;;   in file CMPARRAY.LSP, position 7201
;;;   at (DEFUN EXPAND-ROW-MAJOR-INDEX ...)
;;;   Checking type of #:LOOP-LIST-TAIL51 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1748
;;;   at (DEFUN SAFE-RUN-PROGRAM ...)
;;;   ! The variable STREAM is not used.
;;; Style warning:
;;;   in file CMPOS-RUN.LSP, position 1748
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 546
;;;   at (DEFUN RUN-AND-COLLECT ...)
;;;   Checking type of #:LOOP-LIST-TAIL1 to be CONS
;;; Style warning:
;;;   in file CMPOS-FEATURES.LSP, position 546
;;;   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 1959
;;;   at (DEFUN KNOWN-KEYWORD ...)
;;;   Checking type of #:LET17 to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 1959
;;;   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 2262
;;;   at (DEFUN GATHER-KEYWORDS ...)
;;;   Checking type of #:LET23 to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2262
;;;   at (DEFUN GATHER-KEYWORDS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST19) to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2262
;;;   at (DEFUN GATHER-KEYWORDS ...)
;;;   Checking type of #:LOOP-LIST-TAIL21 to be CONS
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2262
;;;   at (DEFUN GATHER-KEYWORDS ...)
;;;   Checking type of #:LET29 to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2262
;;;   at (DEFUN GATHER-KEYWORDS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST25) to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2262
;;;   at (DEFUN GATHER-KEYWORDS ...)
;;;   Checking type of #:LOOP-LIST-TAIL27 to be CONS
;;; Style warning:
;;;   in file CMPOS-FEATURES.LSP, position 2262
;;;   at (DEFUN GATHER-KEYWORDS ...)
;;;   ! The variable PATTERNS is not used.
;;; Compiling (DEFUN COMPILER-DEFINES ...).
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of #:LET35 to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST32) to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of #:LET48 to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST44) to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of #:LOOP-LIST-TAIL46 to be CONS
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of #:LET42 to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST38) to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of #:LOOP-LIST-TAIL40 to be CONS
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of #:LET50 to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 2518
;;;   at (DEFUN COMPILER-DEFINES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST36) to be LIST
;;; Compiling (DEFUN RUN-AND-COLLECT-KEYWORDS ...).
;;; Compiling (DEFUN GATHER-SYSTEM-FEATURES ...).
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 4764
;;;   at (DEFUN GATHER-SYSTEM-FEATURES ...)
;;;   Checking type of #:LET59 to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 4764
;;;   at (DEFUN GATHER-SYSTEM-FEATURES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST55) to be LIST
;;; Note:
;;;   in file CMPOS-FEATURES.LSP, position 4764
;;;   at (DEFUN GATHER-SYSTEM-FEATURES ...)
;;;   Checking type of #:LOOP-LIST-TAIL57 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 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable SOURCE-OFFSET is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable SOURCE-TRUENAME is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable EXTERNAL-FORMAT is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable LOAD is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable DATA-FILE is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable H-FILE is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable C-FILE is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable PRINT is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 1885
;;;   at (DEFUN COMPILE-FILE-PATHNAME ...)
;;;   ! The variable VERBOSE is not used.
;;; Compiling (DEFUN CMP-DELETE-FILE ...).
;;; Note:
;;;   in file CMPMAIN.LSP, position 4434
;;;   at (PUSH #'(LAMBDA NIL ...) ...)
;;;   Checking type of #:LET27 to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 4434
;;;   at (PUSH #'(LAMBDA NIL ...) ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST25) to be LIST
;;; Compiling (DEFMACRO FIX-FOR-MINGW ...).
;;; Compiling (DEFUN LINKER-CC ...).
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 5217
;;;   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 6242
;;;   at (DEFUN STATIC-LIB-AR ...)
;;;   Checking type of #:LET40 to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 6242
;;;   at (DEFUN STATIC-LIB-AR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST36) to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 6242
;;;   at (DEFUN STATIC-LIB-AR ...)
;;;   Checking type of #:LOOP-LIST-TAIL38 to be CONS
;;; Compiling (DEFUN SHARED-CC ...).
;;; Compiling (DEFUN BUNDLE-CC ...).
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 7231
;;;   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 13007
;;;   at (DEFUN BUILDER ...)
;;;   Checking type of #:LET80 to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 13007
;;;   at (DEFUN BUILDER ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST78) 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 18791
;;;   at (DEFUN COMPILE-FILE ...)
;;;   Checking type of (LOCK-COUNT #:LOCK91) to be FIXNUM
;;; Note:
;;;   in file CMPMAIN.LSP, position 18791
;;;   at (DEFUN COMPILE-FILE ...)
;;;   Checking type of #:G142 to be CONS
;;; Note:
;;;   in file CMPMAIN.LSP, position 18791
;;;   at (DEFUN COMPILE-FILE ...)
;;;   Checking type of #:G146 to be CONS
;;; Note:
;;;   in file CMPMAIN.LSP, position 18791
;;;   at (DEFUN COMPILE-FILE ...)
;;;   Checking type of #:LET155 to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 18791
;;;   at (DEFUN COMPILE-FILE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST153) to be LIST
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 18791
;;;   at (DEFUN COMPILE-FILE ...)
;;;   ! The variable OUTPUT-FILE is not used.
;;; Compiling (DEFUN COMPILER-OUTPUT-VALUES ...).
;;; Note:
;;;   in file CMPMAIN.LSP, position 24497
;;;   at (DEFUN COMPILER-OUTPUT-VALUES ...)
;;;   Checking type of #:LET160 to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 24497
;;;   at (DEFUN COMPILER-OUTPUT-VALUES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST158) to be LIST
;;; Compiling (DEFVAR *GAZONK-COUNTER* ...).
;;; Compiling (DEFUN COMPILE ...).
;;; Note:
;;;   in file CMPMAIN.LSP, position 25098
;;;   at (DEFUN COMPILE ...)
;;;   Checking type of (LOCK-COUNT #:LOCK176) to be FIXNUM
;;; Note:
;;;   in file CMPMAIN.LSP, position 25098
;;;   at (DEFUN COMPILE ...)
;;;   Checking type of #:LET230 to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 25098
;;;   at (DEFUN COMPILE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST228) to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 25098
;;;   at (DEFUN COMPILE ...)
;;;   Checking type of #:LET238 to be LIST
;;; Note:
;;;   in file CMPMAIN.LSP, position 25098
;;;   at (DEFUN COMPILE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST236) to be LIST
;;; Compiling (DEFUN DISASSEMBLE ...).
;;; Note:
;;;   in file CMPMAIN.LSP, position 29552
;;;   at (DEFUN DISASSEMBLE ...)
;;;   Checking type of (LOCK-COUNT #:LOCK245) 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 34946
;;;   at (FSET 'WITH-COMPILATION-UNIT ...)
;;;   ! The variable OPTIONS is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 35098
;;;   at (LET* (# # ...) ...)
;;;   ! The variable COMPILE-FILE is not used.
;;; Style warning:
;;;   in file CMPMAIN.LSP, position 35098
;;;   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 #:G90.
;;; Emitting code for #:G140.
;;; Emitting code for COMPILER-OUTPUT-VALUES.
;;; Emitting code for COMPILE.
;;; Emitting code for #:G175.
;;; Emitting code for #:G225.
;;; Emitting code for DISASSEMBLE.
;;; Emitting code for #:G244.
;;; Emitting code for #:G294.
;;; Emitting code for #:G297.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2011
;;;   at (DEFUN PARSE-FUNCTION-PROCLAMATION ...)
;;;   Checking type of #:LET2 to be LIST
;;; Note:
;;;   in file PROCLAMATIONS.LSP, position 2011
;;;   at (DEFUN PARSE-FUNCTION-PROCLAMATION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST0) to be LIST
;;; Note:
;;;   in file PROCLAMATIONS.LSP, position 63710
;;;   at (LOOP FOR ...)
;;;   Checking type of #:LET8 to be LIST
;;; Note:
;;;   in file PROCLAMATIONS.LSP, position 63710
;;;   at (LOOP FOR ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST6) to be LIST
;;; End of Pass 1.
;;; Emitting code for PARSE-FUNCTION-PROCLAMATION.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 35167
;;;   at (DEFUN MAKE-INLINE-INFORMATION ...)
;;;   Checking type of #:LET2 to be LIST
;;; Note:
;;;   in file SYSFUN.LSP, position 35167
;;;   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 35611
;;;   at (DEFUN DEF-INLINE ...)
;;;   Checking type of #:LET10 to be LIST
;;; Note:
;;;   in file SYSFUN.LSP, position 35611
;;;   at (DEFUN DEF-INLINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST8) to be LIST
;;; Note:
;;;   in file SYSFUN.LSP, position 35611
;;;   at (DEFUN DEF-INLINE ...)
;;;   Checking type of #:LET17 to be LIST
;;; Note:
;;;   in file SYSFUN.LSP, position 35611
;;;   at (DEFUN DEF-INLINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST13) to be LIST
;;; Note:
;;;   in file SYSFUN.LSP, position 35611
;;;   at (DEFUN DEF-INLINE ...)
;;;   Checking type of #:LOOP-LIST-TAIL15 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.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c cmp/sysfun.c -o cmp/sysfun.o 
;;; Finished compiling SRC:CMP;SYSFUN.LSP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_CMP
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitlVRRxS.c -o eclinitlVRRxS.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libcmp.a eclinitlVRRxS.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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitvh0evy.c -o eclinitvh0evy.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o cmp.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinitvh0evy.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 -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 3097
;;;   at (DEFUN WRITE-VECTOR ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-1) to be FIXNUM
;;; Compiling (DEFUN TO-CDB-HASH ...).
;;; Warning:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   ! Declaration of type
;;; (ARRAY (UNSIGNED-BYTE 8) (*))
;;; was found for not bound variable VECTOR.
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Unknown type (UNSIGNED-INTEGER 32). Assuming it is T.
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Checking type of #:LET10 to be (UNSIGNED-BYTE 8)
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Checking type of #:LET11 to be VECTOR
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   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 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-8) to be FIXNUM
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Unknown type (UNSIGNED-INTEGER 32). Assuming it is T.
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   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 5752
;;;   at (DEFUN DUMP-CDB ...)
;;;   Checking type of #:LET61 to be VECTOR
;;; Note:
;;;   in file ECL-CDB.LISP, position 5752
;;;   at (DEFUN DUMP-CDB ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-58) to be FIXNUM
;;; Note:
;;;   in file ECL-CDB.LISP, position 5752
;;;   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 7190
;;;   at (DEFUN LOOKUP-CDB ...)
;;;   Checking type of #:LET74 to be REAL
;;; Compiling (DEFUN MAP-CDB ...).
;;; Note:
;;;   in file ECL-CDB.LISP, position 8275
;;;   at (DEFUN MAP-CDB ...)
;;;   Checking type of #:LET83 to be REAL
;;; Note:
;;;   in file ECL-CDB.LISP, position 8275
;;;   at (DEFUN MAP-CDB ...)
;;;   Checking type of TABLE-POSITION to be REAL
;;; End of Pass 1.
;;; Note:
;;;   in file ecl-cdb.lisp, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Unknown type (UNSIGNED-INTEGER 32). Assuming it is T.
;;; Note:
;;;   in file ecl-cdb.lisp, position 3250
;;;   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.
;;; Note:
;;;   in file ECL-CDB.LISP, position 3250
;;;   at (DEFUN TO-CDB-HASH ...)
;;;   Unknown type (UNSIGNED-INTEGER 32). Assuming it is T.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/ecl-cdb.c -o ext/ecl-cdb.o 
;;; Finished compiling EXT:ECL-CDB;ECL-CDB.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_ECL_CDB
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitvBlTPz.c -o eclinitvBlTPz.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libecl-cdb.a eclinitvBlTPz.o ext/ecl-cdb.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libecl-cdb.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ecliniteClZ6r.c -o ecliniteClZ6r.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o ecl-cdb.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecliniteClZ6r.o ext/ecl-cdb.o -shared libecl.so -lgmp -lgc -lffi -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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/ecl-help.c -o ext/ecl-help.o 
;;; Finished compiling EXT:ECL-CDB;ECL-HELP.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_ECL_HELP
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit6FlrIf.c -o eclinit6FlrIf.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libecl-help.a eclinit6FlrIf.o ext/ecl-cdb.o ext/ecl-help.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libecl-help.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitHsZvIT.c -o eclinitHsZvIT.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o ecl-help.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinitHsZvIT.o ext/ecl-cdb.o ext/ecl-help.o -shared libecl.so -lgmp -lgc -lffi -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 66775
;;;   at (DEFUN LIST-CENTRAL-REGISTRY-DIRECTORIES ...)
;;;   Checking type of #:LET11 to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 66775
;;;   at (DEFUN LIST-CENTRAL-REGISTRY-DIRECTORIES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST7) to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 66775
;;;   at (DEFUN LIST-CENTRAL-REGISTRY-DIRECTORIES ...)
;;;   Checking type of #:LOOP-LIST-TAIL9 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 85927
;;;   at (DEFUN DEFINED-NAMES-AND-SYSTEMS ...)
;;;   Checking type of #:LOOP-LIST-TAIL43 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 111624
;;;   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 117586
;;;   at (DEFUN FIND-SYSTEM ...)
;;;   Checking type of #:G164 to be PATHNAME
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 117586
;;;   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 133564
;;;   at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...)
;;;   Checking type of #:LET253 to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 133564
;;;   at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST249) to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 133564
;;;   at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...)
;;;   Checking type of #:G256 to be CONS
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 133564
;;;   at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...)
;;;   Checking type of #:LET262 to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 133564
;;;   at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST258) to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 133564
;;;   at (DEFUN PREPROCESS-COMPONENT-DEFINITION ...)
;;;   Checking type of #:G265 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 145907
;;;   at (DEFUN LINK-COMPONENT-DEPENDS-ON ...)
;;;   Checking type of #:LET475 to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 145907
;;;   at (DEFUN LINK-COMPONENT-DEPENDS-ON ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST471) to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 145907
;;;   at (DEFUN LINK-COMPONENT-DEPENDS-ON ...)
;;;   Checking type of #:LOOP-LIST-TAIL473 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 158554
;;;   at (DEFUN OPERATE-ON-SYSTEM ...)
;;;   ! IGNORE declaration was found for not bound variable *COMPILE-FILE-VERBOSE*.
;;; Warning:
;;;   in file DEFSYSTEM.LISP, position 158554
;;;   at (DEFUN OPERATE-ON-SYSTEM ...)
;;;   ! Illegal or unknown OPTIMIZE proclamation (INHIBIT-WARNINGS 3)
;;; Style warning:
;;;   in file DEFSYSTEM.LISP, position 158554
;;;   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 188303
;;;   at (DEFUN RUN-SHELL-COMMAND ...)
;;;   ! The variable COMMAND is not used.
;;; Style warning:
;;;   in file DEFSYSTEM.LISP, position 188303
;;;   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 193282
;;;   at (DEFUN C-COMPILE-FILE ...)
;;;   Checking type of #:LET699 to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 193282
;;;   at (DEFUN C-COMPILE-FILE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST695) to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 193282
;;;   at (DEFUN C-COMPILE-FILE ...)
;;;   Checking type of #:LOOP-LIST-TAIL697 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 196337
;;;   at (DEFUN BUILD-LIB ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST709) to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 196337
;;;   at (DEFUN BUILD-LIB ...)
;;;   Checking type of #:LOOP-LIST-TAIL711 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 202919
;;;   at (DEFUN LOAD-FILE-OPERATION ...)
;;;   Checking type of #:G763 to be PATHNAME
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 202919
;;;   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 202919
;;;   at (DEFUN LOAD-FILE-OPERATION ...)
;;;   Checking type of #:G782 to be PATHNAME
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 202919
;;;   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 202919
;;;   at (DEFUN LOAD-FILE-OPERATION ...)
;;;   Checking type of #:G801 to be PATHNAME
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 202919
;;;   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 212424
;;;   at (DEFUN FILES-WHICH-NEED-COMPILATION ...)
;;;   Checking type of #:LET834 to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 212424
;;;   at (DEFUN FILES-WHICH-NEED-COMPILATION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST830) to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 212424
;;;   at (DEFUN FILES-WHICH-NEED-COMPILATION ...)
;;;   Checking type of #:LOOP-LIST-TAIL832 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 213755
;;;   at (DEFUN FILE-PATHNAMES-IN-COMPONENT ...)
;;;   Checking type of #:LET845 to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 213755
;;;   at (DEFUN FILE-PATHNAMES-IN-COMPONENT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST841) to be LIST
;;; Note:
;;;   in file DEFSYSTEM.LISP, position 213755
;;;   at (DEFUN FILE-PATHNAMES-IN-COMPONENT ...)
;;;   Checking type of #:LOOP-LIST-TAIL843 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 #:G21.
;;; 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 #:G34.
;;; Emitting code for DEFINED-NAMES-AND-SYSTEMS.
;;; Emitting code for NEW-APPEND-DIRECTORIES.
;;; Emitting code for #:G58.
;;; 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 #:G81.
;;; 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 #:G95.
;;; Emitting code for #:G96.
;;; Emitting code for #:G97.
;;; Emitting code for #:G98.
;;; Emitting code for MAKE-FOREIGN-SYSTEM.
;;; Emitting code for #:G116.
;;; Emitting code for #:G117.
;;; Emitting code for #:G118.
;;; Emitting code for #:G119.
;;; Emitting code for REGISTER-FOREIGN-SYSTEM.
;;; Emitting code for #:G142.
;;; Emitting code for #:G143.
;;; Emitting code for #:G144.
;;; Emitting code for #:G145.
;;; Emitting code for #:G146.
;;; Emitting code for #:G147.
;;; 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 #:G160.
;;; 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 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 #:G658.
;;; Emitting code for #:G659.
;;; 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 #: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 FILES-IN-SYSTEM-AND-DEPENDENTS.
;;; Emitting code for FILES-IN-SYSTEM.
;;; Emitting code for FILE-PATHNAMES-IN-COMPONENT.
;;; Emitting code for FILE-COMPONENTS-IN-COMPONENT.
;;; Emitting code for #:G861.
;;; Emitting code for SYSTEM-SOURCE-SIZE.
;;; Emitting code for FILE-LIST-SIZE.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/defsystem.c -o ext/defsystem.o 
;;; Finished compiling EXT:DEFSYSTEM;DEFSYSTEM.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_DEFSYSTEM
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitklGY1S.c -o eclinitklGY1S.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libdefsystem.a eclinitklGY1S.o ext/defsystem.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libdefsystem.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ecliniteYzqA3.c -o ecliniteYzqA3.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o defsystem.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecliniteYzqA3.o ext/defsystem.o -shared libecl.so -lgmp -lgc -lffi -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* ...).
;;; Style warning:
;;;   in file ASDF.LISP, position 5487
;;;   at (DEFUN SHADOW* ...)
;;;   ! The argument 1 of function SHADOW has type
;;; STRING
;;; instead of expected
;;; LIST
;;; 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 10467
;;;   at (DEFUN NUKE-SYMBOL ...)
;;;   Checking type of #:LET50 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 10467
;;;   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 10467
;;;   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 10467
;;;   at (DEFUN PACKAGES-FROM-NAMES ...)
;;;   Checking type of #:LET71 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 10467
;;;   at (DEFUN PACKAGES-FROM-NAMES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST67) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 10467
;;;   at (DEFUN PACKAGES-FROM-NAMES ...)
;;;   Checking type of #:LOOP-LIST-TAIL69 to be CONS
;;; Compiling (DEFUN FRESH-PACKAGE-NAME ...).
;;; Note:
;;;   in file ASDF.LISP, position 10467
;;;   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 17514
;;;   at (DEFUN PACKAGE-DEFINITION-FORM ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST139) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 17514
;;;   at (DEFUN PACKAGE-DEFINITION-FORM ...)
;;;   Checking type of #:LOOP-LIST-TAIL141 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 17514
;;;   at (DEFUN PACKAGE-DEFINITION-FORM ...)
;;;   Checking type of #:LOOP-LIST-TAIL179 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 17514
;;;   at (DEFUN PACKAGE-DEFINITION-FORM ...)
;;;   Checking type of #:LET191 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 17514
;;;   at (DEFUN PACKAGE-DEFINITION-FORM ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST187) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 17514
;;;   at (DEFUN PACKAGE-DEFINITION-FORM ...)
;;;   Checking type of #:LOOP-LIST-TAIL189 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 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET639 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST635) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL637 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET645 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST641) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL643 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET651 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST647) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL649 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET657 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST653) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL655 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET663 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST659) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL661 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET669 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST665) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL667 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET675 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST671) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL673 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET681 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST677) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LOOP-LIST-TAIL679 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST685) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET690 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST688) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET728 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST725) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET734 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST732) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of #:LET742 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 20514
;;;   at (DEFUN ENSURE-PACKAGE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST739) to be LIST
;;; Compiling (DEFUN PARSE-DEFINE-PACKAGE-FORM ...).
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:LET907 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST882) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G908 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G911 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G914 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:LOOP-LIST-TAIL890 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:LOOP-LIST-TAIL892 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G916 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G918 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G920 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G923 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G925 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G927 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G929 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G932 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G934 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 37577
;;;   at (DEFUN PARSE-DEFINE-PACKAGE-FORM ...)
;;;   Checking type of #:G937 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 52947
;;;   at (FSET 'WITH-UPGRADABILITY ...)
;;;   Checking type of #:LET1057 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 52947
;;;   at (FSET 'WITH-UPGRADABILITY ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1053) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 52947
;;;   at (FSET 'WITH-UPGRADABILITY ...)
;;;   Checking type of #:LOOP-LIST-TAIL1055 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 56717
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1105 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 56717
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1101) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 56717
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1103 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1124 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1120) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1122 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1131 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1127) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1129 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1139 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1141 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1134) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1135) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1137 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1149 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1151 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1144) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1145) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1147 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1159 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1155) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1157 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 57441
;;;   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 58856
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1196 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 58856
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (CDDR #:G1193) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 58856
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G1199 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 58856
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1214 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 58856
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (CDDR #:G1211) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 58856
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G1217 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 60640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1269 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 60640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1265) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 60640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1267 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 60640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1274 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 60640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1271) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 60640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1276 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 60640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1270) 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 (DEFVAR +CR+ ...).
;;; Compiling (DEFVAR +LF+ ...).
;;; Compiling (DEFVAR +CRLF+ ...).
;;; Compiling (DEFUN STRIPLN ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 65769
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1328 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 65769
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1326) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 65769
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1326) 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 72020
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1414 to be VECTOR
;;; Note:
;;;   in file ASDF.LISP, position 72020
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-1411) to be FIXNUM
;;; Note:
;;;   in file ASDF.LISP, position 72020
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1422 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 72020
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1418) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 72020
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1420 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 74624
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1457 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 74624
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1454) 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 77489
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1484 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 77489
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1481) 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 89823
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1507 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 109460
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1663 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 109460
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1661) 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 132595
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1754 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 132595
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1750) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 132595
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1752 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 155215
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET1902 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 155215
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1898) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 155215
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL1900 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 ...).
;;; Note:
;;;   in file ASDF.LISP, position 180138
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2145 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 180138
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2158 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 199884
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2321 to be REAL
;;; Note:
;;;   in file ASDF.LISP, position 199884
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2319 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 199884
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2325 to be REAL
;;; Note:
;;;   in file ASDF.LISP, position 199884
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2327 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 199884
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2323) 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 206785
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2364 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 220685
;;;   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 220685
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2505 to be VECTOR
;;; Note:
;;;   in file ASDF.LISP, position 220685
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-2502) 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 220685
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2532 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 220685
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2530) 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 ...).
;;; Note:
;;;   in file ASDF.LISP, position 234398
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2729 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 234398
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (CDDR #:G2728) 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 267320
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2796 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 267320
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2798 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 267320
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2791) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 267320
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2792) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 267320
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2794 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 267320
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2830 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 267320
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2826) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 267320
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2828 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 277333
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2866 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 277333
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2862) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 277333
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2864 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 277333
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2876 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 277333
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2872) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 277333
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2874 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 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2983 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2979) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL2981 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET2997 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2990) 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 ...).
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3012 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3010) to be LIST
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3052 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3048) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3059 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3055) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL3057 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G3053 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 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3086 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 305627
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:G3082) 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 ...).
;;; Note:
;;;   in file ASDF.LISP, position 335486
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL3152 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 341398
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3177 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 341398
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3175) 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 355113
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL3316 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 359447
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G3619 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 391048
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3768 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 391048
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3764) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 391048
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL3766 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 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3812 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3808) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL3810 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3818 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3814) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL3816 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 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3850 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3846) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 398350
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G3851 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 407735
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET3993 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 407735
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST3989) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 407735
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL3991 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 407735
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4024 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 407735
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4020) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 407735
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G4025 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 419225
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4178 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 419225
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4174) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 419225
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4176 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 419225
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4189 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 419225
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4185) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 419225
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4187 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 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4210 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4207) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4213 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4211) to be LIST
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4257 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4253) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4255 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4263 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4265 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4258) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4259) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4261 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4271 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4267) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4269 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4277 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4279 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4272) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4273) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 422635
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4275 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 435812
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4601 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 435812
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4598) to be LIST
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 435812
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4617 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 435812
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4613) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 435812
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4615 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 437640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4712 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 437640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4709) 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 437640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4758 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 437640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4753) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 437640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4755 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 437640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4765 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 437640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4761) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 437640
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4763 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 ...).
;;; Note:
;;;   in file ASDF.LISP, position 450835
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4851 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 452496
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4941 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 452496
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4938) 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 ...).
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4998 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4994) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4996 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET4992 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST4988) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4990 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL4990 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5009 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5005) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5007 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 467626
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5007 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 482329
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5210 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 482329
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (CDDR #:G5209) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 482329
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5225 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 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5283 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5279) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5281 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5391 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5387) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5389 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5404 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5400) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5402 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of REGISTERED to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5425 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5421) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 490546
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5423 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 511465
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5547 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 511465
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5545) to be LIST
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 511465
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5570 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 511465
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5566) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 511465
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5568 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 516291
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5604 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 516291
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5600) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 516291
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5602 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 (DEFCLASS FASL-OP ...).
;;; Compiling (DEFCLASS LOAD-FASL-OP ...).
;;; Compiling (DEFCLASS BINARY-OP ...).
;;; Compiling (DEFCLASS MONOLITHIC-FASL-OP ...).
;;; Compiling (DEFCLASS MONOLITHIC-LOAD-FASL-OP ...).
;;; Compiling (DEFCLASS MONOLITHIC-BINARY-OP ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; 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 525176
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5686 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 525176
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5682) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 525176
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G5689 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 525176
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G5687 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 525176
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5699 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 525176
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5695) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 525176
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5697 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 ...).
;;; Note:
;;;   in file ASDF.LISP, position 533037
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5745 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 533037
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5741) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 533037
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5743 to be CONS
;;; Note:
;;;   in file ASDF.LISP, position 533037
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5750 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 533037
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5746) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 533037
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5748 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 537005
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:G5794 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 ...).
;;; Note:
;;;   in file ASDF.LISP, position 538402
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5854 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 538402
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5851) 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 538402
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5893 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 538402
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5889) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 538402
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5891 to be CONS
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Compiling (WITH-UPGRADABILITY NIL ...).
;;; Note:
;;;   in file ASDF.LISP, position 551779
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LET5908 to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 551779
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5904) to be LIST
;;; Note:
;;;   in file ASDF.LISP, position 551779
;;;   at (WITH-UPGRADABILITY NIL ...)
;;;   Checking type of #:LOOP-LIST-TAIL5906 to be CONS
;;; End of Pass 1.
;;; Style warning:
;;;   in file asdf.lisp, position 5487
;;;   at (DEFUN SHADOW* ...)
;;;   ! The argument 1 of function SHADOW has type
;;; STRING
;;; instead of expected
;;; LIST
;;; 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 #:G691.
;;; 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 #:G1079.
;;; Emitting code for NEST.
;;; Emitting code for IF-LET.
;;; Emitting code for #:G1086.
;;; Emitting code for WHILE-COLLECTING.
;;; Emitting code for APPENDF.
;;; Emitting code for LENGTH=N-P.
;;; Emitting code for ENSURE-LIST.
;;; Emitting code for #:G1166.
;;; 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 UIOP/UTILITY::DONE.
;;; Emitting code for UIOP/UTILITY::SEPARATORP.
;;; Emitting code for STRIPLN.
;;; 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 #:G1334.
;;; 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 #:G1345.
;;; Emitting code for #:G1346.
;;; 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 #:G1445.
;;; Emitting code for #:G1449.
;;; Emitting code for #:G1458.
;;; Emitting code for FEATUREP.
;;; Emitting code for OS-UNIX-P.
;;; Emitting code for OS-MACOSX-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 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 #:G1491.
;;; 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 #:G1526.
;;; 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 #:G1609.
;;; 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 #:G1687.
;;; 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 #:G1704.
;;; Emitting code for #:G1714.
;;; Emitting code for #:G1733.
;;; Emitting code for #:G1737.
;;; Emitting code for #:G1758.
;;; Emitting code for #:G1772.
;;; Emitting code for #:G1773.
;;; Emitting code for #:G1783.
;;; Emitting code for #:G1784.
;;; Emitting code for TRUENAMIZE.
;;; Emitting code for RESOLVE-SYMLINKS.
;;; Emitting code for RESOLVE-SYMLINKS*.
;;; Emitting code for #:G1813.
;;; Emitting code for #:G1817.
;;; 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 #:G1912.
;;; Emitting code for ENSURE-ALL-DIRECTORIES-EXIST.
;;; Emitting code for RENAME-FILE-OVERWRITING-TARGET.
;;; Emitting code for DELETE-FILE-IF-EXISTS.
;;; Emitting code for DELETE-EMPTY-DIRECTORY.
;;; Emitting code for DELETE-DIRECTORY-TREE.
;;; Emitting code for #:G1925.
;;; 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 #:G1975.
;;; 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 #:G2019.
;;; 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 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 #:G2112.
;;; Emitting code for #:G2119.
;;; Emitting code for #:G2123.
;;; 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 #:G2159.
;;; Emitting code for #:G2160.
;;; Emitting code for #:G2161.
;;; Emitting code for #:G2162.
;;; Emitting code for #:G2163.
;;; Emitting code for #:G2166.
;;; Emitting code for #:G2176.
;;; 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 #:G2217.
;;; Emitting code for #:BEFORE2280.
;;; 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 #:G2302.
;;; Emitting code for #:G2334.
;;; Emitting code for #:G2306.
;;; Emitting code for #:G2344.
;;; 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 #:G2385.
;;; 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 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 #:G2423.
;;; Emitting code for #:G2433.
;;; Emitting code for #:G2442.
;;; Emitting code for UIOP/RUN-PROGRAM::ISSUE-BACKSLASH.
;;; Emitting code for UIOP/RUN-PROGRAM::ISSUE.
;;; Emitting code for #:G2490.
;;; Emitting code for #:G2529.
;;; Emitting code for UIOP/RUN-PROGRAM::CALL-STREAM-PROCESSOR.
;;; Emitting code for #:G2533.
;;; Emitting code for #:G2534.
;;; Emitting code for #:G2535.
;;; Emitting code for #:G2536.
;;; Emitting code for #:G2537.
;;; Emitting code for #:G2538.
;;; Emitting code for #:G2539.
;;; Emitting code for #:G2540.
;;; Emitting code for #:G2541.
;;; Emitting code for #:G2542.
;;; Emitting code for #:G2543.
;;; Emitting code for #:G2544.
;;; Emitting code for #:G2546.
;;; Emitting code for #:G2545.
;;; Emitting code for #:G2547.
;;; Emitting code for #:G2548.
;;; Emitting code for #:G2549.
;;; Emitting code for #:G2550.
;;; Emitting code for #:G2551.
;;; Emitting code for #:G2552.
;;; Emitting code for #:G2553.
;;; Emitting code for #:G2555.
;;; Emitting code for #:G2554.
;;; Emitting code for #:G2556.
;;; 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 #:G2557.
;;; 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 #:G2722.
;;; Emitting code for #:G2740.
;;; Emitting code for UIOP/RUN-PROGRAM::REDIRECT.
;;; Emitting code for #:G2750.
;;; Emitting code for #:G2771.
;;; Emitting code for #:G2781.
;;; Emitting code for UIOP/RUN-PROGRAM::DEFAULT.
;;; Emitting code for #:BEFORE2599.
;;; Emitting code for #:G2723.
;;; Emitting code for #:G2737.
;;; Emitting code for #:G2773.
;;; Emitting code for #:G2778.
;;; Emitting code for #:G2603.
;;; Emitting code for #:G2606.
;;; Emitting code for #:G2724.
;;; Emitting code for #:G2775.
;;; Emitting code for UIOP/RUN-PROGRAM::RUN-ACTIVITY.
;;; Emitting code for UIOP/RUN-PROGRAM::GET-STREAM.
;;; Emitting code for #:G2734.
;;; 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 #:G2853.
;;; Emitting code for CHECK-LISP-COMPILE-WARNINGS.
;;; Emitting code for CHECK-LISP-COMPILE-RESULTS.
;;; Emitting code for #:G2854.
;;; 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 #:G2878.
;;; Emitting code for #:G2914.
;;; Emitting code for #:G2923.
;;; 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 #:G2955.
;;; Emitting code for UIOP/LISP-BUILD::CHECK-FLAG.
;;; Emitting code for #:G2964.
;;; Emitting code for #:G2956.
;;; Emitting code for #:G2957.
;;; Emitting code for COMBINE-FASLS.
;;; Emitting code for #:G2967.
;;; Emitting code for GET-FOLDER-PATH.
;;; 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 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 UIOP/CONFIGURATION::COMPUTE-USER-CACHE.
;;; 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 #:G2968.
;;; Emitting code for #:G3047.
;;; Emitting code for UIOP/CONFIGURATION::TRY.
;;; Emitting code for UIOP/CONFIGURATION::RELATIVE-COMPONENT-P.
;;; Emitting code for UIOP/CONFIGURATION::ABSOLUTE-COMPONENT-P.
;;; Emitting code for COERCE-PATHNAME.
;;; Emitting code for COMPONENT-NAME-TO-PATHNAME-COMPONENTS.
;;; Emitting code for COMPILE-FILE-KEEPING-OBJECT.
;;; 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 #:G3136.
;;; Emitting code for #:G3137.
;;; Emitting code for #:G3138.
;;; Emitting code for #:G3139.
;;; Emitting code for ASDF/COMPONENT:COMPONENT-FIND-PATH.
;;; Emitting code for #:G3153.
;;; Emitting code for #:G3154.
;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY..
;;; Emitting code for ASDF/COMPONENT:COMPUTE-CHILDREN-BY-NAME.
;;; Emitting code for #:G3181.
;;; Emitting code for #:G3194.
;;; Emitting code for #:G3198.
;;; Emitting code for #:G3199.
;;; Emitting code for #:G3200.
;;; Emitting code for #:G3205.
;;; Emitting code for #:G3207.
;;; Emitting code for #:G3208.
;;; Emitting code for #:G3209.
;;; Emitting code for #:G3210.
;;; Emitting code for #:G3211.
;;; Emitting code for ASDF/COMPONENT:SUB-COMPONENTS.
;;; Emitting code for ASDF/COMPONENT::C.
;;; Emitting code for ASDF/COMPONENT::RECURSE.
;;; Emitting code for #:G3220.
;;; Emitting code for ASDF/SYSTEM:RESET-SYSTEM.
;;; Emitting code for #:G3221.
;;; Emitting code for #:G3222.
;;; Emitting code for ASDF/SYSTEM:SYSTEM-SOURCE-DIRECTORY.
;;; Emitting code for ASDF/SYSTEM:SYSTEM-RELATIVE-PATHNAME.
;;; Emitting code for #:G3235.
;;; Emitting code for #:G3239.
;;; Emitting code for #:G3240.
;;; Emitting code for #:G3241.
;;; 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 #:G3260.
;;; Emitting code for #:G3276.
;;; Emitting code for #:G3277.
;;; Emitting code for #:G3279.
;;; Emitting code for ASDF/FIND-SYSTEM:SYSDEF-ERROR.
;;; Emitting code for ASDF/FIND-SYSTEM:COERCE-NAME.
;;; Emitting code for ASDF/FIND-SYSTEM:PRIMARY-SYSTEM-NAME.
;;; Emitting code for ASDF/FIND-SYSTEM:COERCE-FILENAME.
;;; Emitting code for ASDF/FIND-SYSTEM:SYSTEM-REGISTERED-P.
;;; Emitting code for ASDF/FIND-SYSTEM:REGISTERED-SYSTEMS.
;;; Emitting code for ASDF/FIND-SYSTEM:REGISTER-SYSTEM.
;;; Emitting code for ASDF/FIND-SYSTEM:CLEAR-DEFINED-SYSTEM.
;;; Emitting code for ASDF/FIND-SYSTEM:CLEAR-DEFINED-SYSTEMS.
;;; Emitting code for ASDF/FIND-SYSTEM:CLEAR-SYSTEM.
;;; Emitting code for ASDF/FIND-SYSTEM:MAP-SYSTEMS.
;;; Emitting code for #:G3278.
;;; Emitting code for #:G3280.
;;; Emitting code for #:G3354.
;;; Emitting code for ASDF/FIND-SYSTEM::CLEANUP-SYSTEM-DEFINITION-SEARCH-FUNCTIONS.
;;; Emitting code for ASDF/FIND-SYSTEM:SEARCH-FOR-SYSTEM-DEFINITION.
;;; Emitting code for ASDF/FIND-SYSTEM:PROBE-ASD.
;;; Emitting code for ASDF/FIND-SYSTEM:SYSDEF-CENTRAL-REGISTRY-SEARCH.
;;; Emitting code for ASDF/FIND-SYSTEM::MAKE-PRELOADED-SYSTEM.
;;; Emitting code for ASDF/FIND-SYSTEM:SYSDEF-PRELOADED-SYSTEM-SEARCH.
;;; Emitting code for ASDF/FIND-SYSTEM:REGISTER-PRELOADED-SYSTEM.
;;; Emitting code for #:G3532.
;;; Emitting code for #:G3533.
;;; Emitting code for ASDF/FIND-SYSTEM:FIND-SYSTEM-IF-BEING-DEFINED.
;;; Emitting code for ASDF/FIND-SYSTEM:LOAD-ASD.
;;; Emitting code for ASDF/FIND-SYSTEM::CHECK-NOT-OLD-ASDF-SYSTEM.
;;; Emitting code for ASDF/FIND-SYSTEM::SYSDEF-IMMUTABLE-SYSTEM-SEARCH.
;;; Emitting code for ASDF/FIND-SYSTEM:LOCATE-SYSTEM.
;;; Emitting code for #:G3604.
;;; Emitting code for #:G3438.
;;; Emitting code for #:G3440.
;;; Emitting code for ASDF/FIND-SYSTEM::TRY.
;;; Emitting code for #:G3441.
;;; Emitting code for #:G3502.
;;; Emitting code for #:G3503.
;;; Emitting code for #:G3504.
;;; Emitting code for #:G3505.
;;; Emitting code for #:G3506.
;;; Emitting code for #:G3534.
;;; Emitting code for #:G3541.
;;; Emitting code for #:G3556.
;;; Emitting code for #:G3605.
;;; Emitting code for #:G3540.
;;; Emitting code for #:G3611.
;;; Emitting code for #:G3612.
;;; Emitting code for #:G3622.
;;; Emitting code for #:G3623.
;;; Emitting code for #:G3624.
;;; Emitting code for #:G3625.
;;; Emitting code for #:G3626.
;;; Emitting code for #:G3627.
;;; Emitting code for #:G3628.
;;; Emitting code for #:G3629.
;;; Emitting code for #:G3630.
;;; Emitting code for #:G3631.
;;; Emitting code for ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME.
;;; Emitting code for ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-SPEC.
;;; Emitting code for #:G3651.
;;; Emitting code for #:G3652.
;;; Emitting code for #:G3653.
;;; Emitting code for #:G3647.
;;; Emitting code for #:G3648.
;;; Emitting code for #:G3649.
;;; Emitting code for #:G3662.
;;; Emitting code for #:G3689.
;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY..
;;; Emitting code for #:G3693.
;;; Emitting code for ASDF/OPERATION::%COMPUTE-OPERATIONS-VALUE.
;;; Emitting code for ASDF/OPERATION:MAKE-OPERATION.
;;; Emitting code for #:G3696.
;;; Emitting code for #:G3697.
;;; Emitting code for #:G3698.
;;; Emitting code for #:G3699.
;;; 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 #:G3730.
;;; Emitting code for #:G3731.
;;; Emitting code for #:G3734.
;;; Emitting code for #:G3735.
;;; Emitting code for #:G3736.
;;; Emitting code for ASDF/ACTION::FORMAT-ACTION.
;;; Emitting code for #:G3750.
;;; Emitting code for #:G3751.
;;; Emitting code for #:G3752.
;;; Emitting code for #:G3753.
;;; Emitting code for CALL-NEXT-METHOD.
;;; Emitting code for #:G3754.
;;; Emitting code for ASDF/ACTION::DOWNWARD-OPERATION-DEPENDS-ON.
;;; Emitting code for #:G3755.
;;; Emitting code for ASDF/ACTION::UPWARD-OPERATION-DEPENDS-ON.
;;; Emitting code for #:G3756.
;;; Emitting code for ASDF/ACTION::SIDEWAY-OPERATION-DEPENDS-ON.
;;; Emitting code for #:G3757.
;;; Emitting code for ASDF/ACTION::SELFWARD-OPERATION-DEPENDS-ON.
;;; Emitting code for #:G3769.
;;; Emitting code for #:G3770.
;;; Emitting code for #:G3772.
;;; Emitting code for #:G3774.
;;; Emitting code for #:G3776.
;;; Emitting code for #:G3777.
;;; Emitting code for #:G3780.
;;; Emitting code for #:G3781.
;;; Emitting code for #:G3782.
;;; Emitting code for #:G3785.
;;; Emitting code for #:G3786.
;;; Emitting code for #:G3787.
;;; Emitting code for #:G3790.
;;; Emitting code for #:G3791.
;;; Emitting code for #:G3792.
;;; Emitting code for #:G3793.
;;; Emitting code for #:G3806.
;;; Emitting code for #:G3819.
;;; Emitting code for ASDF/ACTION:OUTPUT-FILE.
;;; Emitting code for #:G3822.
;;; Emitting code for #:G3824.
;;; Emitting code for #:G3845.
;;; Emitting code for CALL-NEXT-METHOD.
;;; Emitting code for #:G3807.
;;; Emitting code for CALL-NEXT-METHOD.
;;; Emitting code for #:G3823.
;;; Emitting code for #:G3855.
;;; Emitting code for #:G3856.
;;; Emitting code for #:G3857.
;;; Emitting code for #:G3898.
;;; Emitting code for #:G3900.
;;; Emitting code for #:G3913.
;;; Emitting code for SI::.PRINT-UNREADABLE-OBJECT-BODY..
;;; Emitting code for #:G3919.
;;; Emitting code for #:G3920.
;;; Emitting code for #:G3921.
;;; Emitting code for #:G3922.
;;; Emitting code for #:G3923.
;;; Emitting code for #:G3924.
;;; Emitting code for #:G3925.
;;; Emitting code for #:G3927.
;;; Emitting code for #:G3952.
;;; Emitting code for #:G3959.
;;; Emitting code for #:G3960.
;;; Emitting code for #:G3961.
;;; Emitting code for #:G3962.
;;; Emitting code for #:G3965.
;;; Emitting code for #:G3966.
;;; Emitting code for #:G3967.
;;; Emitting code for #:G3968.
;;; Emitting code for #:G3969.
;;; Emitting code for #:G3970.
;;; 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 #:G3995.
;;; Emitting code for ASDF/LISP-ACTION:LISP-COMPILATION-OUTPUT-FILES.
;;; Emitting code for #:G3996.
;;; Emitting code for #:G3997.
;;; Emitting code for #:G3998.
;;; Emitting code for #:G4019.
;;; Emitting code for #:G4027.
;;; Emitting code for #:G3982.
;;; Emitting code for #:G4028.
;;; Emitting code for #:G4029.
;;; Emitting code for #:G4030.
;;; Emitting code for #:G4051.
;;; Emitting code for ASDF/LISP-ACTION:PERFORM-LISP-LOAD-FASL.
;;; Emitting code for #:G4060.
;;; Emitting code for #:G4061.
;;; Emitting code for #:G4057.
;;; Emitting code for #:G4058.
;;; Emitting code for #:G4062.
;;; Emitting code for #:G4063.
;;; Emitting code for #:G4064.
;;; Emitting code for #:G4065.
;;; Emitting code for #:G4066.
;;; Emitting code for ASDF/LISP-ACTION:PERFORM-LISP-LOAD-SOURCE.
;;; Emitting code for #:G4068.
;;; Emitting code for #:G4069.
;;; Emitting code for #:G4067.
;;; Emitting code for #:G4070.
;;; Emitting code for #:G4071.
;;; Emitting code for #:G4072.
;;; Emitting code for #:G4073.
;;; Emitting code for #:G4146.
;;; Emitting code for #:G4148.
;;; Emitting code for ASDF/PLAN:NODE-FOR.
;;; Emitting code for ASDF/PLAN:ACTION-ALREADY-DONE-P.
;;; Emitting code for #:G4149.
;;; Emitting code for #:G4162.
;;; 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 #:G4192.
;;; Emitting code for #:G4193.
;;; Emitting code for #:G4194.
;;; Emitting code for #:G4195.
;;; Emitting code for #:G4190.
;;; Emitting code for #:G4191.
;;; Emitting code for #:G4196.
;;; Emitting code for #:G4197.
;;; Emitting code for #:G4198.
;;; Emitting code for #:G4199.
;;; Emitting code for #:G4200.
;;; 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 #:G4250.
;;; Emitting code for #:G4216.
;;; Emitting code for #:G4251.
;;; Emitting code for #:G4324.
;;; Emitting code for #:G4344.
;;; Emitting code for #:G4348.
;;; Emitting code for #:G4349.
;;; Emitting code for #:G4414.
;;; Emitting code for #:G4428.
;;; Emitting code for ASDF/PLAN:WHILE-VISITING-ACTION.
;;; Emitting code for #:G4548.
;;; Emitting code for #:G4429.
;;; Emitting code for ASDF/PLAN::VISIT-ACTION.
;;; Emitting code for #:G4563.
;;; Emitting code for #:G4549.
;;; Emitting code for #:G4564.
;;; Emitting code for #:G4565.
;;; Emitting code for #:G4566.
;;; Emitting code for #:G4579.
;;; Emitting code for #:G4585.
;;; Emitting code for #:G4586.
;;; Emitting code for #:G4587.
;;; Emitting code for #:G4588.
;;; Emitting code for #:G4589.
;;; Emitting code for #:G4592.
;;; Emitting code for #:G4597.
;;; Emitting code for #:G4604.
;;; Emitting code for #:G4605.
;;; Emitting code for #:G4692.
;;; Emitting code for #:G4703.
;;; Emitting code for #:G4708.
;;; Emitting code for #:G4715.
;;; Emitting code for #:G4716.
;;; Emitting code for #:G4717.
;;; Emitting code for #:G4718.
;;; Emitting code for #:G4751.
;;; Emitting code for #:G4759.
;;; Emitting code for #:G4768.
;;; Emitting code for #:G4769.
;;; Emitting code for #:G4770.
;;; Emitting code for #:G4775.
;;; Emitting code for #:G4795.
;;; Emitting code for #:G4799.
;;; Emitting code for OOS.
;;; Emitting code for CALL-NEXT-METHOD.
;;; Emitting code for #:G4779.
;;; Emitting code for #:G4782.
;;; Emitting code for #:G4803.
;;; Emitting code for #:G4804.
;;; 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 #:G4808.
;;; Emitting code for #:G4809.
;;; Emitting code for #:G4812.
;;; Emitting code for MODULE-PROVIDE-ASDF.
;;; Emitting code for #:G4815.
;;; Emitting code for ASDF/OPERATE::RESTART-UPGRADED-ASDF.
;;; Emitting code for #:G4864.
;;; 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 #:G4910.
;;; Emitting code for #:G4911.
;;; Emitting code for #:G4912.
;;; Emitting code for #:G4913.
;;; Emitting code for #:G4914.
;;; 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 #:G4870.
;;; Emitting code for ASDF/OUTPUT-TRANSLATIONS::C.
;;; Emitting code for #:G4943.
;;; 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: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 #:G5059.
;;; Emitting code for #:G5060.
;;; Emitting code for #:G5061.
;;; Emitting code for #:G5062.
;;; Emitting code for #:G5063.
;;; Emitting code for ASDF/SOURCE-REGISTRY:FLATTEN-SOURCE-REGISTRY.
;;; Emitting code for ASDF/SOURCE-REGISTRY:COMPUTE-SOURCE-REGISTRY.
;;; Emitting code for ASDF/FIND-SYSTEM:INITIALIZE-SOURCE-REGISTRY.
;;; Emitting code for ASDF/SOURCE-REGISTRY:ENSURE-SOURCE-REGISTRY.
;;; Emitting code for ASDF/FIND-SYSTEM:SYSDEF-SOURCE-REGISTRY-SEARCH.
;;; Emitting code for #:G4947.
;;; Emitting code for #:G4948.
;;; Emitting code for ASDF/SOURCE-REGISTRY::CHECK.
;;; Emitting code for ASDF/SOURCE-REGISTRY::COLLECT.
;;; Emitting code for #:G5075.
;;; Emitting code for #:G5124.
;;; Emitting code for ASDF/BACKWARD-INTERNALS::%COMPUTE-+ASDF-METHODS+-VALUE.
;;; Emitting code for ASDF/BACKWARD-INTERNALS::%REMOVE-COMPONENT-INLINE-METHODS.
;;; Emitting code for ASDF/BACKWARD-INTERNALS::%DEFINE-COMPONENT-INLINE-METHODS.
;;; Emitting code for ASDF/BACKWARD-INTERNALS:%REFRESH-COMPONENT-INLINE-METHODS.
;;; Emitting code for #:G5142.
;;; Emitting code for ASDF/BACKWARD-INTERNALS:LOAD-SYSDEF.
;;; Emitting code for ASDF/BACKWARD-INTERNALS:MAKE-TEMPORARY-PACKAGE.
;;; Emitting code for ASDF/PARSE-DEFSYSTEM:DETERMINE-SYSTEM-DIRECTORY.
;;; Emitting code for #:G5242.
;;; Emitting code for ASDF/PARSE-DEFSYSTEM:CLASS-FOR-TYPE.
;;; Emitting code for #:G5246.
;;; Emitting code for #:G5248.
;;; 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 #:G5247.
;;; Emitting code for #:G5249.
;;; Emitting code for ASDF/PARSE-DEFSYSTEM::INVALID-PARSE.
;;; Emitting code for ASDF/PARSE-DEFSYSTEM::INVALID.
;;; 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 #:G5409.
;;; Emitting code for #:G5420.
;;; Emitting code for #:G5434.
;;; Emitting code for #:G5435.
;;; Emitting code for #:G5436.
;;; Emitting code for #:G5437.
;;; Emitting code for #:G5438.
;;; Emitting code for #:G5439.
;;; Emitting code for #:G5440.
;;; Emitting code for OPERATION-MONOLITHIC-P.
;;; Emitting code for #:G5441.
;;; Emitting code for BUNDLE-PATHNAME-TYPE.
;;; Emitting code for ASDF/BUNDLE::BUNDLE-OUTPUT-FILES.
;;; Emitting code for #:G5452.
;;; Emitting code for #:G5517.
;;; Emitting code for BUNDLABLE-FILE-P.
;;; Emitting code for USER-SYSTEM-P.
;;; Emitting code for DIRECT-DEPENDENCY-FILES.
;;; Emitting code for #:G5548.
;;; 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 #:G5544.
;;; Emitting code for #:G5571.
;;; Emitting code for #:G5572.
;;; Emitting code for #:G5573.
;;; Emitting code for #:G5574.
;;; Emitting code for #:G5575.
;;; Emitting code for #:G5577.
;;; Emitting code for #:G5578.
;;; Emitting code for #:G5579.
;;; Emitting code for #:G5580.
;;; Emitting code for #:G5576.
;;; Emitting code for #:G5581.
;;; Emitting code for #:G5582.
;;; Emitting code for #:G5583.
;;; Emitting code for #:G5584.
;;; Emitting code for #:G5585.
;;; Emitting code for #:G5586.
;;; Emitting code for #:G5587.
;;; Emitting code for #:G5588.
;;; Emitting code for #:G5595.
;;; Emitting code for #:G5606.
;;; Emitting code for #:G5607.
;;; Emitting code for #:G5608.
;;; Emitting code for ASDF/BUNDLE::X.
;;; Emitting code for #:G5598.
;;; 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 #:G5625.
;;; Emitting code for #:G5640.
;;; Emitting code for ASDF/BUNDLE::HAS-IT-P.
;;; Emitting code for #:G5681.
;;; Emitting code for #:G5701.
;;; Emitting code for #:G5702.
;;; Emitting code for #:G5703.
;;; Emitting code for #:G5704.
;;; Emitting code for #:G5705.
;;; Emitting code for #:G5706.
;;; Emitting code for ASDF/BACKWARD-INTERFACE:COMPONENT-LOAD-DEPENDENCIES.
;;; Emitting code for #:G5708.
;;; Emitting code for #:G5709.
;;; Emitting code for #:G5710.
;;; Emitting code for #:G5715.
;;; Emitting code for #:G5721.
;;; Emitting code for ASDF/BACKWARD-INTERFACE:SYSTEM-DEFINITION-PATHNAME.
;;; Emitting code for #:G5725.
;;; Emitting code for #:G5726.
;;; Emitting code for #:G5727.
;;; Emitting code for #:G5728.
;;; Emitting code for #:G5707.
;;; Emitting code for ASDF/BACKWARD-INTERFACE:ENABLE-ASDF-BINARY-LOCATIONS-COMPATIBILITY.
;;; Emitting code for #:G5751.
;;; Emitting code for ASDF/BACKWARD-INTERFACE:RUN-SHELL-COMMAND.
;;; Emitting code for #:G5763.
;;; Emitting code for #:G5772.
;;; Emitting code for #:G5793.
;;; 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 #:G5833.
;;; 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 #:G5832.
;;; Emitting code for #:G5834.
;;; Emitting code for ASDF/PACKAGE-INFERRED-SYSTEM::DEP.
;;; Emitting code for #:G5909.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/asdf.c -o ext/asdf.o 
;;; Finished compiling EXT:ASDF;ASDF.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_ASDF
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitavNIR1.c -o eclinitavNIR1.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libasdf.a eclinitavNIR1.o ext/asdf.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libasdf.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ecliniti3HWy6.c -o ecliniti3HWy6.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o asdf.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecliniti3HWy6.o ext/asdf.o -shared libecl.so -lgmp -lgc -lffi -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 2095
;;;   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 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of (+ COUNT #:G34) to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of (+ TICKS #:G55) to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of (+ CONSING #:G62) to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of (+ PROFILES #:G69) to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of (+ OLD-ENCLOSED-TICKS DTICKS) to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of (+ OLD-ENCLOSED-CONSING DCONSING) to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of (+ OLD-ENCLOSED-PROFILES INNER-ENCLOSED-PROFILES 1) to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   at (DEFUN PROFILE-ENCAPSULATION-LAMBDAS ...)
;;;   Checking type of 0 to be COUNTER
;;; Note:
;;;   in file PROFILE.LISP, position 7110
;;;   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 10443
;;;   at (DEFUN PROFILE-1-UNPROFILED-FUN ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK109) to be FIXNUM
;;; Compiling (DEFUN PROFILE-1-FUN ...).
;;; Note:
;;;   in file PROFILE.LISP, position 11252
;;;   at (DEFUN PROFILE-1-FUN ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK128) to be FIXNUM
;;; Compiling (DEFUN UNPROFILE-1-FUN ...).
;;; Note:
;;;   in file PROFILE.LISP, position 11651
;;;   at (DEFUN UNPROFILE-1-FUN ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK144) to be FIXNUM
;;; Note:
;;;   in file PROFILE.LISP, position 11651
;;;   at (DEFUN UNPROFILE-1-FUN ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK160) to be FIXNUM
;;; Compiling (DEFMACRO PROFILE ...).
;;; Compiling (DEFMACRO UNPROFILE ...).
;;; Compiling (DEFUN UNPROFILE-ALL ...).
;;; Note:
;;;   in file PROFILE.LISP, position 13362
;;;   at (DEFUN UNPROFILE-ALL ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK192) to be FIXNUM
;;; Style warning:
;;;   in file PROFILE.LISP, position 13362
;;;   at (DEFUN UNPROFILE-ALL ...)
;;;   ! The variable PROFILE-INFO is not used.
;;; Compiling (DEFUN RESET ...).
;;; Note:
;;;   in file PROFILE.LISP, position 13531
;;;   at (DEFUN RESET ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK214) to be FIXNUM
;;; Style warning:
;;;   in file PROFILE.LISP, position 13531
;;;   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 14898
;;;   at (DEFUN REPORT ...)
;;;   Checking type of (COMPUTE-OVERHEAD) to be OVERHEAD
;;; Note:
;;;   in file PROFILE.LISP, position 14898
;;;   at (DEFUN REPORT ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK239) 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 19872
;;;   at (DEFUN COMPUTE-OVERHEAD ...)
;;;   Checking type of #:LET292 to be FUNCTION
;;; Note:
;;;   in file PROFILE.LISP, position 19872
;;;   at (DEFUN COMPUTE-OVERHEAD ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK300) 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 #:G32.
;;; Emitting code for #:G93.
;;; Emitting code for #:G94.
;;; 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 #:G262.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/profile.c -o ext/profile.o 
;;; Finished compiling EXT:PROFILE;PROFILE.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_PROFILE
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitUl1aHk.c -o eclinitUl1aHk.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libprofile.a eclinitUl1aHk.o ext/profile.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libprofile.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit578HLr.c -o eclinit578HLr.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o profile.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinit578HLr.o ext/profile.o -shared libecl.so -lgmp -lgc -lffi -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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3152
;;;   at (DEFUN SPLIT ...)
;;;   Checking type of #:LOOP-LIST-TAIL27 to be CONS
;;; Note:
;;;   in file SOCKETS.LISP, position 3152
;;;   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 15916
;;;   at (DEFMETHOD SOCKET-RECEIVE ...)
;;;   ! Variable +EAGAIN+ was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 15916
;;;   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 18106
;;;   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 26367
;;;   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 45738
;;;   at (DEFINE-SOCKET-CONDITION EADDRINUSE ...)
;;;   ! Variable EADDRINUSE was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 45796
;;;   at (DEFINE-SOCKET-CONDITION EAGAIN ...)
;;;   ! Variable EAGAIN was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 45847
;;;   at (DEFINE-SOCKET-CONDITION EBADF ...)
;;;   ! Variable EBADF was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 45905
;;;   at (DEFINE-SOCKET-CONDITION ECONNREFUSED ...)
;;;   ! Variable ECONNREFUSED was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 45969
;;;   at (DEFINE-SOCKET-CONDITION ETIMEDOUT ...)
;;;   ! Variable ETIMEDOUT was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46029
;;;   at (DEFINE-SOCKET-CONDITION EINTR ...)
;;;   ! Variable EINTR was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46079
;;;   at (DEFINE-SOCKET-CONDITION EINVAL ...)
;;;   ! Variable EINVAL was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46135
;;;   at (DEFINE-SOCKET-CONDITION ENOBUFS ...)
;;;   ! Variable ENOBUFS was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46186
;;;   at (DEFINE-SOCKET-CONDITION ENOMEM ...)
;;;   ! Variable ENOMEM was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46239
;;;   at (DEFINE-SOCKET-CONDITION EOPNOTSUPP ...)
;;;   ! Variable EOPNOTSUPP was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46306
;;;   at (DEFINE-SOCKET-CONDITION EPERM ...)
;;;   ! Variable EPERM was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46368
;;;   at (DEFINE-SOCKET-CONDITION EPROTONOSUPPORT ...)
;;;   ! Variable EPROTONOSUPPORT was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46439
;;;   at (DEFINE-SOCKET-CONDITION ESOCKTNOSUPPORT ...)
;;;   ! Variable ESOCKTNOSUPPORT was undefined. Compiler assumes it is a global.
;;; Style warning:
;;;   in file SOCKETS.LISP, position 46513
;;;   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 48519
;;;   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 48588
;;;   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 48654
;;;   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 48722
;;;   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 48780
;;;   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 48935
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/sockets.c -o ext/sockets.o 
;;; Finished compiling EXT:SOCKETS;SOCKETS.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_SOCKETS
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit02gtkM.c -o eclinit02gtkM.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libsockets.a eclinit02gtkM.o ext/package.o ext/sockets.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libsockets.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitMGTUe2.c -o eclinitMGTUe2.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o sockets.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinitMGTUe2.o ext/package.o ext/sockets.o -shared libecl.so -lgmp -lgc -lffi -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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/sb-bsd-sockets.c -o ext/sb-bsd-sockets.o 
;;; Finished compiling EXT:SOCKETS;SB-BSD-SOCKETS.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_SB_BSD_SOCKETS
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitqHTZof.c -o eclinitqHTZof.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libsb-bsd-sockets.a eclinitqHTZof.o ext/sb-bsd-sockets.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libsb-bsd-sockets.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitJAdECh.c -o eclinitJAdECh.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o sb-bsd-sockets.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinitJAdECh.o ext/sb-bsd-sockets.o -shared libecl.so -lgmp -lgc -lffi -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 5374
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/serve-event.c -o ext/serve-event.o 
;;; Finished compiling EXT:SERVE-EVENT;SERVE-EVENT.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_SERVE_EVENT
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit0scfMJ.c -o eclinit0scfMJ.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libserve-event.a eclinit0scfMJ.o ext/serve-event.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libserve-event.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ecliniteVXKS3.c -o ecliniteVXKS3.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o serve-event.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ecliniteVXKS3.o ext/serve-event.o -shared libecl.so -lgmp -lgc -lffi -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 7845
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/ecl-curl.c -o ext/ecl-curl.o 
;;; Finished compiling EXT:ECL-CURL;ECL-CURL.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_ECL_CURL
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitHQrd1n.c -o eclinitHQrd1n.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libecl-curl.a eclinitHQrd1n.o ext/ecl-curl.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libecl-curl.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinittjNP7v.c -o eclinittjNP7v.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o ecl-curl.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinittjNP7v.o ext/ecl-curl.o -shared libecl.so -lgmp -lgc -lffi -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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/minitar.c -o ext/minitar.o 
;;; Finished compiling EXT:QUICKLISP;MINITAR.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_QL_MINITAR
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit1ot4hw.c -o eclinit1ot4hw.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libql-minitar.a eclinit1ot4hw.o ext/minitar.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libql-minitar.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit6A8uxk.c -o eclinit6A8uxk.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o ql-minitar.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinit6A8uxk.o ext/minitar.o -shared libecl.so -lgmp -lgc -lffi -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 10979
;;;   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 12125
;;;   at (DEFUN BIT-STREAM-READ-BITS ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Compiling (DEFUN BIT-STREAM-COPY-BLOCK ...).
;;; Note:
;;;   in file DEFLATE.LISP, position 13169
;;;   at (DEFUN BIT-STREAM-COPY-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 13169
;;;   at (DEFUN BIT-STREAM-COPY-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 13169
;;;   at (DEFUN BIT-STREAM-COPY-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 13169
;;;   at (DEFUN BIT-STREAM-COPY-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 13169
;;;   at (DEFUN BIT-STREAM-COPY-BLOCK ...)
;;;   Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 13169
;;;   at (DEFUN BIT-STREAM-COPY-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 13169
;;;   at (DEFUN BIT-STREAM-COPY-BLOCK ...)
;;;   Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 13169
;;;   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 16616
;;;   at (DEFUN READ-HUFFMAN-CODE ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 16616
;;;   at (DEFUN READ-HUFFMAN-CODE ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 16616
;;;   at (DEFUN READ-HUFFMAN-CODE ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 16616
;;;   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 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining READ-HUFFMAN-CODE
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 18609
;;;   at (DEFUN DECODE-CODE-LENGTH-ENTRIES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Compiling (DEFUN DECODE-HUFFMAN-TABLES ...).
;;; Note:
;;;   in file DEFLATE.LISP, position 19800
;;;   at (DEFUN DECODE-HUFFMAN-TABLES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 19800
;;;   at (DEFUN DECODE-HUFFMAN-TABLES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 19800
;;;   at (DEFUN DECODE-HUFFMAN-TABLES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 19800
;;;   at (DEFUN DECODE-HUFFMAN-TABLES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 19800
;;;   at (DEFUN DECODE-HUFFMAN-TABLES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 19800
;;;   at (DEFUN DECODE-HUFFMAN-TABLES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 19800
;;;   at (DEFUN DECODE-HUFFMAN-TABLES ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 19800
;;;   at (DEFUN DECODE-HUFFMAN-TABLES ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Compiling (DEFUN DECODE-LENGTH-ENTRY ...).
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 21238
;;;   at (DEFUN DECODE-LENGTH-ENTRY ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Compiling (DEFUN DECODE-DISTANCE-ENTRY ...).
;;; Note:
;;;   in file DEFLATE.LISP, position 22072
;;;   at (DEFUN DECODE-DISTANCE-ENTRY ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22072
;;;   at (DEFUN DECODE-DISTANCE-ENTRY ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Compiling (DEFUN DECODE-HUFFMAN-BLOCK ...).
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining READ-HUFFMAN-CODE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining DECODE-LENGTH-ENTRY
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining DECODE-DISTANCE-ENTRY
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining READ-HUFFMAN-CODE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining READ-HUFFMAN-CODE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 22509
;;;   at (DEFUN DECODE-HUFFMAN-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Compiling (DEFUN DECODE-BLOCK ...).
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-READ-BITS
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-COPY-BLOCK
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining BIT-STREAM-GET-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   at (DEFUN DECODE-BLOCK ...)
;;;   Inlining SLIDING-WINDOW-STREAM-WRITE-BYTE
;;; Note:
;;;   in file DEFLATE.LISP, position 23297
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/deflate.c -o ext/deflate.o 
;;; Finished compiling EXT:DEFLATE;DEFLATE.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_DEFLATE
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitwNqheS.c -o eclinitwNqheS.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libdeflate.a eclinitwNqheS.o ext/deflate.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libdeflate.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit7C4H0o.c -o eclinit7C4H0o.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o deflate.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinit7C4H0o.o ext/deflate.o -shared libecl.so -lgmp -lgc -lffi -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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/ecl-quicklisp.c -o ext/ecl-quicklisp.o 
;;; Finished compiling EXT:QUICKLISP;ECL-QUICKLISP.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_ECL_QUICKLISP
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitjQnuAM.c -o eclinitjQnuAM.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libecl-quicklisp.a eclinitjQnuAM.o ext/ecl-quicklisp.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib libecl-quicklisp.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit0kMOW4.c -o eclinit0kMOW4.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o ecl-quicklisp.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinit0kMOW4.o ext/ecl-quicklisp.o -shared libecl.so -lgmp -lgc -lffi -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 2884
;;;   at (DEFUN REM-TEST ...)
;;;   Checking type of #:G21 to be CONS
;;; Compiling (DEFUN GET-TEST ...).
;;; Compiling (DEFUN GET-ENTRY ...).
;;; Compiling (DEFMACRO DEFTEST ...).
;;; Compiling (DEFUN ADD-ENTRY ...).
;;; Note:
;;;   in file RT.LISP, position 3447
;;;   at (DEFUN ADD-ENTRY ...)
;;;   Checking type of #:G41 to be CONS
;;; Note:
;;;   in file RT.LISP, position 3447
;;;   at (DEFUN ADD-ENTRY ...)
;;;   Checking type of (CDR #:G43) to be CONS
;;; Compiling (DEFUN REPORT-ERROR ...).
;;; Compiling (DEFUN DO-TEST ...).
;;; Compiling (DEFUN EQUALP-WITH-CASE ...).
;;; Note:
;;;   in file RT.LISP, position 4138
;;;   at (DEFUN EQUALP-WITH-CASE ...)
;;;   Checking type of #:LET54 to be VECTOR
;;; Note:
;;;   in file RT.LISP, position 4138
;;;   at (DEFUN EQUALP-WITH-CASE ...)
;;;   Checking type of #:LET58 to be VECTOR
;;; Note:
;;;   in file RT.LISP, position 4138
;;;   at (DEFUN EQUALP-WITH-CASE ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-48) to be FIXNUM
;;; Note:
;;;   in file RT.LISP, position 4138
;;;   at (DEFUN EQUALP-WITH-CASE ...)
;;;   Checking type of (1+ #:LOOP-ACROSS-INDEX-51) to be FIXNUM
;;; Note:
;;;   in file RT.LISP, position 4138
;;;   at (DEFUN EQUALP-WITH-CASE ...)
;;;   Checking type of #:LET63 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 6800
;;;   at (DEFUN DO-ENTRIES ...)
;;;   Checking type of #:LET97 to be LIST
;;; Note:
;;;   in file RT.LISP, position 6800
;;;   at (DEFUN DO-ENTRIES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST93) to be LIST
;;; Note:
;;;   in file RT.LISP, position 6800
;;;   at (DEFUN DO-ENTRIES ...)
;;;   Checking type of #:LOOP-LIST-TAIL95 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 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 #:G71.
;;; Emitting code for CONTINUE-TESTING.
;;; Emitting code for DO-TESTS.
;;; Emitting code for DO-ENTRIES.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c ext/rt.c -o ext/rt.o 
;;; Finished compiling EXT:RT;RT.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_RT
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitQyR1a4.c -o eclinitQyR1a4.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr librt.a eclinitQyR1a4.o ext/rt.o 
;;; Note:
;;;   Invoking external command:
;;;   ranlib librt.a 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitdxiUg1.c -o eclinitdxiUg1.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o rt.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinitdxiUg1.o ext/rt.o -shared libecl.so -lgmp -lgc -lffi -lpthread -ldl -lm 
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ATARIST.BIN to BUILD:ENCODINGS;ATARIST.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-1.BIN to BUILD:ENCODINGS;ISO-8859-1.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-2.BIN to BUILD:ENCODINGS;ISO-8859-2.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-3.BIN to BUILD:ENCODINGS;ISO-8859-3.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-4.BIN to BUILD:ENCODINGS;ISO-8859-4.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-5.BIN to BUILD:ENCODINGS;ISO-8859-5.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-6.BIN to BUILD:ENCODINGS;ISO-8859-6.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-7.BIN to BUILD:ENCODINGS;ISO-8859-7.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-8.BIN to BUILD:ENCODINGS;ISO-8859-8.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-9.BIN to BUILD:ENCODINGS;ISO-8859-9.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-10.BIN to BUILD:ENCODINGS;ISO-8859-10.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-11.BIN to BUILD:ENCODINGS;ISO-8859-11.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-13.BIN to BUILD:ENCODINGS;ISO-8859-13.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-14.BIN to BUILD:ENCODINGS;ISO-8859-14.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-15.BIN to BUILD:ENCODINGS;ISO-8859-15.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-8859-16.BIN to BUILD:ENCODINGS;ISO-8859-16.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/KOI8-R.BIN to BUILD:ENCODINGS;KOI8-R.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/KOI8-U.BIN to BUILD:ENCODINGS;KOI8-U.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/CP-856.BIN to BUILD:ENCODINGS;CP-856.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/CP-856.BIN to BUILD:ENCODINGS;CP-856.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP437.BIN to BUILD:ENCODINGS;DOS-CP437.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP737.BIN to BUILD:ENCODINGS;DOS-CP737.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP775.BIN to BUILD:ENCODINGS;DOS-CP775.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP850.BIN to BUILD:ENCODINGS;DOS-CP850.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP852.BIN to BUILD:ENCODINGS;DOS-CP852.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP855.BIN to BUILD:ENCODINGS;DOS-CP855.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP857.BIN to BUILD:ENCODINGS;DOS-CP857.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP860.BIN to BUILD:ENCODINGS;DOS-CP860.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP861.BIN to BUILD:ENCODINGS;DOS-CP861.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP862.BIN to BUILD:ENCODINGS;DOS-CP862.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP863.BIN to BUILD:ENCODINGS;DOS-CP863.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP864.BIN to BUILD:ENCODINGS;DOS-CP864.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP865.BIN to BUILD:ENCODINGS;DOS-CP865.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP866.BIN to BUILD:ENCODINGS;DOS-CP866.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP869.BIN to BUILD:ENCODINGS;DOS-CP869.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/DOS-CP874.BIN to BUILD:ENCODINGS;DOS-CP874.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP932.BIN to BUILD:ENCODINGS;WINDOWS-CP932.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP936.BIN to BUILD:ENCODINGS;WINDOWS-CP936.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP949.BIN to BUILD:ENCODINGS;WINDOWS-CP949.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP950.BIN to BUILD:ENCODINGS;WINDOWS-CP950.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1250.BIN to BUILD:ENCODINGS;WINDOWS-CP1250.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1251.BIN to BUILD:ENCODINGS;WINDOWS-CP1251.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1252.BIN to BUILD:ENCODINGS;WINDOWS-CP1252.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1253.BIN to BUILD:ENCODINGS;WINDOWS-CP1253.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1254.BIN to BUILD:ENCODINGS;WINDOWS-CP1254.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1255.BIN to BUILD:ENCODINGS;WINDOWS-CP1255.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1256.BIN to BUILD:ENCODINGS;WINDOWS-CP1256.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1257.BIN to BUILD:ENCODINGS;WINDOWS-CP1257.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/WINDOWS-CP1258.BIN to BUILD:ENCODINGS;WINDOWS-CP1258.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/JISX0201.BIN to BUILD:ENCODINGS;JISX0201.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/JISX0208.BIN to BUILD:ENCODINGS;JISX0208.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/JISX0212.BIN to BUILD:ENCODINGS;JISX0212.BIN
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../contrib/encodings/ISO-2022-JP to build:encodings;ISO-2022-JP
;;; Copying /<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 7032
;;;   at (FSET 'INDEX> ...)
;;;   Checking type of #:LET197 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX> ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST193) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX> ...)
;;;   Checking type of #:LOOP-LIST-TAIL195 to be CONS
;;; Compiling (DEFMACRO INDEX= ...).
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX= ...)
;;;   Checking type of #:LET209 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX= ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST205) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX= ...)
;;;   Checking type of #:LOOP-LIST-TAIL207 to be CONS
;;; Compiling (DEFMACRO INDEX< ...).
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX< ...)
;;;   Checking type of #:LET221 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX< ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST217) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX< ...)
;;;   Checking type of #:LOOP-LIST-TAIL219 to be CONS
;;; Compiling (DEFMACRO INDEX>= ...).
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX>= ...)
;;;   Checking type of #:LET233 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX>= ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST229) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX>= ...)
;;;   Checking type of #:LOOP-LIST-TAIL231 to be CONS
;;; Compiling (DEFMACRO INDEX<= ...).
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX<= ...)
;;;   Checking type of #:LET245 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX<= ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST241) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 7032
;;;   at (FSET 'INDEX<= ...)
;;;   Checking type of #:LOOP-LIST-TAIL243 to be CONS
;;; Compiling (DEFVAR *EMPTY-BYTES* ...).
;;; Note:
;;;   in file DEPDEFS.LISP, position 12091
;;;   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 13209
;;;   at (DEFUN XINTERN ...)
;;;   Checking type of #:LET262 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 13209
;;;   at (DEFUN XINTERN ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST258) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 13209
;;;   at (DEFUN XINTERN ...)
;;;   Checking type of #:LOOP-LIST-TAIL260 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 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of #:LET528 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST524) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of #:LOOP-LIST-TAIL526 to be CONS
;;; Note:
;;;   in file DEPDEFS.LISP, position 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of #:LET570 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST566) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of #:G571 to be CONS
;;; Note:
;;;   in file DEPDEFS.LISP, position 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of #:LET579 to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST575) to be LIST
;;; Note:
;;;   in file DEPDEFS.LISP, position 14064
;;;   at (FSET 'DEF-CLX-CLASS ...)
;;;   Checking type of #:G580 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 #:G564.
;;; Emitting code for UNIX-SOCKET-PATH-FROM-HOST.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 32881
;;;   at (DEFUN DECODE-MASK ...)
;;;   Checking type of #:LET324 to be LIST
;;; Note:
;;;   in file CLX.LISP, position 32881
;;;   at (DEFUN DECODE-MASK ...)
;;;   Checking type of (ASH M -1) to be MASK32
;;; Note:
;;;   in file CLX.LISP, position 32881
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4360
;;;   at (DEFUN AREF-INT8 ...)
;;;   Inlining CARD8->INT8
;;; Compiling (DEFUN ASET-INT8 ...).
;;; Note:
;;;   in file DEPENDENT.LISP, position 4360
;;;   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 12338
;;;   at (DEFUN AREF-INT16 ...)
;;;   Inlining AREF-INT8
;;; Note:
;;;   in file DEPENDENT.LISP, position 12338
;;;   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 12338
;;;   at (DEFUN AREF-INT32 ...)
;;;   Inlining AREF-INT8
;;; Note:
;;;   in file DEPENDENT.LISP, position 12338
;;;   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 27039
;;;   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 56178
;;;   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 57622
;;;   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 63599
;;;   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 91274
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 13182
;;;   at (DEFINE-ACCESSOR STRING ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13182
;;;   at (DEFINE-ACCESSOR STRING ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13182
;;;   at (DEFINE-ACCESSOR STRING ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13182
;;;   at (DEFINE-ACCESSOR STRING ...)
;;;   Checking type of (LOGAND (INDEX+ INDEX 3) -4) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13182
;;;   at (DEFINE-ACCESSOR STRING ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13182
;;;   at (DEFINE-ACCESSOR STRING ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13182
;;;   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 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of (LOGAND (INDEX+ INDEX 3) -4) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   at (DEFINE-ACCESSOR SEQUENCE ...)
;;;   Checking type of (VALUES (CEILING (THE ARRAY-INDEX INDEX) 4)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 13894
;;;   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 17939
;;;   at (FSET 'OR-EXPAND ...)
;;;   Checking type of #:LET1038 to be LIST
;;; Note:
;;;   in file MACROS.LISP, position 17939
;;;   at (FSET 'OR-EXPAND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1034) to be LIST
;;; Note:
;;;   in file MACROS.LISP, position 17939
;;;   at (FSET 'OR-EXPAND ...)
;;;   Checking type of #:LOOP-LIST-TAIL1036 to be CONS
;;; Note:
;;;   in file MACROS.LISP, position 17939
;;;   at (FSET 'OR-EXPAND ...)
;;;   Checking type of #:LET1045 to be LIST
;;; Note:
;;;   in file MACROS.LISP, position 17939
;;;   at (FSET 'OR-EXPAND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1041) to be LIST
;;; Note:
;;;   in file MACROS.LISP, position 17939
;;;   at (FSET 'OR-EXPAND ...)
;;;   Checking type of #:LOOP-LIST-TAIL1043 to be CONS
;;; Compiling (DEFINE-ACCESSOR OR ...).
;;; Compiling (DEFINE-ACCESSOR OR ...).
;;; Compiling (DEFUN MASK-GET ...).
;;; Note:
;;;   in file MACROS.LISP, position 19789
;;;   at (DEFUN MASK-GET ...)
;;;   Checking type of #:LET1109 to be LIST
;;; Note:
;;;   in file MACROS.LISP, position 19789
;;;   at (DEFUN MASK-GET ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1105) to be LIST
;;; Note:
;;;   in file MACROS.LISP, position 19789
;;;   at (DEFUN MASK-GET ...)
;;;   Checking type of #:LOOP-LIST-TAIL1107 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 23054
;;;   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 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of (LOGAND (INDEX+ INDEX 1) -2) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of (LOGAND (INDEX+ INDEX 3) -4) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   at (DEFUN GET-PUT-ITEMS ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 3)) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 23054
;;;   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 24935
;;;   at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 24935
;;;   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 24935
;;;   at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 24935
;;;   at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...)
;;;   Checking type of (LOGAND (INDEX+ INDEX 3) -4) to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 24935
;;;   at (FSET 'WITH-BUFFER-REQUEST-INTERNAL ...)
;;;   Checking type of INDEX to be ARRAY-INDEX
;;; Note:
;;;   in file MACROS.LISP, position 24935
;;;   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 24935
;;;   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 OR-GET.
;;; Emitting code for OR-PUT.
;;; Emitting code for MASK-GET.
;;; Emitting code for #:G1110.
;;; Emitting code for MASK-PUT.
;;; Emitting code for #:G1117.
;;; Emitting code for PROGN-GET.
;;; Emitting code for PROGN-PUT.
;;; Emitting code for CHECK-PUT.
;;; Emitting code for GET-PUT-ITEMS.
;;; Emitting code for #:G1150.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 9253
;;;   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 9981
;;;   at (DEFUN BUFFER-PAD-REQUEST ...)
;;;   Checking type of (BUFFER-BOFFSET BUFFER) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 9981
;;;   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 9981
;;;   at (DEFUN BUFFER-PAD-REQUEST ...)
;;;   Checking type of (BUFFER-BOFFSET BUFFER) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 9981
;;;   at (DEFUN BUFFER-PAD-REQUEST ...)
;;;   Checking type of (BUFFER-SIZE BUFFER) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 9981
;;;   at (DEFUN BUFFER-PAD-REQUEST ...)
;;;   Checking type of (BUFFER-BOFFSET BUFFER) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 9981
;;;   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 9981
;;;   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 11933
;;;   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 11933
;;;   at (DEFUN WITH-BUFFER-REQUEST-AND-REPLY-FUNCTION ...)
;;;   Checking type of #:G250 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file BUFFER.LISP, position 11933
;;;   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 13725
;;;   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 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of "" to be STRING
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   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 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of #:G282 to be BUFFER-BYTES
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of #:G283 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of (MAKE-SEQUENCE 'STRING STRING-LENGTH) to be STRING
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of (VALUES (1+ (THE ARRAY-INDEX INDEX))) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of #:LET295 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Inlining CARD8->CHAR
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of (VALUES (1+ (THE ARRAY-INDEX J))) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   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 17278
;;;   at (DEFUN READ-SEQUENCE-STRING ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX INDEX) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 17278
;;;   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 19054
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-CHAR ...)
;;;   Inlining CARD8->CHAR
;;; Note:
;;;   in file BUFFER.LISP, position 19054
;;;   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 20447
;;;   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 20447
;;;   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 20542
;;;   at (DEFUN READ-SIMPLE-ARRAY-CARD8 ...)
;;;   Inlining BUFFER-REPLACE
;;; Compiling (DEFUN READ-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...).
;;; Note:
;;;   in file BUFFER.LISP, position 20922
;;;   at (DEFUN READ-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN READ-VECTOR-CARD8 ...).
;;; Note:
;;;   in file BUFFER.LISP, position 21698
;;;   at (DEFUN READ-VECTOR-CARD8 ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN READ-VECTOR-CARD8-WITH-TRANSFORM ...).
;;; Note:
;;;   in file BUFFER.LISP, position 22219
;;;   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 24298
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT8 ...)
;;;   Inlining CARD8->INT8
;;; Note:
;;;   in file BUFFER.LISP, position 24298
;;;   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 27677
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT16 ...)
;;;   Inlining CARD16->INT16
;;; Note:
;;;   in file BUFFER.LISP, position 27677
;;;   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 31061
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-READER READ-SEQUENCE-INT32 ...)
;;;   Inlining CARD32->INT32
;;; Note:
;;;   in file BUFFER.LISP, position 31061
;;;   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 31987
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-CHAR ...)
;;;   Inlining CHAR->CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 31987
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-CHAR ...)
;;;   Checking type of (FUNCALL TRANSFORM X) to be CHARACTER
;;; Note:
;;;   in file BUFFER.LISP, position 31987
;;;   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 33735
;;;   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 33735
;;;   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 33735
;;;   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 33735
;;;   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 33915
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CARD8 ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 33915
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CARD8 ...)
;;;   Inlining BUFFER-REPLACE
;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...).
;;; Note:
;;;   in file BUFFER.LISP, position 34381
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 34381
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CARD8-WITH-TRANSFORM ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DEFUN WRITE-VECTOR-CARD8 ...).
;;; Note:
;;;   in file BUFFER.LISP, position 35075
;;;   at (DEFUN WRITE-VECTOR-CARD8 ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 35075
;;;   at (DEFUN WRITE-VECTOR-CARD8 ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DEFUN WRITE-VECTOR-CARD8-WITH-TRANSFORM ...).
;;; Note:
;;;   in file BUFFER.LISP, position 35526
;;;   at (DEFUN WRITE-VECTOR-CARD8-WITH-TRANSFORM ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 35526
;;;   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 37323
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT8 ...)
;;;   Inlining INT8->CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 37323
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT8 ...)
;;;   Checking type of (FUNCALL TRANSFORM X) to be INT8
;;; Note:
;;;   in file BUFFER.LISP, position 37323
;;;   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 37458
;;;   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 37458
;;;   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 37557
;;;   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 38316
;;;   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 39118
;;;   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 39870
;;;   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 40935
;;;   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 40935
;;;   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 41030
;;;   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 41783
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-INT16-WITH-TRANSFORM ...)
;;;   Checking type of DATA to be (SIMPLE-ARRAY INT16 (*))
;;; Note:
;;;   in file BUFFER.LISP, position 41783
;;;   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 42577
;;;   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 43325
;;;   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 44378
;;;   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 44378
;;;   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 44477
;;;   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 45236
;;;   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 46038
;;;   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 46790
;;;   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 47820
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT32 ...)
;;;   Inlining INT32->CARD32
;;; Note:
;;;   in file BUFFER.LISP, position 47820
;;;   at (DEFINE-TRANSFORMED-SEQUENCE-WRITER WRITE-SEQUENCE-INT32 ...)
;;;   Checking type of (FUNCALL TRANSFORM X) to be INT32
;;; Note:
;;;   in file BUFFER.LISP, position 47820
;;;   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 47924
;;;   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 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX BOFFSET) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of #:LET966 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of #:G976 to be BUFFER-BYTES
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of #:G977 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (VALUES (ASH (THE ARRAY-INDEX BYTE) -1)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (INDEX-ASH BYTE -1) to be CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (VALUES (ASH (THE ARRAY-INDEX BYTE) -1)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX K) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX J) 8)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (+ (THE ARRAY-INDEX K) 1) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of #:G1020 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (VALUES (INCF (THE ARRAY-INDEX K) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (+ (THE ARRAY-INDEX K) 1) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of #:G1032 to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   at (DEFUN READ-BITVECTOR256 ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file BUFFER.LISP, position 47924
;;;   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 48807
;;;   at (DEFUN WRITE-BITVECTOR256 ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 48807
;;;   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 49451
;;;   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 49451
;;;   at (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 49451
;;;   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 49451
;;;   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 49451
;;;   at (DEFINE-LIST-WRITERS (WRITE-LIST-CHAR2B WRITE-LIST-CHAR2B-WITH-TRANSFORM) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 49451
;;;   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 49550
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 49550
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 49550
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...).
;;; Note:
;;;   in file BUFFER.LISP, position 50060
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 50060
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 50060
;;;   at (DEFUN WRITE-SIMPLE-ARRAY-CHAR2B-WITH-TRANSFORM ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DEFUN WRITE-VECTOR-CHAR2B ...).
;;; Note:
;;;   in file BUFFER.LISP, position 50810
;;;   at (DEFUN WRITE-VECTOR-CHAR2B ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 50810
;;;   at (DEFUN WRITE-VECTOR-CHAR2B ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 50810
;;;   at (DEFUN WRITE-VECTOR-CHAR2B ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM ...).
;;; Note:
;;;   in file BUFFER.LISP, position 51313
;;;   at (DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM ...)
;;;   Checking type of BUFFER to be DISPLAY
;;; Note:
;;;   in file BUFFER.LISP, position 51313
;;;   at (DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file BUFFER.LISP, position 51313
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1543
;;;   at (DEFUN READ-XAUTH-ENTRY ...)
;;;   Inlining CARD8->CHAR
;;; Note:
;;;   in file DISPLAY.LISP, position 1543
;;;   at (DEFUN READ-XAUTH-ENTRY ...)
;;;   Checking type of #:G6 to be CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 1543
;;;   at (DEFUN READ-XAUTH-ENTRY ...)
;;;   Inlining CARD8->CHAR
;;; Note:
;;;   in file DISPLAY.LISP, position 1543
;;;   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 6522
;;;   at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...)
;;;   Checking type of #:LET65 to be ARRAY-INDEX
;;; Note:
;;;   in file DISPLAY.LISP, position 6522
;;;   at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...)
;;;   Checking type of #:LET66 to be MASK32
;;; Note:
;;;   in file DISPLAY.LISP, position 6522
;;;   at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...)
;;;   Checking type of (VALUES (1+ (THE ARRAY-INDEX FIRST))) to be ARRAY-INDEX
;;; Note:
;;;   in file DISPLAY.LISP, position 6522
;;;   at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...)
;;;   Checking type of (ASH MASK -1) to be MASK32
;;; Warning:
;;;   in file DISPLAY.LISP, position 6522
;;;   at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...)
;;;   ! Unsupported CONS type C::BYTE-SPECIFIER. Replacing it with T.
;;; Compiling (DEFUN RESOURCEALLOC ...).
;;; Note:
;;;   in file DISPLAY.LISP, position 7007
;;;   at (DEFUN RESOURCEALLOC ...)
;;;   Checking type of (1+ (DISPLAY-RESOURCE-ID-COUNT DISPLAY)) to be REAL
;;; Note:
;;;   in file DISPLAY.LISP, position 7007
;;;   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 11575
;;;   at (DEFUN INITIALIZE-PREDEFINED-ATOMS ...)
;;;   Checking type of 0 to be RESOURCE-ID
;;; Compiling (DEFUN VISUAL-INFO ...).
;;; Note:
;;;   in file DISPLAY.LISP, position 11761
;;;   at (DEFUN VISUAL-INFO ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G160)) to be SCREEN
;;; Note:
;;;   in file DISPLAY.LISP, position 11761
;;;   at (DEFUN VISUAL-INFO ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G163)) to be CONS
;;; Note:
;;;   in file DISPLAY.LISP, position 11761
;;;   at (DEFUN VISUAL-INFO ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G166)) to be VISUAL-INFO
;;; Compiling (DEFMACRO WITH-EVENT-QUEUE ...).
;;; Compiling (DEFUN WITH-EVENT-QUEUE-FUNCTION ...).
;;; Note:
;;;   in file DISPLAY.LISP, position 13343
;;;   at (DEFUN WITH-EVENT-QUEUE-FUNCTION ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK189) 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 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Checking type of (ALLOCATE-REPLY-BUFFER 4096) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Checking type of REPLY-BUFFER to be REPLY-BUFFER
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   at (DEFUN DISPLAY-CONNECT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 17490
;;;   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 26007
;;;   at (DEFUN DISPLAY-FINISH-OUTPUT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file DISPLAY.LISP, position 26007
;;;   at (DEFUN DISPLAY-FINISH-OUTPUT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file DISPLAY.LISP, position 26007
;;;   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 26007
;;;   at (DEFUN DISPLAY-FINISH-OUTPUT ...)
;;;   Checking type of #:LET601 to be REPLY-BUFFER
;;; Compiling (DEFPARAMETER *REQUEST-NAMES* ...).
;;; End of Pass 1.
;;; Warning:
;;;   in file display.lisp, position 6522
;;;   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.
;;; Warning:
;;;   in file DISPLAY.LISP, position 6522
;;;   at (DEFUN INITIALIZE-RESOURCE-ALLOCATOR ...)
;;;   ! Unsupported CONS type C::BYTE-SPECIFIER. Replacing it with T.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 4333
;;;   at (DEFUN ALLOCATE-GCONTEXT-STATE ...)
;;;   Checking type of *GCONTEXT-DATA-LENGTH* to be ARRAY-INDEX
;;; Note:
;;;   in file GCONTEXT.LISP, position 4333
;;;   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 4333
;;;   at (DEFUN ALLOCATE-GCONTEXT-STATE ...)
;;;   Checking type of *GCONTEXT-DATA-LENGTH* to be ARRAY-INDEX
;;; Note:
;;;   in file GCONTEXT.LISP, position 4333
;;;   at (DEFUN ALLOCATE-GCONTEXT-STATE ...)
;;;   Checking type of *GCONTEXT-LOCAL-STATE-CACHE* to be (OR NULL GCONTEXT-STATE)
;;; Note:
;;;   in file GCONTEXT.LISP, position 4333
;;;   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 4333
;;;   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 4905
;;;   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 5196
;;;   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 5363
;;;   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 8504
;;;   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 8504
;;;   at (DEF-GC-ACCESSOR FUNCTION ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 8504
;;;   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 8504
;;;   at (DEF-GC-ACCESSOR FUNCTION ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 8504
;;;   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 8547
;;;   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 8547
;;;   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 8547
;;;   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 8583
;;;   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 8583
;;;   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 8583
;;;   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 8619
;;;   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 8619
;;;   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 8619
;;;   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 8655
;;;   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 8655
;;;   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 8655
;;;   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 8691
;;;   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 8691
;;;   at (DEF-GC-ACCESSOR LINE-STYLE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 8691
;;;   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 8691
;;;   at (DEF-GC-ACCESSOR LINE-STYLE ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 8691
;;;   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 8755
;;;   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 8755
;;;   at (DEF-GC-ACCESSOR CAP-STYLE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 8755
;;;   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 8755
;;;   at (DEF-GC-ACCESSOR CAP-STYLE ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 8755
;;;   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 8827
;;;   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 8827
;;;   at (DEF-GC-ACCESSOR JOIN-STYLE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 8827
;;;   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 8827
;;;   at (DEF-GC-ACCESSOR JOIN-STYLE ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 8827
;;;   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 8886
;;;   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 8886
;;;   at (DEF-GC-ACCESSOR FILL-STYLE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 8886
;;;   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 8886
;;;   at (DEF-GC-ACCESSOR FILL-STYLE ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 8886
;;;   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 8965
;;;   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 8965
;;;   at (DEF-GC-ACCESSOR FILL-RULE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 8965
;;;   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 8965
;;;   at (DEF-GC-ACCESSOR FILL-RULE ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 8965
;;;   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 9021
;;;   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 9021
;;;   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 9021
;;;   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 9051
;;;   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 9051
;;;   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 9051
;;;   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 9084
;;;   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 9084
;;;   at (DEF-GC-ACCESSOR TS-X ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 9084
;;;   at (DEF-GC-ACCESSOR TS-X ...)
;;;   Inlining CARD16->INT16
;;; Note:
;;;   in file GCONTEXT.LISP, position 9084
;;;   at (DEF-GC-ACCESSOR TS-X ...)
;;;   Checking type of #:G1132 to be CARD16
;;; Compiling (DEF-GC-ACCESSOR TS-X ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 9084
;;;   at (DEF-GC-ACCESSOR TS-X ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 9084
;;;   at (DEF-GC-ACCESSOR TS-X ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file GCONTEXT.LISP, position 9084
;;;   at (DEF-GC-ACCESSOR TS-X ...)
;;;   Checking type of #:G1162 to be INT16
;;; Compiling (DEF-GC-ACCESSOR TS-Y ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 9139
;;;   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 9139
;;;   at (DEF-GC-ACCESSOR TS-Y ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 9139
;;;   at (DEF-GC-ACCESSOR TS-Y ...)
;;;   Inlining CARD16->INT16
;;; Note:
;;;   in file GCONTEXT.LISP, position 9139
;;;   at (DEF-GC-ACCESSOR TS-Y ...)
;;;   Checking type of #:G1197 to be CARD16
;;; Compiling (DEF-GC-ACCESSOR TS-Y ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 9139
;;;   at (DEF-GC-ACCESSOR TS-Y ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 9139
;;;   at (DEF-GC-ACCESSOR TS-Y ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file GCONTEXT.LISP, position 9139
;;;   at (DEF-GC-ACCESSOR TS-Y ...)
;;;   Checking type of #:G1227 to be INT16
;;; Compiling (DEF-GC-ACCESSOR SUBWINDOW-MODE ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 9237
;;;   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 9237
;;;   at (DEF-GC-ACCESSOR SUBWINDOW-MODE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 9237
;;;   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 9237
;;;   at (DEF-GC-ACCESSOR SUBWINDOW-MODE ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 9237
;;;   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 9315
;;;   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 9315
;;;   at (DEF-GC-ACCESSOR EXPOSURES ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 9315
;;;   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 9315
;;;   at (DEF-GC-ACCESSOR EXPOSURES ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 9315
;;;   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 9361
;;;   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 9361
;;;   at (DEF-GC-ACCESSOR CLIP-X ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 9361
;;;   at (DEF-GC-ACCESSOR CLIP-X ...)
;;;   Inlining CARD16->INT16
;;; Note:
;;;   in file GCONTEXT.LISP, position 9361
;;;   at (DEF-GC-ACCESSOR CLIP-X ...)
;;;   Checking type of #:G1382 to be CARD16
;;; Compiling (DEF-GC-ACCESSOR CLIP-X ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 9361
;;;   at (DEF-GC-ACCESSOR CLIP-X ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 9361
;;;   at (DEF-GC-ACCESSOR CLIP-X ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file GCONTEXT.LISP, position 9361
;;;   at (DEF-GC-ACCESSOR CLIP-X ...)
;;;   Checking type of #:G1412 to be INT16
;;; Compiling (DEF-GC-ACCESSOR CLIP-Y ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 9392
;;;   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 9392
;;;   at (DEF-GC-ACCESSOR CLIP-Y ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 9392
;;;   at (DEF-GC-ACCESSOR CLIP-Y ...)
;;;   Inlining CARD16->INT16
;;; Note:
;;;   in file GCONTEXT.LISP, position 9392
;;;   at (DEF-GC-ACCESSOR CLIP-Y ...)
;;;   Checking type of #:G1447 to be CARD16
;;; Compiling (DEF-GC-ACCESSOR CLIP-Y ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 9392
;;;   at (DEF-GC-ACCESSOR CLIP-Y ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 9392
;;;   at (DEF-GC-ACCESSOR CLIP-Y ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file GCONTEXT.LISP, position 9392
;;;   at (DEF-GC-ACCESSOR CLIP-Y ...)
;;;   Checking type of #:G1477 to be INT16
;;; Compiling (DEF-GC-ACCESSOR DASH-OFFSET ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 9468
;;;   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 9468
;;;   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 9468
;;;   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 9547
;;;   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 9547
;;;   at (DEF-GC-ACCESSOR ARC-MODE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 9547
;;;   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 9547
;;;   at (DEF-GC-ACCESSOR ARC-MODE ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 9547
;;;   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 9600
;;;   at (DEFUN GCONTEXT-CLIP-MASK ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 9600
;;;   at (DEFUN GCONTEXT-CLIP-MASK ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 9600
;;;   at (DEFUN GCONTEXT-CLIP-MASK ...)
;;;   Checking type of (READ-CARD29 CLIP-MASK) to be (INTEGER 0 (1))
;;; Note:
;;;   in file GCONTEXT.LISP, position 9600
;;;   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 10548
;;;   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 10548
;;;   at (DEFUN SET-GCONTEXT-CLIP-MASK ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 10548
;;;   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 12036
;;;   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 12443
;;;   at (DEFUN SET-GCONTEXT-DASHES ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 12443
;;;   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 13249
;;;   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 14159
;;;   at (DEFUN SET-GCONTEXT-FONT ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 14159
;;;   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 14934
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 14934
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file GCONTEXT.LISP, position 14934
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 14934
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 14934
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file GCONTEXT.LISP, position 14934
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 14934
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN FORCE-GCONTEXT-CHANGES ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 18939
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES ...)
;;;   Checking type of #:LET1972 to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 18939
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES ...)
;;;   Checking type of #:LET1973 to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 18939
;;;   at (DEFUN FORCE-GCONTEXT-CHANGES ...)
;;;   Checking type of (GCONTEXT-INTERNAL-TIMESTAMP LOCAL-STATE) to be FIXNUM
;;; Note:
;;;   in file GCONTEXT.LISP, position 18939
;;;   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 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Checking type of #:LET2077 to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Checking type of #:LET2078 to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Checking type of #:LET2083 to be XGCMASK
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Checking type of (SVREF *GCONTEXT-MASKS* I) to be XGCMASK
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   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 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Checking type of (SVREF *GCONTEXT-MASKS* I) to be XGCMASK
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Checking type of (LOGIOR EXTENSION-MASK (ASH 1 I)) to be XGCMASK
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 22386
;;;   at (DEFUN COPY-GCONTEXT-LOCAL-STATE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 24977
;;;   at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 24977
;;;   at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 24977
;;;   at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file GCONTEXT.LISP, position 24977
;;;   at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 24977
;;;   at (DEFUN RESTORE-GCONTEXT-TEMP-STATE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CREATE-GCONTEXT ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   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 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of (GCONTEXT-LOCAL-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of (GCONTEXT-SERVER-STATE GCONTEXT) to be GCONTEXT-STATE
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of (ALLOCATE-RESOURCE-ID DISPLAY GCONTEXT 'GCONTEXT) to be RESOURCE-ID
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of #:LET2469 to be LIST
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of #:LET2470 to be ARRAY-INDEX
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of (CDR EXTENSIONS) to be LIST
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of OPTIONS to be LIST
;;; Note:
;;;   in file GCONTEXT.LISP, position 26408
;;;   at (DEFUN CREATE-GCONTEXT ...)
;;;   Checking type of (CDDR OPTION-LIST) to be LIST
;;; Compiling (DEFUN COPY-GCONTEXT-COMPONENTS ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 34444
;;;   at (DEFUN COPY-GCONTEXT-COMPONENTS ...)
;;;   Checking type of #:LET2503 to be XGCMASK
;;; Note:
;;;   in file GCONTEXT.LISP, position 34444
;;;   at (DEFUN COPY-GCONTEXT-COMPONENTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 34444
;;;   at (DEFUN COPY-GCONTEXT-COMPONENTS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN COPY-GCONTEXT ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 36491
;;;   at (DEFUN COPY-GCONTEXT ...)
;;;   Checking type of I to be ARRAY-INDEX
;;; Note:
;;;   in file GCONTEXT.LISP, position 36491
;;;   at (DEFUN COPY-GCONTEXT ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file GCONTEXT.LISP, position 36491
;;;   at (DEFUN COPY-GCONTEXT ...)
;;;   Checking type of I to be ARRAY-INDEX
;;; Compiling (DEFUN FREE-GCONTEXT ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 36906
;;;   at (DEFUN FREE-GCONTEXT ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file GCONTEXT.LISP, position 36906
;;;   at (DEFUN FREE-GCONTEXT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GCONTEXT.LISP, position 36906
;;;   at (DEFUN FREE-GCONTEXT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFMACRO DEFINE-GCONTEXT-ACCESSOR ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 37309
;;;   at (FSET 'DEFINE-GCONTEXT-ACCESSOR ...)
;;;   Checking type of (PROGN (IF (NULL #:G2645) (SI::DM-TOO-FEW-ARGUMENTS #:G2644)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G2645)) (SETQ #:G2645 (CDR (EXT:TRULY-THE CONS #:G2645))))) to be SYMBOL
;;; Note:
;;;   in file GCONTEXT.LISP, position 37309
;;;   at (FSET 'DEFINE-GCONTEXT-ACCESSOR ...)
;;;   Checking type of (IF (EQ #:G2647 'SI:MISSING-KEYWORD) NIL #:G2647) to be SYMBOL
;;; Note:
;;;   in file GCONTEXT.LISP, position 37309
;;;   at (FSET 'DEFINE-GCONTEXT-ACCESSOR ...)
;;;   Checking type of (IF (EQ #:G2648 'SI:MISSING-KEYWORD) NIL #:G2648) to be (OR SYMBOL LIST)
;;; Compiling (DEFUN ADD-GCONTEXT-EXTENSION ...).
;;; Note:
;;;   in file GCONTEXT.LISP, position 40722
;;;   at (DEFUN ADD-GCONTEXT-EXTENSION ...)
;;;   Checking type of (NTHCDR #:G2654 #:G2655) 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 #:G256.
;;; Emitting code for #:G257.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1683
;;;   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 1819
;;;   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 3308
;;;   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 3308
;;;   at (FSET 'DEFINE-EXTENSION ...)
;;;   Checking type of (IF (EQ #:G49 'SI:MISSING-KEYWORD) NIL #:G49) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 3308
;;;   at (FSET 'DEFINE-EXTENSION ...)
;;;   Checking type of (IF (EQ #:G50 'SI:MISSING-KEYWORD) NIL #:G50) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 3308
;;;   at (FSET 'DEFINE-EXTENSION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST57) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 3308
;;;   at (FSET 'DEFINE-EXTENSION ...)
;;;   Checking type of #:LOOP-LIST-TAIL59 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 4522
;;;   at (DEFUN ALLOCATE-EXTENSION-EVENT-CODE ...)
;;;   Checking type of (GET NAME 'EVENT-CODE) to be (OR NULL CARD8)
;;; Note:
;;;   in file INPUT.LISP, position 4522
;;;   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 5398
;;;   at (DEFUN GET-INTERNAL-EVENT-CODE ...)
;;;   Checking type of (LOGAND 127 CODE) to be CARD8
;;; Note:
;;;   in file INPUT.LISP, position 5398
;;;   at (DEFUN GET-INTERNAL-EVENT-CODE ...)
;;;   Checking type of (- CODE *FIRST-EXTENSION-EVENT-CODE*) to be CARD8
;;; Note:
;;;   in file INPUT.LISP, position 5398
;;;   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 6321
;;;   at (DEFUN GET-EXTERNAL-EVENT-CODE ...)
;;;   Checking type of (GET-EVENT-CODE EVENT) to be (OR NULL CARD8)
;;; Note:
;;;   in file INPUT.LISP, position 6321
;;;   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 7277
;;;   at (DEFUN INITIALIZE-EXTENSIONS ...)
;;;   Checking type of #:LET135 to be KEYWORD
;;; Note:
;;;   in file INPUT.LISP, position 7277
;;;   at (DEFUN INITIALIZE-EXTENSIONS ...)
;;;   Checking type of #:LET136 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 7277
;;;   at (DEFUN INITIALIZE-EXTENSIONS ...)
;;;   Checking type of (- (+ FIRST-EVENT (LENGTH EVENTS)) *FIRST-EXTENSION-EVENT-CODE*) to be CARD8
;;; Note:
;;;   in file INPUT.LISP, position 7277
;;;   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 7277
;;;   at (DEFUN INITIALIZE-EXTENSIONS ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G143)) to be SYMBOL
;;; Note:
;;;   in file INPUT.LISP, position 7277
;;;   at (DEFUN INITIALIZE-EXTENSIONS ...)
;;;   Checking type of (+ FIRST-EVENT #:G151) to be (OR NULL CARD8)
;;; Compiling (DEFVAR *PENDING-COMMAND-FREE-LIST* ...).
;;; Compiling (DEFUN START-PENDING-COMMAND ...).
;;; Note:
;;;   in file INPUT.LISP, position 8934
;;;   at (DEFUN START-PENDING-COMMAND ...)
;;;   Checking type of *PENDING-COMMAND-FREE-LIST* to be (OR NULL PENDING-COMMAND)
;;; Note:
;;;   in file INPUT.LISP, position 8934
;;;   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 8934
;;;   at (DEFUN START-PENDING-COMMAND ...)
;;;   Checking type of *PENDING-COMMAND-FREE-LIST* to be (OR NULL PENDING-COMMAND)
;;; Note:
;;;   in file INPUT.LISP, position 8934
;;;   at (DEFUN START-PENDING-COMMAND ...)
;;;   Inlining CURRENT-PROCESS
;;; Note:
;;;   in file INPUT.LISP, position 8934
;;;   at (DEFUN START-PENDING-COMMAND ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK206) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 8934
;;;   at (DEFUN START-PENDING-COMMAND ...)
;;;   Checking type of #:LET227 to be (OR NULL PENDING-COMMAND)
;;; Compiling (DEFUN STOP-PENDING-COMMAND ...).
;;; Note:
;;;   in file INPUT.LISP, position 9755
;;;   at (DEFUN STOP-PENDING-COMMAND ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK237) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 9755
;;;   at (DEFUN STOP-PENDING-COMMAND ...)
;;;   Checking type of #:LET258 to be (OR NULL PENDING-COMMAND)
;;; Note:
;;;   in file INPUT.LISP, position 9755
;;;   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 9755
;;;   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 10815
;;;   at (DEFUN ALLOCATE-REPLY-BUFFER ...)
;;;   Checking type of (VALUES (1- (THE ARRAY-INDEX SIZE))) to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 10815
;;;   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 10815
;;;   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 11189
;;;   at (DEFUN DEALLOCATE-REPLY-BUFFER ...)
;;;   Checking type of (REPLY-SIZE REPLY-BUFFER) to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 11189
;;;   at (DEFUN DEALLOCATE-REPLY-BUFFER ...)
;;;   Checking type of (VALUES (1- (THE ARRAY-INDEX SIZE))) to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 11189
;;;   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 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK367) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND)
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of PENDING-COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   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 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of PENDING-COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   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 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND)
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of PENDING-COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   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 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of PENDING-COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of #:LET397 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Inlining PROCESS-WAKEUP
;;; Style warning:
;;;   in file INPUT.LISP, position 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   ! The variable #:G407 is not used.
;;; Note:
;;;   in file INPUT.LISP, position 11638
;;;   at (DEFUN READ-ERROR-INPUT ...)
;;;   Checking type of #:LET413 to be (OR NULL REPLY-BUFFER)
;;; Compiling (DEFUN READ-REPLY-INPUT ...).
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of (ALLOCATE-REPLY-BUFFER LENGTH) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Inlining BUFFER-REPLACE
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of #:G425 to be BUFFER-BYTES
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of #:G426 to be BUFFER-BYTES
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of +REPLYSIZE+ to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of #:G428 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of #:G429 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK434) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND)
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of PENDING-COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   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 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of PENDING-COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   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 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND)
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of PENDING-COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   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 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of PENDING-COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of #:G466 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of #:LET463 to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Checking type of #:LET464 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   Inlining PROCESS-WAKEUP
;;; Style warning:
;;;   in file INPUT.LISP, position 13030
;;;   at (DEFUN READ-REPLY-INPUT ...)
;;;   ! The variable #:G477 is not used.
;;; Compiling (DEFUN READ-EVENT-INPUT ...).
;;; Compiling (DEFUN NOTE-INPUT-COMPLETE ...).
;;; Note:
;;;   in file INPUT.LISP, position 14896
;;;   at (DEFUN NOTE-INPUT-COMPLETE ...)
;;;   Inlining PROCESS-WAKEUP
;;; Note:
;;;   in file INPUT.LISP, position 14896
;;;   at (DEFUN NOTE-INPUT-COMPLETE ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK483) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 14896
;;;   at (DEFUN NOTE-INPUT-COMPLETE ...)
;;;   Checking type of (DISPLAY-PENDING-COMMANDS DISPLAY) to be (OR NULL PENDING-COMMAND)
;;; Note:
;;;   in file INPUT.LISP, position 14896
;;;   at (DEFUN NOTE-INPUT-COMPLETE ...)
;;;   Inlining PROCESS-WAKEUP
;;; Style warning:
;;;   in file INPUT.LISP, position 14896
;;;   at (DEFUN NOTE-INPUT-COMPLETE ...)
;;;   ! The variable #:G502 is not used.
;;; Note:
;;;   in file INPUT.LISP, position 14896
;;;   at (DEFUN NOTE-INPUT-COMPLETE ...)
;;;   Checking type of COMMAND to be PENDING-COMMAND
;;; Note:
;;;   in file INPUT.LISP, position 14896
;;;   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 14896
;;;   at (DEFUN NOTE-INPUT-COMPLETE ...)
;;;   Checking type of COMMAND to be PENDING-COMMAND
;;; Compiling (DEFUN READ-INPUT ...).
;;; Note:
;;;   in file INPUT.LISP, position 15631
;;;   at (DEFUN READ-INPUT ...)
;;;   Inlining CURRENT-PROCESS
;;; Note:
;;;   in file INPUT.LISP, position 15631
;;;   at (DEFUN READ-INPUT ...)
;;;   Checking type of (ALLOCATE-EVENT) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 15631
;;;   at (DEFUN READ-INPUT ...)
;;;   Checking type of REPLY-BUFFER to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 15631
;;;   at (DEFUN READ-INPUT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 15631
;;;   at (DEFUN READ-INPUT ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...).
;;; Note:
;;;   in file INPUT.LISP, position 19199
;;;   at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK553) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 19199
;;;   at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...)
;;;   Checking type of (DISPLAY-ASYNCHRONOUS-ERRORS DISPLAY) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 19199
;;;   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 19199
;;;   at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK578) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 19199
;;;   at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...)
;;;   Checking type of (DISPLAY-ASYNCHRONOUS-ERRORS DISPLAY) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 19199
;;;   at (DEFUN REPORT-ASYNCHRONOUS-ERRORS ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK605) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 19199
;;;   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 20200
;;;   at (DEFUN WAIT-FOR-EVENT ...)
;;;   Inlining CURRENT-PROCESS
;;; Note:
;;;   in file INPUT.LISP, position 20200
;;;   at (DEFUN WAIT-FOR-EVENT ...)
;;;   Inlining CURRENT-PROCESS
;;; Compiling (DEFUN READ-REPLY ...).
;;; Note:
;;;   in file INPUT.LISP, position 21373
;;;   at (DEFUN READ-REPLY ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK651) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 21373
;;;   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 21373
;;;   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 21373
;;;   at (DEFUN READ-REPLY ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK676) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 21373
;;;   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 21373
;;;   at (DEFUN READ-REPLY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN EVENT-LISTEN ...).
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of (CAR (DISPLAY-CURRENT-EVENT-SYMBOL DISPLAY)) to be SYMBOL
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   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 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of CURRENT-EVENT to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   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 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of CURRENT-EVENT to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK708) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of #:LET727 to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK736) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK752) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of #:LET770 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 22255
;;;   at (DEFUN EVENT-LISTEN ...)
;;;   Checking type of #:LET771 to be ARRAY-INDEX
;;; Compiling (DEFUN QUEUE-EVENT ...).
;;; Note:
;;;   in file INPUT.LISP, position 23503
;;;   at (DEFUN QUEUE-EVENT ...)
;;;   Unknown type SYMBOL. Assuming it is T.
;;; Note:
;;;   in file INPUT.LISP, position 23503
;;;   at (DEFUN QUEUE-EVENT ...)
;;;   Checking type of (ALLOCATE-EVENT) to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 23503
;;;   at (DEFUN QUEUE-EVENT ...)
;;;   Checking type of (REPLY-IBUF8 EVENT) to be BUFFER-BYTES
;;; Note:
;;;   in file INPUT.LISP, position 23503
;;;   at (DEFUN QUEUE-EVENT ...)
;;;   Checking type of (GET EVENT-KEY 'EVENT-CODE) to be (OR NULL CARD8)
;;; Note:
;;;   in file INPUT.LISP, position 23503
;;;   at (DEFUN QUEUE-EVENT ...)
;;;   Inlining BUFFER-REPLACE
;;; Note:
;;;   in file INPUT.LISP, position 23503
;;;   at (DEFUN QUEUE-EVENT ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK823) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 23503
;;;   at (DEFUN QUEUE-EVENT ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK839) to be FIXNUM
;;; Compiling (DEFUN ENQUEUE-EVENT ...).
;;; Note:
;;;   in file INPUT.LISP, position 25052
;;;   at (DEFUN ENQUEUE-EVENT ...)
;;;   Checking type of (EVENT-CODE NEW-EVENT) to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 25052
;;;   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 25052
;;;   at (DEFUN ENQUEUE-EVENT ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK875) to be FIXNUM
;;; Compiling (DEFMACRO DEFINE-EVENT ...).
;;; Compiling (DEFMACRO DECLARE-EVENT ...).
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of (PROGN (IF (NULL #:G1103) (SI::DM-TOO-FEW-ARGUMENTS #:G1102)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G1103)) (SETQ #:G1103 (CDR (EXT:TRULY-THE CONS #:G1103))))) to be (OR KEYWORD LIST)
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:G1103 to be (ALIST (FIELD-TYPE SYMBOL) (FIELD-NAMES LIST))
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LET1114 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1110) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LOOP-LIST-TAIL1112 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of (MAPCAR #'CANONICALIZE-EVENT-NAME EVENT-CODES) to be (OR KEYWORD LIST)
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LET1120 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1116) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LOOP-LIST-TAIL1118 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LET1129 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1125) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:G1130 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LET1141 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1137) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LOOP-LIST-TAIL1139 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LET1148 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1144) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LOOP-LIST-TAIL1146 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LET1155 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1151) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 27371
;;;   at (FSET 'DECLARE-EVENT ...)
;;;   Checking type of #:LOOP-LIST-TAIL1153 to be CONS
;;; Compiling (DEFUN CHECK-CONSISTENCY ...).
;;; Note:
;;;   in file INPUT.LISP, position 31640
;;;   at (DEFUN CHECK-CONSISTENCY ...)
;;;   Checking type of #:LET1167 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 31640
;;;   at (DEFUN CHECK-CONSISTENCY ...)
;;;   Checking type of #:LET1169 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 31640
;;;   at (DEFUN CHECK-CONSISTENCY ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1162) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 31640
;;;   at (DEFUN CHECK-CONSISTENCY ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST1163) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 31640
;;;   at (DEFUN CHECK-CONSISTENCY ...)
;;;   Checking type of #:G1170 to be CONS
;;; Compiling (DECLARE-EVENT (:KEY-PRESS :KEY-RELEASE ...) ...).
;;; Compiling (DECLARE-EVENT (:KEY-PRESS :KEY-RELEASE ...) ...).
;;; Note:
;;;   in file INPUT.LISP, position 32013
;;;   at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32013
;;;   at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32013
;;;   at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32013
;;;   at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT (:KEY-PRESS :KEY-RELEASE ...) ...).
;;; Note:
;;;   in file INPUT.LISP, position 32013
;;;   at (DECLARE-EVENT (KEY-PRESS KEY-RELEASE ...) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32013
;;;   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 32409
;;;   at (DECLARE-EVENT MOTION-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32409
;;;   at (DECLARE-EVENT MOTION-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32409
;;;   at (DECLARE-EVENT MOTION-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32409
;;;   at (DECLARE-EVENT MOTION-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :MOTION-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 32409
;;;   at (DECLARE-EVENT MOTION-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32409
;;;   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 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT (:ENTER-NOTIFY :LEAVE-NOTIFY) ...).
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   at (DECLARE-EVENT (ENTER-NOTIFY LEAVE-NOTIFY) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 32649
;;;   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 33024
;;;   at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33024
;;;   at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33024
;;;   at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33024
;;;   at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT (:FOCUS-IN :FOCUS-OUT) ...).
;;; Note:
;;;   in file INPUT.LISP, position 33024
;;;   at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33024
;;;   at (DECLARE-EVENT (FOCUS-IN FOCUS-OUT) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33024
;;;   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 33294
;;;   at (DECLARE-EVENT KEYMAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33294
;;;   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 33355
;;;   at (DECLARE-EVENT EXPOSURE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33355
;;;   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 33469
;;;   at (DECLARE-EVENT GRAPHICS-EXPOSURE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33469
;;;   at (DECLARE-EVENT GRAPHICS-EXPOSURE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33469
;;;   at (DECLARE-EVENT GRAPHICS-EXPOSURE ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :GRAPHICS-EXPOSURE ...).
;;; Note:
;;;   in file INPUT.LISP, position 33469
;;;   at (DECLARE-EVENT GRAPHICS-EXPOSURE ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :NO-EXPOSURE ...).
;;; Compiling (DECLARE-EVENT :NO-EXPOSURE ...).
;;; Note:
;;;   in file INPUT.LISP, position 33657
;;;   at (DECLARE-EVENT NO-EXPOSURE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33657
;;;   at (DECLARE-EVENT NO-EXPOSURE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33657
;;;   at (DECLARE-EVENT NO-EXPOSURE ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :NO-EXPOSURE ...).
;;; Note:
;;;   in file INPUT.LISP, position 33657
;;;   at (DECLARE-EVENT NO-EXPOSURE ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :VISIBILITY-NOTIFY ...).
;;; Compiling (DECLARE-EVENT :VISIBILITY-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 33778
;;;   at (DECLARE-EVENT VISIBILITY-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33778
;;;   at (DECLARE-EVENT VISIBILITY-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33778
;;;   at (DECLARE-EVENT VISIBILITY-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :VISIBILITY-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 33778
;;;   at (DECLARE-EVENT VISIBILITY-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :CREATE-NOTIFY ...).
;;; Compiling (DECLARE-EVENT :CREATE-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 33935
;;;   at (DECLARE-EVENT CREATE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33935
;;;   at (DECLARE-EVENT CREATE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 33935
;;;   at (DECLARE-EVENT CREATE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :CREATE-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 33935
;;;   at (DECLARE-EVENT CREATE-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :DESTROY-NOTIFY ...).
;;; Compiling (DECLARE-EVENT :DESTROY-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 34110
;;;   at (DECLARE-EVENT DESTROY-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34110
;;;   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 34194
;;;   at (DECLARE-EVENT UNMAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34194
;;;   at (DECLARE-EVENT UNMAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34194
;;;   at (DECLARE-EVENT UNMAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :UNMAP-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 34194
;;;   at (DECLARE-EVENT UNMAP-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :MAP-NOTIFY ...).
;;; Compiling (DECLARE-EVENT :MAP-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 34300
;;;   at (DECLARE-EVENT MAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34300
;;;   at (DECLARE-EVENT MAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34300
;;;   at (DECLARE-EVENT MAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :MAP-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 34300
;;;   at (DECLARE-EVENT MAP-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :MAP-REQUEST ...).
;;; Compiling (DECLARE-EVENT :MAP-REQUEST ...).
;;; Note:
;;;   in file INPUT.LISP, position 34412
;;;   at (DECLARE-EVENT MAP-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34412
;;;   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 34502
;;;   at (DECLARE-EVENT REPARENT-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34502
;;;   at (DECLARE-EVENT REPARENT-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34502
;;;   at (DECLARE-EVENT REPARENT-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :REPARENT-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 34502
;;;   at (DECLARE-EVENT REPARENT-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :CONFIGURE-NOTIFY ...).
;;; Compiling (DECLARE-EVENT :CONFIGURE-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 34640
;;;   at (DECLARE-EVENT CONFIGURE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34640
;;;   at (DECLARE-EVENT CONFIGURE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34640
;;;   at (DECLARE-EVENT CONFIGURE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :CONFIGURE-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 34640
;;;   at (DECLARE-EVENT CONFIGURE-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :CONFIGURE-REQUEST ...).
;;; Compiling (DECLARE-EVENT :CONFIGURE-REQUEST ...).
;;; Note:
;;;   in file INPUT.LISP, position 34844
;;;   at (DECLARE-EVENT CONFIGURE-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34844
;;;   at (DECLARE-EVENT CONFIGURE-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34844
;;;   at (DECLARE-EVENT CONFIGURE-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :CONFIGURE-REQUEST ...).
;;; Note:
;;;   in file INPUT.LISP, position 34844
;;;   at (DECLARE-EVENT CONFIGURE-REQUEST ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 34844
;;;   at (DECLARE-EVENT CONFIGURE-REQUEST ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :GRAVITY-NOTIFY ...).
;;; Compiling (DECLARE-EVENT :GRAVITY-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 35112
;;;   at (DECLARE-EVENT GRAVITY-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35112
;;;   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 35210
;;;   at (DECLARE-EVENT RESIZE-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35210
;;;   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 35320
;;;   at (DECLARE-EVENT CIRCULATE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35320
;;;   at (DECLARE-EVENT CIRCULATE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35320
;;;   at (DECLARE-EVENT CIRCULATE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :CIRCULATE-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 35320
;;;   at (DECLARE-EVENT CIRCULATE-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :CIRCULATE-REQUEST ...).
;;; Compiling (DECLARE-EVENT :CIRCULATE-REQUEST ...).
;;; Note:
;;;   in file INPUT.LISP, position 35446
;;;   at (DECLARE-EVENT CIRCULATE-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35446
;;;   at (DECLARE-EVENT CIRCULATE-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35446
;;;   at (DECLARE-EVENT CIRCULATE-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :CIRCULATE-REQUEST ...).
;;; Note:
;;;   in file INPUT.LISP, position 35446
;;;   at (DECLARE-EVENT CIRCULATE-REQUEST ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :PROPERTY-NOTIFY ...).
;;; Compiling (DECLARE-EVENT :PROPERTY-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 35589
;;;   at (DECLARE-EVENT PROPERTY-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35589
;;;   at (DECLARE-EVENT PROPERTY-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35589
;;;   at (DECLARE-EVENT PROPERTY-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :PROPERTY-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 35589
;;;   at (DECLARE-EVENT PROPERTY-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :SELECTION-CLEAR ...).
;;; Compiling (DECLARE-EVENT :SELECTION-CLEAR ...).
;;; Note:
;;;   in file INPUT.LISP, position 35770
;;;   at (DECLARE-EVENT SELECTION-CLEAR ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35770
;;;   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 35920
;;;   at (DECLARE-EVENT SELECTION-REQUEST ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 35920
;;;   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 36108
;;;   at (DECLARE-EVENT SELECTION-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36108
;;;   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 36285
;;;   at (DECLARE-EVENT COLORMAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36285
;;;   at (DECLARE-EVENT COLORMAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36285
;;;   at (DECLARE-EVENT COLORMAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36285
;;;   at (DECLARE-EVENT COLORMAP-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :COLORMAP-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 36285
;;;   at (DECLARE-EVENT COLORMAP-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36285
;;;   at (DECLARE-EVENT COLORMAP-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :CLIENT-MESSAGE ...).
;;; Compiling (DECLARE-EVENT :CLIENT-MESSAGE ...).
;;; Note:
;;;   in file INPUT.LISP, position 36434
;;;   at (DECLARE-EVENT CLIENT-MESSAGE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36434
;;;   at (DECLARE-EVENT CLIENT-MESSAGE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36434
;;;   at (DECLARE-EVENT CLIENT-MESSAGE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36434
;;;   at (DECLARE-EVENT CLIENT-MESSAGE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36434
;;;   at (DECLARE-EVENT CLIENT-MESSAGE ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :CLIENT-MESSAGE ...).
;;; Note:
;;;   in file INPUT.LISP, position 36434
;;;   at (DECLARE-EVENT CLIENT-MESSAGE ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DECLARE-EVENT :MAPPING-NOTIFY ...).
;;; Compiling (DECLARE-EVENT :MAPPING-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 36595
;;;   at (DECLARE-EVENT MAPPING-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36595
;;;   at (DECLARE-EVENT MAPPING-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36595
;;;   at (DECLARE-EVENT MAPPING-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36595
;;;   at (DECLARE-EVENT MAPPING-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36595
;;;   at (DECLARE-EVENT MAPPING-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :MAPPING-NOTIFY ...).
;;; Note:
;;;   in file INPUT.LISP, position 36595
;;;   at (DECLARE-EVENT MAPPING-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36595
;;;   at (DECLARE-EVENT MAPPING-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file INPUT.LISP, position 36595
;;;   at (DECLARE-EVENT MAPPING-NOTIFY ...)
;;;   Inlining ASET-CARD8
;;; Compiling (DEFUN EVENT-LOOP-SETUP ...).
;;; Note:
;;;   in file INPUT.LISP, position 36773
;;;   at (DEFUN EVENT-LOOP-SETUP ...)
;;;   Checking type of (DISPLAY-CURRENT-EVENT-SYMBOL DISPLAY) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 36773
;;;   at (DEFUN EVENT-LOOP-SETUP ...)
;;;   Checking type of (FIRST PROGV-VARS) to be SYMBOL
;;; Note:
;;;   in file INPUT.LISP, position 36773
;;;   at (DEFUN EVENT-LOOP-SETUP ...)
;;;   Checking type of (SECOND PROGV-VARS) to be SYMBOL
;;; Note:
;;;   in file INPUT.LISP, position 36773
;;;   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 36773
;;;   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 37740
;;;   at (DEFUN EVENT-LOOP-STEP-BEFORE ...)
;;;   Checking type of (SYMBOL-VALUE CURRENT-EVENT-SYMBOL) to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 37740
;;;   at (DEFUN EVENT-LOOP-STEP-BEFORE ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK2158) to be FIXNUM
;;; Compiling (DEFUN DEQUEUE-EVENT ...).
;;; Note:
;;;   in file INPUT.LISP, position 38582
;;;   at (DEFUN DEQUEUE-EVENT ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK2176) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 38582
;;;   at (DEFUN DEQUEUE-EVENT ...)
;;;   Checking type of #:LET2192 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 38582
;;;   at (DEFUN DEQUEUE-EVENT ...)
;;;   Checking type of #:LET2193 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 38582
;;;   at (DEFUN DEQUEUE-EVENT ...)
;;;   Checking type of (DISPLAY-EVENT-QUEUE-HEAD DISPLAY) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 38582
;;;   at (DEFUN DEQUEUE-EVENT ...)
;;;   Checking type of HEAD to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 38582
;;;   at (DEFUN DEQUEUE-EVENT ...)
;;;   Checking type of (REPLY-NEXT PREVIOUS) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 38582
;;;   at (DEFUN DEQUEUE-EVENT ...)
;;;   Checking type of CURRENT to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 38582
;;;   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 39688
;;;   at (DEFUN EVENT-LOOP-STEP-AFTER ...)
;;;   Checking type of (REPLY-NEXT EVENT) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file INPUT.LISP, position 39688
;;;   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 41951
;;;   at (DEFUN DISCARD-CURRENT-EVENT ...)
;;;   Checking type of (DISPLAY-CURRENT-EVENT-SYMBOL DISPLAY) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 41951
;;;   at (DEFUN DISCARD-CURRENT-EVENT ...)
;;;   Checking type of (FIRST SYMBOLS) to be SYMBOL
;;; Note:
;;;   in file INPUT.LISP, position 41951
;;;   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 41951
;;;   at (DEFUN DISCARD-CURRENT-EVENT ...)
;;;   Checking type of (FIRST SYMBOLS) to be SYMBOL
;;; Note:
;;;   in file INPUT.LISP, position 41951
;;;   at (DEFUN DISCARD-CURRENT-EVENT ...)
;;;   Checking type of (SECOND SYMBOLS) to be SYMBOL
;;; Note:
;;;   in file INPUT.LISP, position 41951
;;;   at (DEFUN DISCARD-CURRENT-EVENT ...)
;;;   Checking type of EVENT to be REPLY-BUFFER
;;; Compiling (DEFUN PROCESS-EVENT ...).
;;; Note:
;;;   in file INPUT.LISP, position 43166
;;;   at (DEFUN PROCESS-EVENT ...)
;;;   Checking type of (MP:LOCK-COUNT #:LOCK2249) to be FIXNUM
;;; Note:
;;;   in file INPUT.LISP, position 43166
;;;   at (DEFUN PROCESS-EVENT ...)
;;;   Checking type of .EVENT. to be REPLY-BUFFER
;;; Note:
;;;   in file INPUT.LISP, position 43166
;;;   at (DEFUN PROCESS-EVENT ...)
;;;   Checking type of (EVENT-CODE EVENT) to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 43166
;;;   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 46072
;;;   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 46645
;;;   at (FSET 'EVENT-CASE ...)
;;;   Checking type of #:LET2292 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 46645
;;;   at (FSET 'EVENT-CASE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2288) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 46645
;;;   at (FSET 'EVENT-CASE ...)
;;;   Checking type of #:LOOP-LIST-TAIL2290 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 51198
;;;   at (FSET 'EVENT-DISPATCH ...)
;;;   Checking type of #:LET2386 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 51198
;;;   at (FSET 'EVENT-DISPATCH ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2382) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 51198
;;;   at (FSET 'EVENT-DISPATCH ...)
;;;   Checking type of #:LOOP-LIST-TAIL2384 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 51198
;;;   at (FSET 'EVENT-DISPATCH ...)
;;;   Checking type of #:LET2400 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 51198
;;;   at (FSET 'EVENT-DISPATCH ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2396) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 51198
;;;   at (FSET 'EVENT-DISPATCH ...)
;;;   Checking type of #:LOOP-LIST-TAIL2398 to be CONS
;;; Compiling (DEFMACRO BINDING-EVENT-VALUES ...).
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of #:LET2626 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2622) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of #:LOOP-LIST-TAIL2624 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of (CAR #:G2640) to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of #:G2643 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of #:LET2651 to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST2647) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of #:LOOP-LIST-TAIL2649 to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of (CAR #:G2676) to be CONS
;;; Note:
;;;   in file INPUT.LISP, position 53436
;;;   at (FSET 'BINDING-EVENT-VALUES ...)
;;;   Checking type of #:G2683 to be CONS
;;; Compiling (DEFPARAMETER *XERROR-VECTOR* ...).
;;; Compiling (DEFUN MAKE-ERROR ...).
;;; Note:
;;;   in file INPUT.LISP, position 57461
;;;   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 70122
;;;   at (DEFUN GET-ERROR-KEY ...)
;;;   Checking type of (FIRST ENTRY) to be KEYWORD
;;; Note:
;;;   in file INPUT.LISP, position 70122
;;;   at (DEFUN GET-ERROR-KEY ...)
;;;   Checking type of (FOURTH ENTRY) to be ARRAY-INDEX
;;; Note:
;;;   in file INPUT.LISP, position 70122
;;;   at (DEFUN GET-ERROR-KEY ...)
;;;   Checking type of (THIRD (ASSOC EVENT-NAME *EXTENSIONS*)) to be LIST
;;; Note:
;;;   in file INPUT.LISP, position 70122
;;;   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 70122
;;;   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 70122
;;;   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 70122
;;;   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 70885
;;;   at (FSET 'DEFINE-ERROR ...)
;;;   Checking type of (PROGN (IF (NULL #:G2770) (SI::DM-TOO-FEW-ARGUMENTS #:G2769)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G2770)) (SETQ #:G2770 (CDR (EXT:TRULY-THE CONS #:G2770))))) to be SYMBOL
;;; Note:
;;;   in file INPUT.LISP, position 70885
;;;   at (FSET 'DEFINE-ERROR ...)
;;;   Checking type of (PROGN (IF (NULL #:G2770) (SI::DM-TOO-FEW-ARGUMENTS #:G2769)) (PROG1 (CAR (EXT:TRULY-THE CONS #:G2770)) (SETQ #:G2770 (CDR (EXT:TRULY-THE CONS #:G2770))))) to be (OR SYMBOL LIST)
;;; Compiling (DEFUN DECODE-CORE-ERROR ...).
;;; Note:
;;;   in file INPUT.LISP, position 71861
;;;   at (DEFUN DECODE-CORE-ERROR ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN DECODE-RESOURCE-ERROR ...).
;;; End of Pass 1.
;;; Note:
;;;   in file input.lisp, position 46072
;;;   at (DEFUN EVENT-HANDLER ...)
;;;   Unknown type T. Assuming it is T.
;;; 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 #:G534.
;;; Emitting code for REPORT-ASYNCHRONOUS-ERRORS.
;;; Emitting code for WAIT-FOR-EVENT.
;;; Emitting code for #:G646.
;;; Emitting code for READ-REPLY.
;;; Emitting code for #:G650.
;;; 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 #:G1122.
;;; Emitting code for #:G1133.
;;; Emitting code for EVENT-GET.
;;; 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 35589
;;;   at (DECLARE-EVENT PROPERTY-NOTIFY ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),: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 35770
;;;   at (DECLARE-EVENT SELECTION-CLEAR ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),: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 35920
;;;   at (DECLARE-EVENT SELECTION-REQUEST ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),:FIXNUM)
;;; Warning:
;;;   in file INPUT.LISP, position 35920
;;;   at (DECLARE-EVENT SELECTION-REQUEST ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),:FIXNUM)
;;; Warning:
;;;   in file INPUT.LISP, position 35920
;;;   at (DECLARE-EVENT SELECTION-REQUEST ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),: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 36108
;;;   at (DECLARE-EVENT SELECTION-NOTIFY ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),:FIXNUM)
;;; Warning:
;;;   in file INPUT.LISP, position 36108
;;;   at (DECLARE-EVENT SELECTION-NOTIFY ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),:FIXNUM)
;;; Warning:
;;;   in file INPUT.LISP, position 36108
;;;   at (DECLARE-EVENT SELECTION-NOTIFY ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),: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 36434
;;;   at (DECLARE-EVENT CLIENT-MESSAGE ...)
;;;   ! Unable to coerce lisp object from type (NULL,:OBJECT)
;;; to C/C++ type ((SIGNED-BYTE 30),: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 EVENT-COND.
;;; Emitting code for GET-EVENT-CODE.
;;; Emitting code for UNIVERSAL-EVENT-GET-MACRO.
;;; Emitting code for EVENT-DISPATCH.
;;; Emitting code for EVENT-CLAUSE.
;;; Emitting code for BINDING-EVENT-VALUES.
;;; Emitting code for VAR-SYMBOL.
;;; Emitting code for VAR-KEY.
;;; Emitting code for MAKE-ERROR.
;;; Emitting code for REPORT-ERROR.
;;; Emitting code for REQUEST-NAME.
;;; Emitting code for REPORT-REQUEST-ERROR.
;;; Emitting code for #:G2697.
;;; Emitting code for #:G2698.
;;; Emitting code for #:G2699.
;;; Emitting code for #:G2700.
;;; Emitting code for #:G2701.
;;; Emitting code for #:G2702.
;;; Emitting code for #:G2703.
;;; Emitting code for #:G2704.
;;; Emitting code for #:G2705.
;;; Emitting code for #:G2706.
;;; Emitting code for #:G2707.
;;; Emitting code for #:G2708.
;;; Emitting code for #:G2709.
;;; Emitting code for #:G2710.
;;; 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 GET-ERROR-KEY.
;;; Emitting code for DEFINE-ERROR.
;;; Emitting code for DECODE-CORE-ERROR.
;;; Emitting code for DECODE-RESOURCE-ERROR.
;;; Emitting code for #:G2792.
;;; Emitting code for #:G2799.
;;; Emitting code for #:G2809.
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of (WINDOW-DISPLAY PARENT) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of (OR WINDOW (MAKE-WINDOW :DISPLAY DISPLAY)) to be WINDOW
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of (ALLOCATE-RESOURCE-ID DISPLAY WINDOW 'WINDOW) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of 0 to be (OR NULL RESOURCE-ID)
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of 1 to be (OR NULL RESOURCE-ID)
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of (PIXMAP-ID BACKGROUND) to be (OR NULL RESOURCE-ID)
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of BACKGROUND to be (OR NULL PIXEL)
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of 0 to be (OR NULL RESOURCE-ID)
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of (PIXMAP-ID BORDER) to be (OR NULL RESOURCE-ID)
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of BORDER to be (OR NULL PIXEL)
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Checking type of (ENCODE-EVENT-MASK EVENT-MASK) to be (OR NULL EVENT-MASK)
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   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 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 631
;;;   at (DEFUN CREATE-WINDOW ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DESTROY-WINDOW ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 4526
;;;   at (DEFUN DESTROY-WINDOW ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 4526
;;;   at (DEFUN DESTROY-WINDOW ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 4526
;;;   at (DEFUN DESTROY-WINDOW ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DESTROY-SUBWINDOWS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 4680
;;;   at (DEFUN DESTROY-SUBWINDOWS ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 4680
;;;   at (DEFUN DESTROY-SUBWINDOWS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 4680
;;;   at (DEFUN DESTROY-SUBWINDOWS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN ADD-TO-SAVE-SET ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 4842
;;;   at (DEFUN ADD-TO-SAVE-SET ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 4842
;;;   at (DEFUN ADD-TO-SAVE-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 4842
;;;   at (DEFUN ADD-TO-SAVE-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 4842
;;;   at (DEFUN ADD-TO-SAVE-SET ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN REMOVE-FROM-SAVE-SET ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 5010
;;;   at (DEFUN REMOVE-FROM-SAVE-SET ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 5010
;;;   at (DEFUN REMOVE-FROM-SAVE-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 5010
;;;   at (DEFUN REMOVE-FROM-SAVE-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 5010
;;;   at (DEFUN REMOVE-FROM-SAVE-SET ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN REPARENT-WINDOW ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 5183
;;;   at (DEFUN REPARENT-WINDOW ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 5183
;;;   at (DEFUN REPARENT-WINDOW ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 5183
;;;   at (DEFUN REPARENT-WINDOW ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN MAP-WINDOW ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 5401
;;;   at (DEFUN MAP-WINDOW ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 5401
;;;   at (DEFUN MAP-WINDOW ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 5401
;;;   at (DEFUN MAP-WINDOW ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN MAP-SUBWINDOWS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 5547
;;;   at (DEFUN MAP-SUBWINDOWS ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 5547
;;;   at (DEFUN MAP-SUBWINDOWS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 5547
;;;   at (DEFUN MAP-SUBWINDOWS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN UNMAP-WINDOW ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 5701
;;;   at (DEFUN UNMAP-WINDOW ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 5701
;;;   at (DEFUN UNMAP-WINDOW ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 5701
;;;   at (DEFUN UNMAP-WINDOW ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN UNMAP-SUBWINDOWS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 5851
;;;   at (DEFUN UNMAP-SUBWINDOWS ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 5851
;;;   at (DEFUN UNMAP-SUBWINDOWS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 5851
;;;   at (DEFUN UNMAP-SUBWINDOWS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CIRCULATE-WINDOW-UP ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 6009
;;;   at (DEFUN CIRCULATE-WINDOW-UP ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 6009
;;;   at (DEFUN CIRCULATE-WINDOW-UP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 6009
;;;   at (DEFUN CIRCULATE-WINDOW-UP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 6009
;;;   at (DEFUN CIRCULATE-WINDOW-UP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CIRCULATE-WINDOW-DOWN ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 6183
;;;   at (DEFUN CIRCULATE-WINDOW-DOWN ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 6183
;;;   at (DEFUN CIRCULATE-WINDOW-DOWN ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 6183
;;;   at (DEFUN CIRCULATE-WINDOW-DOWN ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 6183
;;;   at (DEFUN CIRCULATE-WINDOW-DOWN ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN QUERY-TREE ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 6359
;;;   at (DEFUN QUERY-TREE ...)
;;;   Checking type of #:LET708 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 6359
;;;   at (DEFUN QUERY-TREE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 6359
;;;   at (DEFUN QUERY-TREE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 6359
;;;   at (DEFUN QUERY-TREE ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 6359
;;;   at (DEFUN QUERY-TREE ...)
;;;   Checking type of #:LET751 to be REPLY-BUFFER
;;; Compiling (DEFUN INTERN-ATOM ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   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 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Checking type of #:LET812 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   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 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 7340
;;;   at (DEFUN INTERN-ATOM ...)
;;;   Checking type of #:LET867 to be REPLY-BUFFER
;;; Compiling (DEFUN FIND-ATOM ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   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 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Checking type of #:LET930 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   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 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 8007
;;;   at (DEFUN FIND-ATOM ...)
;;;   Checking type of #:LET993 to be REPLY-BUFFER
;;; Compiling (DEFUN ATOM-NAME ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 8783
;;;   at (DEFUN ATOM-NAME ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 8783
;;;   at (DEFUN ATOM-NAME ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 8783
;;;   at (DEFUN ATOM-NAME ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 8783
;;;   at (DEFUN ATOM-NAME ...)
;;;   Checking type of #:LET1055 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 8783
;;;   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 8783
;;;   at (DEFUN ATOM-NAME ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 8783
;;;   at (DEFUN ATOM-NAME ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 8783
;;;   at (DEFUN ATOM-NAME ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 8783
;;;   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 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file REQUESTS.LISP, position 9471
;;;   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 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file REQUESTS.LISP, position 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Checking type of (INTERN-ATOM DISPLAY PROPERTY) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Checking type of (INTERN-ATOM DISPLAY TYPE) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 9471
;;;   at (DEFUN CHANGE-PROPERTY ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DELETE-PROPERTY ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 10838
;;;   at (DEFUN DELETE-PROPERTY ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 10838
;;;   at (DEFUN DELETE-PROPERTY ...)
;;;   Checking type of (INTERN-ATOM DISPLAY PROPERTY) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 10838
;;;   at (DEFUN DELETE-PROPERTY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 10838
;;;   at (DEFUN DELETE-PROPERTY ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN GET-PROPERTY ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 11215
;;;   at (DEFUN GET-PROPERTY ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 11215
;;;   at (DEFUN GET-PROPERTY ...)
;;;   Checking type of (INTERN-ATOM DISPLAY PROPERTY) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 11215
;;;   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 11215
;;;   at (DEFUN GET-PROPERTY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 11215
;;;   at (DEFUN GET-PROPERTY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 11215
;;;   at (DEFUN GET-PROPERTY ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 11215
;;;   at (DEFUN GET-PROPERTY ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 11215
;;;   at (DEFUN GET-PROPERTY ...)
;;;   Checking type of #:LET1306 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 11215
;;;   at (DEFUN GET-PROPERTY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN ROTATE-PROPERTIES ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 13218
;;;   at (DEFUN ROTATE-PROPERTIES ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 13218
;;;   at (DEFUN ROTATE-PROPERTIES ...)
;;;   Checking type of SEQUENCE to be VECTOR
;;; Note:
;;;   in file REQUESTS.LISP, position 13218
;;;   at (DEFUN ROTATE-PROPERTIES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 13218
;;;   at (DEFUN ROTATE-PROPERTIES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN LIST-PROPERTIES ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 14073
;;;   at (DEFUN LIST-PROPERTIES ...)
;;;   Checking type of #:LET1371 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 14073
;;;   at (DEFUN LIST-PROPERTIES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 14073
;;;   at (DEFUN LIST-PROPERTIES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 14073
;;;   at (DEFUN LIST-PROPERTIES ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 14073
;;;   at (DEFUN LIST-PROPERTIES ...)
;;;   Checking type of #:LET1414 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 14073
;;;   at (DEFUN LIST-PROPERTIES ...)
;;;   Checking type of #:G1418 to be CONS
;;; Compiling (DEFUN SELECTION-OWNER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 14796
;;;   at (DEFUN SELECTION-OWNER ...)
;;;   Checking type of (INTERN-ATOM DISPLAY SELECTION) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 14796
;;;   at (DEFUN SELECTION-OWNER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 14796
;;;   at (DEFUN SELECTION-OWNER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 14796
;;;   at (DEFUN SELECTION-OWNER ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 14796
;;;   at (DEFUN SELECTION-OWNER ...)
;;;   Checking type of #:LET1475 to be REPLY-BUFFER
;;; Compiling (DEFUN SET-SELECTION-OWNER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 15290
;;;   at (DEFUN SET-SELECTION-OWNER ...)
;;;   Checking type of (INTERN-ATOM DISPLAY SELECTION) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 15290
;;;   at (DEFUN SET-SELECTION-OWNER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 15290
;;;   at (DEFUN SET-SELECTION-OWNER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CONVERT-SELECTION ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 15918
;;;   at (DEFUN CONVERT-SELECTION ...)
;;;   Checking type of (WINDOW-DISPLAY REQUESTOR) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 15918
;;;   at (DEFUN CONVERT-SELECTION ...)
;;;   Checking type of (INTERN-ATOM DISPLAY SELECTION) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 15918
;;;   at (DEFUN CONVERT-SELECTION ...)
;;;   Checking type of (INTERN-ATOM DISPLAY TYPE) to be RESOURCE-ID
;;; Note:
;;;   in file REQUESTS.LISP, position 15918
;;;   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 15918
;;;   at (DEFUN CONVERT-SELECTION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 15918
;;;   at (DEFUN CONVERT-SELECTION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN SEND-EVENT ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Checking type of 0 to be (OR NULL EVENT-MASK)
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be (OR NULL DISPLAY)
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Checking type of #:LET1595 to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Checking type of #:LET1596 to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 16649
;;;   at (DEFUN SEND-EVENT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN GRAB-POINTER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Checking type of #:LET1672 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Checking type of #:LET1749 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 18452
;;;   at (DEFUN GRAB-POINTER ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN UNGRAB-POINTER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 19306
;;;   at (DEFUN UNGRAB-POINTER ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 19306
;;;   at (DEFUN UNGRAB-POINTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 19306
;;;   at (DEFUN UNGRAB-POINTER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN GRAB-BUTTON ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 19464
;;;   at (DEFUN GRAB-BUTTON ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 19464
;;;   at (DEFUN GRAB-BUTTON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 19464
;;;   at (DEFUN GRAB-BUTTON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 19464
;;;   at (DEFUN GRAB-BUTTON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 19464
;;;   at (DEFUN GRAB-BUTTON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 19464
;;;   at (DEFUN GRAB-BUTTON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 19464
;;;   at (DEFUN GRAB-BUTTON ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN UNGRAB-BUTTON ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 20286
;;;   at (DEFUN UNGRAB-BUTTON ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 20286
;;;   at (DEFUN UNGRAB-BUTTON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 20286
;;;   at (DEFUN UNGRAB-BUTTON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 20286
;;;   at (DEFUN UNGRAB-BUTTON ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CHANGE-ACTIVE-POINTER-GRAB ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 20633
;;;   at (DEFUN CHANGE-ACTIVE-POINTER-GRAB ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 20633
;;;   at (DEFUN CHANGE-ACTIVE-POINTER-GRAB ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN GRAB-KEYBOARD ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Checking type of #:LET1992 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Checking type of #:LET2064 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 21021
;;;   at (DEFUN GRAB-KEYBOARD ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN UNGRAB-KEYBOARD ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 21613
;;;   at (DEFUN UNGRAB-KEYBOARD ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21613
;;;   at (DEFUN UNGRAB-KEYBOARD ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN GRAB-KEY ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 21800
;;;   at (DEFUN GRAB-KEY ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 21800
;;;   at (DEFUN GRAB-KEY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21800
;;;   at (DEFUN GRAB-KEY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21800
;;;   at (DEFUN GRAB-KEY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21800
;;;   at (DEFUN GRAB-KEY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21800
;;;   at (DEFUN GRAB-KEY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 21800
;;;   at (DEFUN GRAB-KEY ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN UNGRAB-KEY ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 22318
;;;   at (DEFUN UNGRAB-KEY ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 22318
;;;   at (DEFUN UNGRAB-KEY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 22318
;;;   at (DEFUN UNGRAB-KEY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 22318
;;;   at (DEFUN UNGRAB-KEY ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN ALLOW-EVENTS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 22644
;;;   at (DEFUN ALLOW-EVENTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 22644
;;;   at (DEFUN ALLOW-EVENTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 22644
;;;   at (DEFUN ALLOW-EVENTS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN GRAB-SERVER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 23145
;;;   at (DEFUN GRAB-SERVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 23145
;;;   at (DEFUN GRAB-SERVER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN UNGRAB-SERVER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 23260
;;;   at (DEFUN UNGRAB-SERVER ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 23260
;;;   at (DEFUN UNGRAB-SERVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 23260
;;;   at (DEFUN UNGRAB-SERVER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFMACRO WITH-SERVER-GRABBED ...).
;;; Compiling (DEFUN QUERY-POINTER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 23674
;;;   at (DEFUN QUERY-POINTER ...)
;;;   Checking type of #:LET2399 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 23674
;;;   at (DEFUN QUERY-POINTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 23674
;;;   at (DEFUN QUERY-POINTER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 23674
;;;   at (DEFUN QUERY-POINTER ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 23674
;;;   at (DEFUN QUERY-POINTER ...)
;;;   Checking type of #:LET2442 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 23674
;;;   at (DEFUN QUERY-POINTER ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN POINTER-POSITION ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 24113
;;;   at (DEFUN POINTER-POSITION ...)
;;;   Checking type of #:LET2454 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 24113
;;;   at (DEFUN POINTER-POSITION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 24113
;;;   at (DEFUN POINTER-POSITION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 24113
;;;   at (DEFUN POINTER-POSITION ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 24113
;;;   at (DEFUN POINTER-POSITION ...)
;;;   Checking type of #:LET2497 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 24113
;;;   at (DEFUN POINTER-POSITION ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN GLOBAL-POINTER-POSITION ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 24432
;;;   at (DEFUN GLOBAL-POINTER-POSITION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 24432
;;;   at (DEFUN GLOBAL-POINTER-POSITION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 24432
;;;   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 24432
;;;   at (DEFUN GLOBAL-POINTER-POSITION ...)
;;;   Checking type of #:LET2544 to be REPLY-BUFFER
;;; Compiling (DEFUN MOTION-EVENTS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 24773
;;;   at (DEFUN MOTION-EVENTS ...)
;;;   Checking type of #:LET2546 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 24773
;;;   at (DEFUN MOTION-EVENTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 24773
;;;   at (DEFUN MOTION-EVENTS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 24773
;;;   at (DEFUN MOTION-EVENTS ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 24773
;;;   at (DEFUN MOTION-EVENTS ...)
;;;   Checking type of #:LET2599 to be REPLY-BUFFER
;;; Compiling (DEFUN TRANSLATE-COORDINATES ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 25324
;;;   at (DEFUN TRANSLATE-COORDINATES ...)
;;;   Checking type of #:LET2601 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 25324
;;;   at (DEFUN TRANSLATE-COORDINATES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 25324
;;;   at (DEFUN TRANSLATE-COORDINATES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 25324
;;;   at (DEFUN TRANSLATE-COORDINATES ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 25324
;;;   at (DEFUN TRANSLATE-COORDINATES ...)
;;;   Checking type of #:LET2644 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 25324
;;;   at (DEFUN TRANSLATE-COORDINATES ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN WARP-POINTER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 25829
;;;   at (DEFUN WARP-POINTER ...)
;;;   Checking type of (WINDOW-DISPLAY DST) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 25829
;;;   at (DEFUN WARP-POINTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 25829
;;;   at (DEFUN WARP-POINTER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN WARP-POINTER-RELATIVE ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 26093
;;;   at (DEFUN WARP-POINTER-RELATIVE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 26093
;;;   at (DEFUN WARP-POINTER-RELATIVE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN WARP-POINTER-IF-INSIDE ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 26373
;;;   at (DEFUN WARP-POINTER-IF-INSIDE ...)
;;;   Checking type of (WINDOW-DISPLAY DST) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 26373
;;;   at (DEFUN WARP-POINTER-IF-INSIDE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 26373
;;;   at (DEFUN WARP-POINTER-IF-INSIDE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 26996
;;;   at (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...)
;;;   Checking type of (WINDOW-DISPLAY SRC) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 26996
;;;   at (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 26996
;;;   at (DEFUN WARP-POINTER-RELATIVE-IF-INSIDE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN SET-INPUT-FOCUS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 27641
;;;   at (DEFUN SET-INPUT-FOCUS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 27641
;;;   at (DEFUN SET-INPUT-FOCUS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 27641
;;;   at (DEFUN SET-INPUT-FOCUS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN INPUT-FOCUS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 28077
;;;   at (DEFUN INPUT-FOCUS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 28077
;;;   at (DEFUN INPUT-FOCUS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 28077
;;;   at (DEFUN INPUT-FOCUS ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 28077
;;;   at (DEFUN INPUT-FOCUS ...)
;;;   Checking type of #:LET2936 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 28077
;;;   at (DEFUN INPUT-FOCUS ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN QUERY-KEYMAP ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 28389
;;;   at (DEFUN QUERY-KEYMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 28389
;;;   at (DEFUN QUERY-KEYMAP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 28389
;;;   at (DEFUN QUERY-KEYMAP ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 28389
;;;   at (DEFUN QUERY-KEYMAP ...)
;;;   Checking type of #:LET2994 to be REPLY-BUFFER
;;; Compiling (DEFUN CREATE-PIXMAP ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 28704
;;;   at (DEFUN CREATE-PIXMAP ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 28704
;;;   at (DEFUN CREATE-PIXMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 28704
;;;   at (DEFUN CREATE-PIXMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 28704
;;;   at (DEFUN CREATE-PIXMAP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN FREE-PIXMAP ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 29451
;;;   at (DEFUN FREE-PIXMAP ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 29451
;;;   at (DEFUN FREE-PIXMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 29451
;;;   at (DEFUN FREE-PIXMAP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CLEAR-AREA ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 29695
;;;   at (DEFUN CLEAR-AREA ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 29695
;;;   at (DEFUN CLEAR-AREA ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 29695
;;;   at (DEFUN CLEAR-AREA ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 29695
;;;   at (DEFUN CLEAR-AREA ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN COPY-AREA ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 30273
;;;   at (DEFUN COPY-AREA ...)
;;;   Checking type of (DRAWABLE-DISPLAY SRC) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 30273
;;;   at (DEFUN COPY-AREA ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 30273
;;;   at (DEFUN COPY-AREA ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN COPY-PLANE ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 30675
;;;   at (DEFUN COPY-PLANE ...)
;;;   Checking type of (DRAWABLE-DISPLAY SRC) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 30675
;;;   at (DEFUN COPY-PLANE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 30675
;;;   at (DEFUN COPY-PLANE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CREATE-COLORMAP ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 31127
;;;   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 31127
;;;   at (DEFUN CREATE-COLORMAP ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 31127
;;;   at (DEFUN CREATE-COLORMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 31127
;;;   at (DEFUN CREATE-COLORMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 31127
;;;   at (DEFUN CREATE-COLORMAP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN FREE-COLORMAP ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 31843
;;;   at (DEFUN FREE-COLORMAP ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 31843
;;;   at (DEFUN FREE-COLORMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 31843
;;;   at (DEFUN FREE-COLORMAP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN COPY-COLORMAP-AND-FREE ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 32111
;;;   at (DEFUN COPY-COLORMAP-AND-FREE ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 32111
;;;   at (DEFUN COPY-COLORMAP-AND-FREE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 32111
;;;   at (DEFUN COPY-COLORMAP-AND-FREE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN INSTALL-COLORMAP ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 32607
;;;   at (DEFUN INSTALL-COLORMAP ...)
;;;   Checking type of (COLORMAP-DISPLAY COLORMAP) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 32607
;;;   at (DEFUN INSTALL-COLORMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 32607
;;;   at (DEFUN INSTALL-COLORMAP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN UNINSTALL-COLORMAP ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 32779
;;;   at (DEFUN UNINSTALL-COLORMAP ...)
;;;   Checking type of (COLORMAP-DISPLAY COLORMAP) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 32779
;;;   at (DEFUN UNINSTALL-COLORMAP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 32779
;;;   at (DEFUN UNINSTALL-COLORMAP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN INSTALLED-COLORMAPS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 32955
;;;   at (DEFUN INSTALLED-COLORMAPS ...)
;;;   Checking type of #:LET3533 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 32955
;;;   at (DEFUN INSTALLED-COLORMAPS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 32955
;;;   at (DEFUN INSTALLED-COLORMAPS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 32955
;;;   at (DEFUN INSTALLED-COLORMAPS ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 32955
;;;   at (DEFUN INSTALLED-COLORMAPS ...)
;;;   Checking type of #:LET3576 to be REPLY-BUFFER
;;; Compiling (DEFUN ALLOC-COLOR ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Checking type of #:LET3579 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Checking type of #:LET3637 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Checking type of #:LET3640 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 33483
;;;   at (DEFUN ALLOC-COLOR ...)
;;;   Checking type of #:LET3686 to be REPLY-BUFFER
;;; Compiling (DEFUN ALLOC-COLOR-CELLS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 34571
;;;   at (DEFUN ALLOC-COLOR-CELLS ...)
;;;   Checking type of #:LET3688 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 34571
;;;   at (DEFUN ALLOC-COLOR-CELLS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 34571
;;;   at (DEFUN ALLOC-COLOR-CELLS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 34571
;;;   at (DEFUN ALLOC-COLOR-CELLS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 34571
;;;   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 34571
;;;   at (DEFUN ALLOC-COLOR-CELLS ...)
;;;   Checking type of #:LET3739 to be REPLY-BUFFER
;;; Compiling (DEFUN ALLOC-COLOR-PLANES ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 35381
;;;   at (DEFUN ALLOC-COLOR-PLANES ...)
;;;   Checking type of #:LET3743 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 35381
;;;   at (DEFUN ALLOC-COLOR-PLANES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 35381
;;;   at (DEFUN ALLOC-COLOR-PLANES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 35381
;;;   at (DEFUN ALLOC-COLOR-PLANES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 35381
;;;   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 35381
;;;   at (DEFUN ALLOC-COLOR-PLANES ...)
;;;   Checking type of #:LET3794 to be REPLY-BUFFER
;;; Compiling (DEFUN FREE-COLORS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 36207
;;;   at (DEFUN FREE-COLORS ...)
;;;   Checking type of (COLORMAP-DISPLAY COLORMAP) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 36207
;;;   at (DEFUN FREE-COLORS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36207
;;;   at (DEFUN FREE-COLORS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN STORE-COLOR ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Checking type of #:LET3837 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Checking type of #:LET3838 to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Checking type of 1 to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Checking type of (+ FLAGS #:G3840) to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Checking type of (+ FLAGS #:G3847) to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 36526
;;;   at (DEFUN STORE-COLOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN STORE-COLORS ...).
;;; Compiling (DEFUN QUERY-COLORS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 38272
;;;   at (DEFUN QUERY-COLORS ...)
;;;   Checking type of #:LET3974 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 38272
;;;   at (DEFUN QUERY-COLORS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 38272
;;;   at (DEFUN QUERY-COLORS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 38272
;;;   at (DEFUN QUERY-COLORS ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 38272
;;;   at (DEFUN QUERY-COLORS ...)
;;;   Checking type of #:LET4015 to be REPLY-BUFFER
;;; Compiling (DEFUN LOOKUP-COLOR ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 38988
;;;   at (DEFUN LOOKUP-COLOR ...)
;;;   Checking type of #:LET4023 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 38988
;;;   at (DEFUN LOOKUP-COLOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 38988
;;;   at (DEFUN LOOKUP-COLOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 38988
;;;   at (DEFUN LOOKUP-COLOR ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 38988
;;;   at (DEFUN LOOKUP-COLOR ...)
;;;   Checking type of #:LET4069 to be REPLY-BUFFER
;;; Compiling (DEFUN CREATE-CURSOR ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 39596
;;;   at (DEFUN CREATE-CURSOR ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 39596
;;;   at (DEFUN CREATE-CURSOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 39596
;;;   at (DEFUN CREATE-CURSOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CREATE-GLYPH-CURSOR ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 40577
;;;   at (DEFUN CREATE-GLYPH-CURSOR ...)
;;;   Checking type of 0 to be (OR NULL CARD16)
;;; Note:
;;;   in file REQUESTS.LISP, position 40577
;;;   at (DEFUN CREATE-GLYPH-CURSOR ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 40577
;;;   at (DEFUN CREATE-GLYPH-CURSOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 40577
;;;   at (DEFUN CREATE-GLYPH-CURSOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN FREE-CURSOR ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 41778
;;;   at (DEFUN FREE-CURSOR ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 41778
;;;   at (DEFUN FREE-CURSOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 41778
;;;   at (DEFUN FREE-CURSOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RECOLOR-CURSOR ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 42022
;;;   at (DEFUN RECOLOR-CURSOR ...)
;;;   Checking type of (CURSOR-DISPLAY CURSOR) to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 42022
;;;   at (DEFUN RECOLOR-CURSOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 42022
;;;   at (DEFUN RECOLOR-CURSOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN QUERY-BEST-CURSOR ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 42438
;;;   at (DEFUN QUERY-BEST-CURSOR ...)
;;;   Checking type of #:LET4394 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 42438
;;;   at (DEFUN QUERY-BEST-CURSOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 42438
;;;   at (DEFUN QUERY-BEST-CURSOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 42438
;;;   at (DEFUN QUERY-BEST-CURSOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 42438
;;;   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 42438
;;;   at (DEFUN QUERY-BEST-CURSOR ...)
;;;   Checking type of #:LET4444 to be REPLY-BUFFER
;;; Compiling (DEFUN QUERY-BEST-TILE ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 43040
;;;   at (DEFUN QUERY-BEST-TILE ...)
;;;   Checking type of #:LET4446 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 43040
;;;   at (DEFUN QUERY-BEST-TILE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 43040
;;;   at (DEFUN QUERY-BEST-TILE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 43040
;;;   at (DEFUN QUERY-BEST-TILE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 43040
;;;   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 43040
;;;   at (DEFUN QUERY-BEST-TILE ...)
;;;   Checking type of #:LET4496 to be REPLY-BUFFER
;;; Compiling (DEFUN QUERY-BEST-STIPPLE ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 43429
;;;   at (DEFUN QUERY-BEST-STIPPLE ...)
;;;   Checking type of #:LET4498 to be DISPLAY
;;; Note:
;;;   in file REQUESTS.LISP, position 43429
;;;   at (DEFUN QUERY-BEST-STIPPLE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 43429
;;;   at (DEFUN QUERY-BEST-STIPPLE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 43429
;;;   at (DEFUN QUERY-BEST-STIPPLE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 43429
;;;   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 43429
;;;   at (DEFUN QUERY-BEST-STIPPLE ...)
;;;   Checking type of #:LET4548 to be REPLY-BUFFER
;;; Compiling (DEFUN QUERY-EXTENSION ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 43821
;;;   at (DEFUN QUERY-EXTENSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 43821
;;;   at (DEFUN QUERY-EXTENSION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 43821
;;;   at (DEFUN QUERY-EXTENSION ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 43821
;;;   at (DEFUN QUERY-EXTENSION ...)
;;;   Checking type of #:LET4596 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 43821
;;;   at (DEFUN QUERY-EXTENSION ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 43821
;;;   at (DEFUN QUERY-EXTENSION ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 43821
;;;   at (DEFUN QUERY-EXTENSION ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 43821
;;;   at (DEFUN QUERY-EXTENSION ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN LIST-EXTENSIONS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 44278
;;;   at (DEFUN LIST-EXTENSIONS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 44278
;;;   at (DEFUN LIST-EXTENSIONS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 44278
;;;   at (DEFUN LIST-EXTENSIONS ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 44278
;;;   at (DEFUN LIST-EXTENSIONS ...)
;;;   Checking type of .REPLY-BUFFER. to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 44278
;;;   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 44278
;;;   at (DEFUN LIST-EXTENSIONS ...)
;;;   Checking type of .REPLY-BUFFER. to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 44278
;;;   at (DEFUN LIST-EXTENSIONS ...)
;;;   Checking type of #:LET4654 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 44278
;;;   at (DEFUN LIST-EXTENSIONS ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN CHANGE-KEYBOARD-CONTROL ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 44662
;;;   at (DEFUN CHANGE-KEYBOARD-CONTROL ...)
;;;   Checking type of -1 to be (OR NULL (MEMBER :DEFAULT) INT16)
;;; Note:
;;;   in file REQUESTS.LISP, position 44662
;;;   at (DEFUN CHANGE-KEYBOARD-CONTROL ...)
;;;   Checking type of -1 to be (OR NULL (MEMBER :DEFAULT) INT16)
;;; Note:
;;;   in file REQUESTS.LISP, position 44662
;;;   at (DEFUN CHANGE-KEYBOARD-CONTROL ...)
;;;   Checking type of -1 to be (OR NULL (MEMBER :DEFAULT) INT16)
;;; Note:
;;;   in file REQUESTS.LISP, position 44662
;;;   at (DEFUN CHANGE-KEYBOARD-CONTROL ...)
;;;   Checking type of -1 to be (OR NULL (MEMBER :DEFAULT) INT16)
;;; Note:
;;;   in file REQUESTS.LISP, position 44662
;;;   at (DEFUN CHANGE-KEYBOARD-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 44662
;;;   at (DEFUN CHANGE-KEYBOARD-CONTROL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN KEYBOARD-CONTROL ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 45625
;;;   at (DEFUN KEYBOARD-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 45625
;;;   at (DEFUN KEYBOARD-CONTROL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 45625
;;;   at (DEFUN KEYBOARD-CONTROL ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 45625
;;;   at (DEFUN KEYBOARD-CONTROL ...)
;;;   Checking type of #:LET4774 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 45625
;;;   at (DEFUN KEYBOARD-CONTROL ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 45625
;;;   at (DEFUN KEYBOARD-CONTROL ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 45625
;;;   at (DEFUN KEYBOARD-CONTROL ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN BELL ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 46566
;;;   at (DEFUN BELL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 46566
;;;   at (DEFUN BELL ...)
;;;   Inlining INT8->CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 46566
;;;   at (DEFUN BELL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 46566
;;;   at (DEFUN BELL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN POINTER-MAPPING ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 46875
;;;   at (DEFUN POINTER-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 46875
;;;   at (DEFUN POINTER-MAPPING ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 46875
;;;   at (DEFUN POINTER-MAPPING ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 46875
;;;   at (DEFUN POINTER-MAPPING ...)
;;;   Checking type of #:LET4879 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 46875
;;;   at (DEFUN POINTER-MAPPING ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN SET-POINTER-MAPPING ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 47269
;;;   at (DEFUN SET-POINTER-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47269
;;;   at (DEFUN SET-POINTER-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47269
;;;   at (DEFUN SET-POINTER-MAPPING ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 47269
;;;   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 47269
;;;   at (DEFUN SET-POINTER-MAPPING ...)
;;;   Checking type of #:LET4936 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 47269
;;;   at (DEFUN SET-POINTER-MAPPING ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN CHANGE-POINTER-CONTROL ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of #:LET4942 to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of #:LET4943 to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of #:LET4944 to be INT16
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of #:LET4945 to be INT16
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of -1 to be INT16
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of #:G4948 to be NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of #:G4947 to be INT16
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of #:G4946 to be INT16
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of 0 to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Checking type of 0 to be CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 47701
;;;   at (DEFUN CHANGE-POINTER-CONTROL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN POINTER-CONTROL ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 49149
;;;   at (DEFUN POINTER-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 49149
;;;   at (DEFUN POINTER-CONTROL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 49149
;;;   at (DEFUN POINTER-CONTROL ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 49149
;;;   at (DEFUN POINTER-CONTROL ...)
;;;   Checking type of #:LET5065 to be REPLY-BUFFER
;;; Compiling (DEFUN SET-SCREEN-SAVER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Checking type of :ON to be (MEMBER :ON :OFF :DEFAULT :YES :NO)
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Checking type of :OFF to be (MEMBER :ON :OFF :DEFAULT :YES :NO)
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Checking type of :ON to be (MEMBER :ON :OFF :DEFAULT :YES :NO)
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Checking type of :OFF to be (MEMBER :ON :OFF :DEFAULT :YES :NO)
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Checking type of -1 to be (OR (MEMBER :DEFAULT) INT16)
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Checking type of -1 to be (OR (MEMBER :DEFAULT) INT16)
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 49456
;;;   at (DEFUN SET-SCREEN-SAVER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN SCREEN-SAVER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 50138
;;;   at (DEFUN SCREEN-SAVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 50138
;;;   at (DEFUN SCREEN-SAVER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 50138
;;;   at (DEFUN SCREEN-SAVER ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 50138
;;;   at (DEFUN SCREEN-SAVER ...)
;;;   Checking type of #:LET5178 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 50138
;;;   at (DEFUN SCREEN-SAVER ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 50138
;;;   at (DEFUN SCREEN-SAVER ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN ACTIVATE-SCREEN-SAVER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 50540
;;;   at (DEFUN ACTIVATE-SCREEN-SAVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 50540
;;;   at (DEFUN ACTIVATE-SCREEN-SAVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 50540
;;;   at (DEFUN ACTIVATE-SCREEN-SAVER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RESET-SCREEN-SAVER ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 50684
;;;   at (DEFUN RESET-SCREEN-SAVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 50684
;;;   at (DEFUN RESET-SCREEN-SAVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 50684
;;;   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 51936
;;;   at (DEFUN CHANGE-ACCESS-HOST ...)
;;;   Checking type of (HOST-ADDRESS HOST FAMILY) to be (OR STRINGABLE LIST)
;;; Note:
;;;   in file REQUESTS.LISP, position 51936
;;;   at (DEFUN CHANGE-ACCESS-HOST ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 51936
;;;   at (DEFUN CHANGE-ACCESS-HOST ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 51936
;;;   at (DEFUN CHANGE-ACCESS-HOST ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 51936
;;;   at (DEFUN CHANGE-ACCESS-HOST ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN ACCESS-HOSTS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 52497
;;;   at (DEFUN ACCESS-HOSTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 52497
;;;   at (DEFUN ACCESS-HOSTS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 52497
;;;   at (DEFUN ACCESS-HOSTS ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 52497
;;;   at (DEFUN ACCESS-HOSTS ...)
;;;   Checking type of #:LET5419 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 52497
;;;   at (DEFUN ACCESS-HOSTS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 52497
;;;   at (DEFUN ACCESS-HOSTS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 52497
;;;   at (DEFUN ACCESS-HOSTS ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN ACCESS-CONTROL ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 53620
;;;   at (DEFUN ACCESS-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 53620
;;;   at (DEFUN ACCESS-CONTROL ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file REQUESTS.LISP, position 53620
;;;   at (DEFUN ACCESS-CONTROL ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file REQUESTS.LISP, position 53620
;;;   at (DEFUN ACCESS-CONTROL ...)
;;;   Checking type of #:LET5485 to be REPLY-BUFFER
;;; Note:
;;;   in file REQUESTS.LISP, position 53620
;;;   at (DEFUN ACCESS-CONTROL ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN SET-ACCESS-CONTROL ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 53872
;;;   at (DEFUN SET-ACCESS-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 53872
;;;   at (DEFUN SET-ACCESS-CONTROL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 53872
;;;   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 54387
;;;   at (DEFUN SET-CLOSE-DOWN-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 54387
;;;   at (DEFUN SET-CLOSE-DOWN-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 54387
;;;   at (DEFUN SET-CLOSE-DOWN-MODE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN KILL-CLIENT ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 54819
;;;   at (DEFUN KILL-CLIENT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 54819
;;;   at (DEFUN KILL-CLIENT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN KILL-TEMPORARY-CLIENTS ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 55011
;;;   at (DEFUN KILL-TEMPORARY-CLIENTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 55011
;;;   at (DEFUN KILL-TEMPORARY-CLIENTS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN NO-OPERATION ...).
;;; Note:
;;;   in file REQUESTS.LISP, position 55157
;;;   at (DEFUN NO-OPERATION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file REQUESTS.LISP, position 55157
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of #:G19 to be INT16
;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...).
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MIN-BOUNDS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of #:G25 to be INT16
;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...).
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MAX-BOUNDS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of #:G41 to be INT16
;;; Compiling (DEF-CHAR-INFO-ACCESSORS IGNORE ...).
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   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 1640
;;;   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 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   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 1640
;;;   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 1640
;;;   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 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   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 1640
;;;   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 1640
;;;   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 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   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 1640
;;;   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 1640
;;;   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 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   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 1640
;;;   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 1640
;;;   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 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MAX-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-MIN-CHAR FONT) to be ARRAY-INDEX
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Checking type of (FONT-CHAR-INFOS FONT) to be CHAR-INFO-VEC
;;; Note:
;;;   in file FONTS.LISP, position 1640
;;;   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 1640
;;;   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 1640
;;;   at (DEF-CHAR-INFO-ACCESSORS IGNORE ...)
;;;   Inlining CARD16->INT16
;;; Compiling (DEFUN OPEN-FONT ...).
;;; Note:
;;;   in file FONTS.LISP, position 4407
;;;   at (DEFUN OPEN-FONT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 4407
;;;   at (DEFUN OPEN-FONT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN OPEN-FONT-INTERNAL ...).
;;; Note:
;;;   in file FONTS.LISP, position 5443
;;;   at (DEFUN OPEN-FONT-INTERNAL ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file FONTS.LISP, position 5443
;;;   at (DEFUN OPEN-FONT-INTERNAL ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 5443
;;;   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 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Checking type of #:LET282 to be DISPLAY
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Checking type of #:LET330 to be REPLY-BUFFER
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 6278
;;;   at (DEFUN QUERY-FONT ...)
;;;   Checking type of #:G349 to be CONS
;;; Compiling (DEFUN CLOSE-FONT ...).
;;; Note:
;;;   in file FONTS.LISP, position 7989
;;;   at (DEFUN CLOSE-FONT ...)
;;;   Checking type of #:LET356 to be DISPLAY
;;; Note:
;;;   in file FONTS.LISP, position 7989
;;;   at (DEFUN CLOSE-FONT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 7989
;;;   at (DEFUN CLOSE-FONT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN LIST-FONT-NAMES ...).
;;; Note:
;;;   in file FONTS.LISP, position 8558
;;;   at (DEFUN LIST-FONT-NAMES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 8558
;;;   at (DEFUN LIST-FONT-NAMES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file FONTS.LISP, position 8558
;;;   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 8558
;;;   at (DEFUN LIST-FONT-NAMES ...)
;;;   Checking type of .REPLY-BUFFER. to be REPLY-BUFFER
;;; Note:
;;;   in file FONTS.LISP, position 8558
;;;   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 8558
;;;   at (DEFUN LIST-FONT-NAMES ...)
;;;   Checking type of .REPLY-BUFFER. to be REPLY-BUFFER
;;; Note:
;;;   in file FONTS.LISP, position 8558
;;;   at (DEFUN LIST-FONT-NAMES ...)
;;;   Checking type of #:LET456 to be REPLY-BUFFER
;;; Compiling (DEFUN LIST-FONTS ...).
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Checking type of #:LET507 to be REPLY-BUFFER
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Checking type of #:G527 to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file FONTS.LISP, position 9108
;;;   at (DEFUN LIST-FONTS ...)
;;;   Checking type of #:G534 to be CONS
;;; Compiling (DEFUN FONT-PATH ...).
;;; Note:
;;;   in file FONTS.LISP, position 11373
;;;   at (DEFUN FONT-PATH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 11373
;;;   at (DEFUN FONT-PATH ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file FONTS.LISP, position 11373
;;;   at (DEFUN FONT-PATH ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file FONTS.LISP, position 11373
;;;   at (DEFUN FONT-PATH ...)
;;;   Checking type of .REPLY-BUFFER. to be REPLY-BUFFER
;;; Note:
;;;   in file FONTS.LISP, position 11373
;;;   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 11373
;;;   at (DEFUN FONT-PATH ...)
;;;   Checking type of .REPLY-BUFFER. to be REPLY-BUFFER
;;; Note:
;;;   in file FONTS.LISP, position 11373
;;;   at (DEFUN FONT-PATH ...)
;;;   Checking type of #:LET584 to be REPLY-BUFFER
;;; Compiling (DEFUN SET-FONT-PATH ...).
;;; Note:
;;;   in file FONTS.LISP, position 11768
;;;   at (DEFUN SET-FONT-PATH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 11768
;;;   at (DEFUN SET-FONT-PATH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 11768
;;;   at (DEFUN SET-FONT-PATH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file FONTS.LISP, position 11768
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 691
;;;   at (DEFUN DRAW-POINT ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 691
;;;   at (DEFUN DRAW-POINT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 691
;;;   at (DEFUN DRAW-POINT ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 691
;;;   at (DEFUN DRAW-POINT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 691
;;;   at (DEFUN DRAW-POINT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 691
;;;   at (DEFUN DRAW-POINT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-POINTS ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 2475
;;;   at (DEFUN DRAW-POINTS ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 2475
;;;   at (DEFUN DRAW-POINTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 2475
;;;   at (DEFUN DRAW-POINTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 2475
;;;   at (DEFUN DRAW-POINTS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-LINE ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 2925
;;;   at (DEFUN DRAW-LINE ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 2925
;;;   at (DEFUN DRAW-LINE ...)
;;;   Checking type of (+ X2 #:G127) to be INT16
;;; Note:
;;;   in file GRAPHICS.LISP, position 2925
;;;   at (DEFUN DRAW-LINE ...)
;;;   Checking type of (+ Y2 #:G134) to be INT16
;;; Note:
;;;   in file GRAPHICS.LISP, position 2925
;;;   at (DEFUN DRAW-LINE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 2925
;;;   at (DEFUN DRAW-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 2925
;;;   at (DEFUN DRAW-LINE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-LINES ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 4819
;;;   at (DEFUN DRAW-LINES ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 4819
;;;   at (DEFUN DRAW-LINES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 4819
;;;   at (DEFUN DRAW-LINES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 4819
;;;   at (DEFUN DRAW-LINES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN FILL-POLYGON ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 5480
;;;   at (DEFUN FILL-POLYGON ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 5480
;;;   at (DEFUN FILL-POLYGON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 5480
;;;   at (DEFUN FILL-POLYGON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 5480
;;;   at (DEFUN FILL-POLYGON ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 5480
;;;   at (DEFUN FILL-POLYGON ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-SEGMENTS ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 6095
;;;   at (DEFUN DRAW-SEGMENTS ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 6095
;;;   at (DEFUN DRAW-SEGMENTS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 6095
;;;   at (DEFUN DRAW-SEGMENTS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-RECTANGLE ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 6493
;;;   at (DEFUN DRAW-RECTANGLE ...)
;;;   Checking type of #:LET349 to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 6493
;;;   at (DEFUN DRAW-RECTANGLE ...)
;;;   Checking type of #:LET350 to be CARD16
;;; Note:
;;;   in file GRAPHICS.LISP, position 6493
;;;   at (DEFUN DRAW-RECTANGLE ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 6493
;;;   at (DEFUN DRAW-RECTANGLE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 6493
;;;   at (DEFUN DRAW-RECTANGLE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-RECTANGLES ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 8461
;;;   at (DEFUN DRAW-RECTANGLES ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 8461
;;;   at (DEFUN DRAW-RECTANGLES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 8461
;;;   at (DEFUN DRAW-RECTANGLES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-ARC ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 8969
;;;   at (DEFUN DRAW-ARC ...)
;;;   Checking type of #:LET465 to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 8969
;;;   at (DEFUN DRAW-ARC ...)
;;;   Checking type of #:LET466 to be CARD16
;;; Note:
;;;   in file GRAPHICS.LISP, position 8969
;;;   at (DEFUN DRAW-ARC ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 8969
;;;   at (DEFUN DRAW-ARC ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 8969
;;;   at (DEFUN DRAW-ARC ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-ARCS-LIST ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 11017
;;;   at (DEFUN DRAW-ARCS-LIST ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file GRAPHICS.LISP, position 11017
;;;   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 11017
;;;   at (DEFUN DRAW-ARCS-LIST ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file GRAPHICS.LISP, position 11017
;;;   at (DEFUN DRAW-ARCS-LIST ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 11017
;;;   at (DEFUN DRAW-ARCS-LIST ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 11017
;;;   at (DEFUN DRAW-ARCS-LIST ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-ARCS-VECTOR ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 12195
;;;   at (DEFUN DRAW-ARCS-VECTOR ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file GRAPHICS.LISP, position 12195
;;;   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 12195
;;;   at (DEFUN DRAW-ARCS-VECTOR ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file GRAPHICS.LISP, position 12195
;;;   at (DEFUN DRAW-ARCS-VECTOR ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 12195
;;;   at (DEFUN DRAW-ARCS-VECTOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 12195
;;;   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 14108
;;;   at (DEFUN PUT-RAW-IMAGE ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 14108
;;;   at (DEFUN PUT-RAW-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 14108
;;;   at (DEFUN PUT-RAW-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 14108
;;;   at (DEFUN PUT-RAW-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 14108
;;;   at (DEFUN PUT-RAW-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 14108
;;;   at (DEFUN PUT-RAW-IMAGE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN GET-RAW-IMAGE ...).
;;; Note:
;;;   in file GRAPHICS.LISP, position 15327
;;;   at (DEFUN GET-RAW-IMAGE ...)
;;;   Checking type of #:LET740 to be DISPLAY
;;; Note:
;;;   in file GRAPHICS.LISP, position 15327
;;;   at (DEFUN GET-RAW-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 15327
;;;   at (DEFUN GET-RAW-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file GRAPHICS.LISP, position 15327
;;;   at (DEFUN GET-RAW-IMAGE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file GRAPHICS.LISP, position 15327
;;;   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 15327
;;;   at (DEFUN GET-RAW-IMAGE ...)
;;;   Checking type of #:LET793 to be REPLY-BUFFER
;;; Note:
;;;   in file GRAPHICS.LISP, position 15327
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1882
;;;   at (DEFUN TRANSLATE-DEFAULT ...)
;;;   Inlining CHAR->CARD8
;;; Note:
;;;   in file TEXT.LISP, position 1882
;;;   at (DEFUN TRANSLATE-DEFAULT ...)
;;;   Checking type of #:G8 to be BASE-CHAR
;;; Note:
;;;   in file TEXT.LISP, position 1882
;;;   at (DEFUN TRANSLATE-DEFAULT ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 1882
;;;   at (DEFUN TRANSLATE-DEFAULT ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX J) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 1882
;;;   at (DEFUN TRANSLATE-DEFAULT ...)
;;;   Inlining CHAR->CARD8
;;; Note:
;;;   in file TEXT.LISP, position 1882
;;;   at (DEFUN TRANSLATE-DEFAULT ...)
;;;   Checking type of #:G28 to be BASE-CHAR
;;; Note:
;;;   in file TEXT.LISP, position 1882
;;;   at (DEFUN TRANSLATE-DEFAULT ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX I) 1)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 1882
;;;   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 4847
;;;   at (DEFUN TEXT-EXTENTS ...)
;;;   Checking type of (GCONTEXT-FONT FONT T) to be (OR FONT GCONTEXT)
;;; Note:
;;;   in file TEXT.LISP, position 4847
;;;   at (DEFUN TEXT-EXTENTS ...)
;;;   Checking type of (SI:DO-CHECK-TYPE #:G44 'FONT 'NIL 'FONT) to be (OR FONT GCONTEXT)
;;; Note:
;;;   in file TEXT.LISP, position 4847
;;;   at (DEFUN TEXT-EXTENTS ...)
;;;   Checking type of 0 to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 4847
;;;   at (DEFUN TEXT-EXTENTS ...)
;;;   Checking type of 0 to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 4847
;;;   at (DEFUN TEXT-EXTENTS ...)
;;;   Checking type of (FONT-ASCENT FONT) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 4847
;;;   at (DEFUN TEXT-EXTENTS ...)
;;;   Checking type of (FONT-DESCENT FONT) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 4847
;;;   at (DEFUN TEXT-EXTENTS ...)
;;;   Checking type of (FONT-DISPLAY FONT) to be DISPLAY
;;; Compiling (DEFUN TEXT-WIDTH ...).
;;; Note:
;;;   in file TEXT.LISP, position 8826
;;;   at (DEFUN TEXT-WIDTH ...)
;;;   Checking type of (GCONTEXT-FONT FONT T) to be (OR FONT GCONTEXT)
;;; Note:
;;;   in file TEXT.LISP, position 8826
;;;   at (DEFUN TEXT-WIDTH ...)
;;;   Checking type of (SI:DO-CHECK-TYPE #:G88 'FONT 'NIL 'FONT) to be (OR FONT GCONTEXT)
;;; Note:
;;;   in file TEXT.LISP, position 8826
;;;   at (DEFUN TEXT-WIDTH ...)
;;;   Checking type of (FONT-DISPLAY FONT) to be DISPLAY
;;; Compiling (DEFUN TEXT-EXTENTS-SERVER ...).
;;; Note:
;;;   in file TEXT.LISP, position 10840
;;;   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 10840
;;;   at (DEFUN TEXT-EXTENTS-SERVER ...)
;;;   Checking type of #:LET120 to be DISPLAY
;;; Note:
;;;   in file TEXT.LISP, position 10840
;;;   at (DEFUN TEXT-EXTENTS-SERVER ...)
;;;   Checking type of #:LET122 to be RESOURCE-ID
;;; Note:
;;;   in file TEXT.LISP, position 10840
;;;   at (DEFUN TEXT-EXTENTS-SERVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 10840
;;;   at (DEFUN TEXT-EXTENTS-SERVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 10840
;;;   at (DEFUN TEXT-EXTENTS-SERVER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file TEXT.LISP, position 10840
;;;   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 10840
;;;   at (DEFUN TEXT-EXTENTS-SERVER ...)
;;;   Checking type of #:LET181 to be REPLY-BUFFER
;;; Note:
;;;   in file TEXT.LISP, position 10840
;;;   at (DEFUN TEXT-EXTENTS-SERVER ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN TEXT-WIDTH-SERVER ...).
;;; Note:
;;;   in file TEXT.LISP, position 11728
;;;   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 11728
;;;   at (DEFUN TEXT-WIDTH-SERVER ...)
;;;   Checking type of #:LET186 to be DISPLAY
;;; Note:
;;;   in file TEXT.LISP, position 11728
;;;   at (DEFUN TEXT-WIDTH-SERVER ...)
;;;   Checking type of #:LET188 to be RESOURCE-ID
;;; Note:
;;;   in file TEXT.LISP, position 11728
;;;   at (DEFUN TEXT-WIDTH-SERVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 11728
;;;   at (DEFUN TEXT-WIDTH-SERVER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 11728
;;;   at (DEFUN TEXT-WIDTH-SERVER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file TEXT.LISP, position 11728
;;;   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 11728
;;;   at (DEFUN TEXT-WIDTH-SERVER ...)
;;;   Checking type of #:LET247 to be REPLY-BUFFER
;;; Compiling (DEFUN TEXT-EXTENTS-LOCAL ...).
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (FONT-CHAR-INFOS FONT) to be (SIMPLE-ARRAY INT16 (*))
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (FONT-FONT-INFO FONT) to be FONT-INFO
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (MAX-CHAR-WIDTH FONT) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (MAX-CHAR-ASCENT FONT) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (MAX-CHAR-DESCENT FONT) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of START to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of START to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (* (INDEX- END START) FONT-WIDTH) to be INT32
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of START to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of START to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (FONT-INFO-MIN-BYTE2 FONT-INFO) to be CARD8
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (FONT-INFO-MIN-BYTE1 FONT-INFO) to be CARD8
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (FONT-INFO-MAX-BYTE1 FONT-INFO) to be CARD8
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (1+ (- LAST-ROW FIRST-ROW)) to be CARD16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of #:LET347 to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (ELT SEQUENCE I) to be CARD16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (- (ASH CHAR -8) FIRST-ROW) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (- (LOGAND CHAR 255) FIRST-COL) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (+ WIDTH #:G467) to be INT32
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of #:LET483 to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of #:LET485 to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of #:LET486 to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (ELT SEQUENCE I) to be CARD16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (- (ASH CHAR -8) FIRST-ROW) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (- (LOGAND CHAR 255) FIRST-COL) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of ROW to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (MIN LEFT (+ WIDTH (AREF CHAR-INFOS N))) to be INT32
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (+ WIDTH #:G617) to be INT32
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of #:LET646 to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (ELT SEQUENCE I) to be CARD16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (- (THE CARD16 (ELT SEQUENCE I)) FIRST-COL) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (ELT SEQUENCE I) to be CARD16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (VALUES (* 6 (THE ARRAY-INDEX COL))) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (+ WIDTH #:G686) to be INT32
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of #:LET702 to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of #:LET704 to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of #:LET705 to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (ELT SEQUENCE I) to be CARD16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (- (THE CARD16 (ELT SEQUENCE I)) FIRST-COL) to be INT16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (ELT SEQUENCE I) to be CARD16
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (VALUES (* 6 (THE ARRAY-INDEX COL))) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of COL to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (MIN LEFT (+ WIDTH (AREF CHAR-INFOS N))) to be INT32
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (+ WIDTH #:G756) to be INT32
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   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 12415
;;;   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 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of (VALUES (1+ (THE ARRAY-INDEX I))) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 12415
;;;   at (DEFUN TEXT-EXTENTS-LOCAL ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Compiling (DEFUN DRAW-GLYPH ...).
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Checking type of (ALLOCATE-GCONTEXT-STATE) to be GCONTEXT-STATE
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Checking type of NEW-START to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Checking type of TRANSLATE-WIDTH to be (OR NULL INT32)
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 18326
;;;   at (DEFUN DRAW-GLYPH ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-GLYPHS ...).
;;; Compiling (DEFUN DRAW-GLYPHS8 ...).
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Checking type of (OR END (LENGTH SEQUENCE)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   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 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 21194
;;;   at (DEFUN DRAW-GLYPHS8 ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-GLYPHS16 ...).
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Checking type of (OR END (LENGTH SEQUENCE)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   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 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Checking type of (DISPLAY-TBUF16 DISPLAY) to be BUFFER-TEXT16
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 25372
;;;   at (DEFUN DRAW-GLYPHS16 ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-IMAGE-GLYPH ...).
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Checking type of (ALLOCATE-GCONTEXT-STATE) to be GCONTEXT-STATE
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Checking type of NEW-START to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Checking type of TRANSLATE-WIDTH to be (OR NULL INT32)
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 29518
;;;   at (DEFUN DRAW-IMAGE-GLYPH ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN DRAW-IMAGE-GLYPHS ...).
;;; Note:
;;;   in file TEXT.LISP, position 31434
;;;   at (DEFUN DRAW-IMAGE-GLYPHS ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX START) 255)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 31434
;;;   at (DEFUN DRAW-IMAGE-GLYPHS ...)
;;;   Checking type of (OR END (LENGTH SEQUENCE)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 31434
;;;   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 31434
;;;   at (DEFUN DRAW-IMAGE-GLYPHS ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX START) 255)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 31434
;;;   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 32902
;;;   at (DEFUN DRAW-IMAGE-GLYPHS8 ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file TEXT.LISP, position 32902
;;;   at (DEFUN DRAW-IMAGE-GLYPHS8 ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 32902
;;;   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 32902
;;;   at (DEFUN DRAW-IMAGE-GLYPHS8 ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 32902
;;;   at (DEFUN DRAW-IMAGE-GLYPHS8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 32902
;;;   at (DEFUN DRAW-IMAGE-GLYPHS8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 32902
;;;   at (DEFUN DRAW-IMAGE-GLYPHS8 ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file TEXT.LISP, position 32902
;;;   at (DEFUN DRAW-IMAGE-GLYPHS8 ...)
;;;   Checking type of CHUNK to be ARRAY-INDEX
;;; Compiling (DEFUN DRAW-IMAGE-GLYPHS16 ...).
;;; Note:
;;;   in file TEXT.LISP, position 35689
;;;   at (DEFUN DRAW-IMAGE-GLYPHS16 ...)
;;;   Checking type of (GCONTEXT-DISPLAY GCONTEXT) to be DISPLAY
;;; Note:
;;;   in file TEXT.LISP, position 35689
;;;   at (DEFUN DRAW-IMAGE-GLYPHS16 ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 35689
;;;   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 35689
;;;   at (DEFUN DRAW-IMAGE-GLYPHS16 ...)
;;;   Checking type of END to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 35689
;;;   at (DEFUN DRAW-IMAGE-GLYPHS16 ...)
;;;   Checking type of (BUFFER-TBUF16 DISPLAY) to be BUFFER-TEXT16
;;; Note:
;;;   in file TEXT.LISP, position 35689
;;;   at (DEFUN DRAW-IMAGE-GLYPHS16 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 35689
;;;   at (DEFUN DRAW-IMAGE-GLYPHS16 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 35689
;;;   at (DEFUN DRAW-IMAGE-GLYPHS16 ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file TEXT.LISP, position 35689
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of KEYCODES-PER-MODIFIER to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   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 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Checking type of #:LET2225 to be REPLY-BUFFER
;;; Note:
;;;   in file TEXT.LISP, position 39134
;;;   at (DEFUN SET-MODIFIER-MAPPING ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN MODIFIER-MAPPING ...).
;;; Note:
;;;   in file TEXT.LISP, position 40420
;;;   at (DEFUN MODIFIER-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 40420
;;;   at (DEFUN MODIFIER-MAPPING ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file TEXT.LISP, position 40420
;;;   at (DEFUN MODIFIER-MAPPING ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file TEXT.LISP, position 40420
;;;   at (DEFUN MODIFIER-MAPPING ...)
;;;   Checking type of #:LET2273 to be REPLY-BUFFER
;;; Note:
;;;   in file TEXT.LISP, position 40420
;;;   at (DEFUN MODIFIER-MAPPING ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 40420
;;;   at (DEFUN MODIFIER-MAPPING ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 40420
;;;   at (DEFUN MODIFIER-MAPPING ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN CHANGE-KEYBOARD-MAPPING ...).
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Checking type of (OR END (ARRAY-DIMENSION KEYSYMS 0)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   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 41242
;;;   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 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Checking type of SIZE to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX SIZE) 2)) to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Checking type of SIZE to be ARRAY-INDEX
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 41242
;;;   at (DEFUN CHANGE-KEYBOARD-MAPPING ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN KEYBOARD-MAPPING ...).
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   at (DEFUN KEYBOARD-MAPPING ...)
;;;   Checking type of (DISPLAY-MIN-KEYCODE DISPLAY) to be (OR NULL CARD8)
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   at (DEFUN KEYBOARD-MAPPING ...)
;;;   Checking type of (1+ (DISPLAY-MAX-KEYCODE DISPLAY)) to be (OR NULL ARRAY-INDEX)
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   at (DEFUN KEYBOARD-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   at (DEFUN KEYBOARD-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   at (DEFUN KEYBOARD-MAPPING ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   at (DEFUN KEYBOARD-MAPPING ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   at (DEFUN KEYBOARD-MAPPING ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   at (DEFUN KEYBOARD-MAPPING ...)
;;;   Checking type of #:LET2483 to be REPLY-BUFFER
;;; Note:
;;;   in file TEXT.LISP, position 42695
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 2311
;;;   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 2453
;;;   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 6186
;;;   at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...)
;;;   Checking type of *WINDOW-ATTRIBUTES* to be LIST
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 6186
;;;   at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...)
;;;   Checking type of (CDDR #:G102) to be CONS
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 6186
;;;   at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 6186
;;;   at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 6186
;;;   at (DEFUN CHANGE-WINDOW-ATTRIBUTE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN CHANGE-DRAWABLE-GEOMETRY ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 7381
;;;   at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...)
;;;   Checking type of *WINDOW-ATTRIBUTES* to be LIST
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 7381
;;;   at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...)
;;;   Checking type of (CDDDDR #:G170) to be CONS
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 7381
;;;   at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 7381
;;;   at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 7381
;;;   at (DEFUN CHANGE-DRAWABLE-GEOMETRY ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 8448
;;;   at (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...)
;;;   Checking type of *WINDOW-ATTRIBUTES* to be LIST
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 8448
;;;   at (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 8448
;;;   at (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 8448
;;;   at (DEFUN GET-WINDOW-ATTRIBUTES-BUFFER ...)
;;;   Inlining BUFFER-REPLACE
;;; Compiling (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 9741
;;;   at (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...)
;;;   Checking type of *WINDOW-ATTRIBUTES* to be LIST
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 9741
;;;   at (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 9741
;;;   at (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 9741
;;;   at (DEFUN GET-DRAWABLE-GEOMETRY-BUFFER ...)
;;;   Inlining BUFFER-REPLACE
;;; Compiling (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 10884
;;;   at (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 10884
;;;   at (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...)
;;;   Checking type of (AREF CHANGES 0) to be MASK32
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 10884
;;;   at (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 10884
;;;   at (DEFUN PUT-WINDOW-ATTRIBUTE-CHANGES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 11959
;;;   at (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...)
;;;   Checking type of (WINDOW-DISPLAY WINDOW) to be DISPLAY
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 11959
;;;   at (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...)
;;;   Checking type of (AREF CHANGES 0) to be MASK16
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 11959
;;;   at (DEFUN PUT-DRAWABLE-GEOMETRY-CHANGES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 11959
;;;   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 14018
;;;   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 14182
;;;   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 14390
;;;   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 15955
;;;   at (DEFUN WINDOW-BIT-GRAVITY ...)
;;;   Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 15955
;;;   at (DEFUN WINDOW-BIT-GRAVITY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN SET-WINDOW-BIT-GRAVITY ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 16164
;;;   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 16376
;;;   at (DEFUN WINDOW-GRAVITY ...)
;;;   Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 16376
;;;   at (DEFUN WINDOW-GRAVITY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN SET-WINDOW-GRAVITY ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 16581
;;;   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 16781
;;;   at (DEFUN WINDOW-BACKING-STORE ...)
;;;   Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 16781
;;;   at (DEFUN WINDOW-BACKING-STORE ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN SET-WINDOW-BACKING-STORE ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 17026
;;;   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 17240
;;;   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 17602
;;;   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 17957
;;;   at (DEFUN WINDOW-SAVE-UNDER ...)
;;;   Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 17957
;;;   at (DEFUN WINDOW-SAVE-UNDER ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN SET-WINDOW-SAVE-UNDER ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 18152
;;;   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 18330
;;;   at (DEFUN WINDOW-OVERRIDE-REDIRECT ...)
;;;   Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 18330
;;;   at (DEFUN WINDOW-OVERRIDE-REDIRECT ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN SET-WINDOW-OVERRIDE-REDIRECT ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 18532
;;;   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 18730
;;;   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 19129
;;;   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 19578
;;;   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 20568
;;;   at (DEFUN WINDOW-COLORMAP-INSTALLED-P ...)
;;;   Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 20568
;;;   at (DEFUN WINDOW-COLORMAP-INSTALLED-P ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN WINDOW-ALL-EVENT-MASKS ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 20751
;;;   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 20916
;;;   at (DEFUN WINDOW-MAP-STATE ...)
;;;   Checking type of (GET-WINDOW-ATTRIBUTES-BUFFER WINDOW) to be REPLY-BUFFER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 20916
;;;   at (DEFUN WINDOW-MAP-STATE ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN DRAWABLE-ROOT ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 21338
;;;   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 21526
;;;   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 21698
;;;   at (DEFUN SET-DRAWABLE-X ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 21698
;;;   at (DEFUN SET-DRAWABLE-X ...)
;;;   Checking type of #:G757 to be INT16
;;; Compiling (DEFUN DRAWABLE-Y ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 21838
;;;   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 22010
;;;   at (DEFUN SET-DRAWABLE-Y ...)
;;;   Inlining INT16->CARD16
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 22010
;;;   at (DEFUN SET-DRAWABLE-Y ...)
;;;   Checking type of #:G790 to be INT16
;;; Compiling (DEFUN DRAWABLE-WIDTH ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 22150
;;;   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 22530
;;;   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 22918
;;;   at (DEFUN DRAWABLE-DEPTH ...)
;;;   Checking type of (GET-DRAWABLE-GEOMETRY-BUFFER DRAWABLE) to be REPLY-BUFFER
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 22918
;;;   at (DEFUN DRAWABLE-DEPTH ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN DRAWABLE-BORDER-WIDTH ...).
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 23077
;;;   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 23449
;;;   at (DEFUN SET-WINDOW-PRIORITY ...)
;;;   Checking type of (LIST WINDOW NIL NIL NIL NIL) to be CONS
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 23449
;;;   at (DEFUN SET-WINDOW-PRIORITY ...)
;;;   Checking type of (LIST* #:G880 *WINDOW-ATTRIBUTES*) to be CONS
;;; Note:
;;;   in file ATTRIBUTES.LISP, position 23449
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 699
;;;   at (DEFUN DEFINE-KEYSYM-SET ...)
;;;   Checking type of #:G0 to be KEYSYM
;;; Note:
;;;   in file TRANSLATE.LISP, position 699
;;;   at (DEFUN DEFINE-KEYSYM-SET ...)
;;;   Checking type of #:G1 to be KEYSYM
;;; Compiling (DEFUN KEYSYM-SET ...).
;;; Compiling (DEFMACRO KEYSYM ...).
;;; Note:
;;;   in file TRANSLATE.LISP, position 1729
;;;   at (FSET 'KEYSYM ...)
;;;   Checking type of #:G30 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 3984
;;;   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 4220
;;;   at (DEFUN DEFINE-KEYSYM ...)
;;;   Checking type of #:G96 to be CONS
;;; Compiling (DEFUN UNDEFINE-KEYSYM ...).
;;; Note:
;;;   in file TRANSLATE.LISP, position 7852
;;;   at (DEFUN UNDEFINE-KEYSYM ...)
;;;   Checking type of #:G114 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 11668
;;;   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 13453
;;;   at (DEFUN MAPPING-MATCHES-P ...)
;;;   Checking type of 0 to be MASK16
;;; Note:
;;;   in file TRANSLATE.LISP, position 13453
;;;   at (DEFUN MAPPING-MATCHES-P ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G143)) to be SYMBOL
;;; Note:
;;;   in file TRANSLATE.LISP, position 13453
;;;   at (DEFUN MAPPING-MATCHES-P ...)
;;;   Checking type of +STATE-MASK-VECTOR+ to be SIMPLE-VECTOR
;;; Note:
;;;   in file TRANSLATE.LISP, position 13453
;;;   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 13453
;;;   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 13453
;;;   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 15286
;;;   at (DEFUN DEFAULT-KEYSYM-INDEX ...)
;;;   Checking type of (DISPLAY-KEYBOARD-MAPPING DISPLAY) to be (SIMPLE-ARRAY KEYSYM (* *))
;;; Note:
;;;   in file TRANSLATE.LISP, position 15286
;;;   at (DEFUN DEFAULT-KEYSYM-INDEX ...)
;;;   Checking type of (ARRAY-DIMENSION MAPPING 1) to be CARD8
;;; Note:
;;;   in file TRANSLATE.LISP, position 15286
;;;   at (DEFUN DEFAULT-KEYSYM-INDEX ...)
;;;   Checking type of (IF SYMBOLP 2 0) to be CARD8
;;; Note:
;;;   in file TRANSLATE.LISP, position 15286
;;;   at (DEFUN DEFAULT-KEYSYM-INDEX ...)
;;;   Checking type of (+ RESULT #:G178) to be CARD8
;;; Compiling (DEFUN KEYSYM-SHIFT-P ...).
;;; Compiling (DEFUN KEYCODE->CHARACTER ...).
;;; Note:
;;;   in file TRANSLATE.LISP, position 18690
;;;   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 18690
;;;   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 21718
;;;   at (DEFUN KEYSYM-IN-MAP-P ...)
;;;   Checking type of (DISPLAY-MIN-KEYCODE DISPLAY) to be CARD8
;;; Note:
;;;   in file TRANSLATE.LISP, position 21718
;;;   at (DEFUN KEYSYM-IN-MAP-P ...)
;;;   Checking type of (DISPLAY-MAX-KEYCODE DISPLAY) to be CARD8
;;; Note:
;;;   in file TRANSLATE.LISP, position 21718
;;;   at (DEFUN KEYSYM-IN-MAP-P ...)
;;;   Checking type of (DISPLAY-KEYBOARD-MAPPING DISPLAY) to be (SIMPLE-ARRAY KEYSYM (* *))
;;; Note:
;;;   in file TRANSLATE.LISP, position 21718
;;;   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 22473
;;;   at (DEFUN CHARACTER-IN-MAP-P ...)
;;;   Checking type of (DISPLAY-MIN-KEYCODE DISPLAY) to be CARD8
;;; Note:
;;;   in file TRANSLATE.LISP, position 22473
;;;   at (DEFUN CHARACTER-IN-MAP-P ...)
;;;   Checking type of (DISPLAY-MAX-KEYCODE DISPLAY) to be CARD8
;;; Note:
;;;   in file TRANSLATE.LISP, position 22473
;;;   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 23254
;;;   at (DEFUN KEYSYM->KEYCODES ...)
;;;   Checking type of (DISPLAY-MIN-KEYCODE DISPLAY) to be CARD8
;;; Note:
;;;   in file TRANSLATE.LISP, position 23254
;;;   at (DEFUN KEYSYM->KEYCODES ...)
;;;   Checking type of (DISPLAY-MAX-KEYCODE DISPLAY) to be CARD8
;;; Note:
;;;   in file TRANSLATE.LISP, position 23254
;;;   at (DEFUN KEYSYM->KEYCODES ...)
;;;   Checking type of (DISPLAY-KEYBOARD-MAPPING DISPLAY) to be (SIMPLE-ARRAY KEYSYM (* *))
;;; Note:
;;;   in file TRANSLATE.LISP, position 23254
;;;   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 #:G123.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1768
;;;   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 1768
;;;   at (DEFUN GET-WM-CLASS ...)
;;;   Checking type of VALUE to be (VECTOR CARD8)
;;; Note:
;;;   in file MANAGER.LISP, position 1768
;;;   at (DEFUN GET-WM-CLASS ...)
;;;   Checking type of VALUE to be (VECTOR CARD8)
;;; Note:
;;;   in file MANAGER.LISP, position 1768
;;;   at (DEFUN GET-WM-CLASS ...)
;;;   Checking type of VALUE to be (VECTOR CARD8)
;;; Note:
;;;   in file MANAGER.LISP, position 1768
;;;   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 3543
;;;   at (DEFUN SET-WM-COMMAND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5) to be LIST
;;; Note:
;;;   in file MANAGER.LISP, position 3543
;;;   at (DEFUN SET-WM-COMMAND ...)
;;;   Checking type of #:G10 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 5383
;;;   at (DEFUN DECODE-WM-HINTS ...)
;;;   Checking type of #:LET49 to be CARD32
;;; Note:
;;;   in file MANAGER.LISP, position 5383
;;;   at (DEFUN DECODE-WM-HINTS ...)
;;;   Checking type of #:LET50 to be WM-HINTS
;;; Note:
;;;   in file MANAGER.LISP, position 5383
;;;   at (DEFUN DECODE-WM-HINTS ...)
;;;   Checking type of (READ-CARD29 (AREF VECTOR 1)) to be (INTEGER 0 (2))
;;; Note:
;;;   in file MANAGER.LISP, position 5383
;;;   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 6838
;;;   at (DEFUN ENCODE-WM-HINTS ...)
;;;   Checking type of #:LET200 to be (SIMPLE-VECTOR 9)
;;; Note:
;;;   in file MANAGER.LISP, position 6838
;;;   at (DEFUN ENCODE-WM-HINTS ...)
;;;   Checking type of #:LET201 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 6838
;;;   at (DEFUN ENCODE-WM-HINTS ...)
;;;   Checking type of INPUT-HINT to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 6838
;;;   at (DEFUN ENCODE-WM-HINTS ...)
;;;   Checking type of (LOGIOR FLAGS STATE-HINT) to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 6838
;;;   at (DEFUN ENCODE-WM-HINTS ...)
;;;   Checking type of (LOGIOR FLAGS ICON-PIXMAP-HINT) to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 6838
;;;   at (DEFUN ENCODE-WM-HINTS ...)
;;;   Checking type of (LOGIOR FLAGS ICON-WINDOW-HINT) to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 6838
;;;   at (DEFUN ENCODE-WM-HINTS ...)
;;;   Checking type of (LOGIOR FLAGS ICON-POSITION-HINT) to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 6838
;;;   at (DEFUN ENCODE-WM-HINTS ...)
;;;   Checking type of (LOGIOR FLAGS ICON-MASK-HINT) to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 6838
;;;   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 11086
;;;   at (DEFUN DECODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:LET505 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 11086
;;;   at (DEFUN DECODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:LET506 to be WM-SIZE-HINTS
;;; Note:
;;;   in file MANAGER.LISP, position 11086
;;;   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 11086
;;;   at (DEFUN DECODE-WM-SIZE-HINTS ...)
;;;   Inlining CARD32->INT32
;;; Note:
;;;   in file MANAGER.LISP, position 11086
;;;   at (DEFUN DECODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G573 to be CARD32
;;; Note:
;;;   in file MANAGER.LISP, position 11086
;;;   at (DEFUN DECODE-WM-SIZE-HINTS ...)
;;;   Inlining CARD32->INT32
;;; Note:
;;;   in file MANAGER.LISP, position 11086
;;;   at (DEFUN DECODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G579 to be CARD32
;;; Compiling (DEFUN ENCODE-WM-SIZE-HINTS ...).
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:LET589 to be (SIMPLE-VECTOR 18)
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:LET590 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G591 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G610 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G629 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G648 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G667 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G692 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G717 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G744 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G777 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G802 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G845 to be CARD16
;;; Note:
;;;   in file MANAGER.LISP, position 13141
;;;   at (DEFUN ENCODE-WM-SIZE-HINTS ...)
;;;   Checking type of #:G870 to be CARD16
;;; Compiling (DEFUN ICON-SIZES ...).
;;; Note:
;;;   in file MANAGER.LISP, position 16126
;;;   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 24435
;;;   at (DEFUN ICONIFY-WINDOW ...)
;;;   Checking type of (SCREEN-ROOT SCREEN) to be WINDOW
;;; Compiling (DEFUN WITHDRAW-WINDOW ...).
;;; Note:
;;;   in file MANAGER.LISP, position 24754
;;;   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 25555
;;;   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 28395
;;;   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 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 #:G899.
;;; Emitting code for SET-WM-PROTOCOLS.
;;; Emitting code for #:G900.
;;; Emitting code for WM-COLORMAP-WINDOWS.
;;; Emitting code for #:G901.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DATA to be BUFFER-BYTES
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (OR BITS-PER-PIXEL 1) to be (OR NULL CARD8)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (OR PAD 8) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BITS-PER-PIXEL to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BITS-PER-PIXEL to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   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 3551
;;;   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 3551
;;;   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 3551
;;;   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 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of +IMAGE-UNIT+ to be (OR NULL (MEMBER 8 16 32))
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of 0 to be (OR NULL CARD8)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DATA to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (LENGTH DATA) to be (OR NULL CARD8)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (ARRAY-DIMENSION (CAR DATA) 1) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (ARRAY-DIMENSION (CAR DATA) 0) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DATA to be PIXARRAY
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (ARRAY-DIMENSION DATA 1) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (ARRAY-DIMENSION DATA 0) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DATA to be BUFFER-BYTES
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (OR BITS-PER-PIXEL 1) to be (OR NULL CARD8)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DEPTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (OR PAD 8) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BITS-PER-PIXEL to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BITS-PER-PIXEL to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   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 3551
;;;   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 3551
;;;   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 3551
;;;   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 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of +IMAGE-UNIT+ to be (OR NULL (MEMBER 8 16 32))
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of BYTES-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of PAD to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of 0 to be (OR NULL CARD8)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DATA to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (LENGTH DATA) to be (OR NULL CARD8)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (ARRAY-DIMENSION (CAR DATA) 1) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (ARRAY-DIMENSION (CAR DATA) 0) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of DATA to be PIXARRAY
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (ARRAY-DIMENSION DATA 1) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   at (DEFUN CREATE-IMAGE ...)
;;;   Checking type of (ARRAY-DIMENSION DATA 0) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 3551
;;;   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 7853
;;;   at (DEFUN IMAGE-NOSWAP ...)
;;;   Inlining BUFFER-REPLACE
;;; Note:
;;;   in file IMAGE.LISP, position 7853
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 28744
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   at (DEFUN READ-PIXARRAY-INTERNAL ...)
;;;   Checking type of (REPLY-IBUF8 .REPLY-BUFFER.) to be BUFFER-BYTES
;;; Note:
;;;   in file IMAGE.LISP, position 40302
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   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 40302
;;;   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 42795
;;;   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 42795
;;;   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 42795
;;;   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 42795
;;;   at (DEFUN READ-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of 0 to be IMAGE-DEPTH
;;; Note:
;;;   in file IMAGE.LISP, position 42795
;;;   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 42795
;;;   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 42795
;;;   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 42795
;;;   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 42795
;;;   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 42795
;;;   at (DEFUN READ-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (INDEX1+ PLANE) to be IMAGE-DEPTH
;;; Note:
;;;   in file IMAGE.LISP, position 42795
;;;   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 44276
;;;   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 44276
;;;   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 44276
;;;   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 44276
;;;   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 44276
;;;   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 45626
;;;   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 45626
;;;   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 45626
;;;   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 45626
;;;   at (DEFUN READ-IMAGE-XY ...)
;;;   Checking type of DATA to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 45626
;;;   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 45626
;;;   at (DEFUN READ-IMAGE-XY ...)
;;;   Checking type of 0 to be IMAGE-DEPTH
;;; Note:
;;;   in file IMAGE.LISP, position 45626
;;;   at (DEFUN READ-IMAGE-XY ...)
;;;   Checking type of #:G1609 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 45626
;;;   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 45626
;;;   at (DEFUN READ-IMAGE-XY ...)
;;;   Checking type of #:G1611 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 45626
;;;   at (DEFUN READ-IMAGE-XY ...)
;;;   Checking type of (1+ PLANE) to be IMAGE-DEPTH
;;; Note:
;;;   in file IMAGE.LISP, position 45626
;;;   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 45626
;;;   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 45626
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 47151
;;;   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 48638
;;;   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 48638
;;;   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 48638
;;;   at (DEFUN GET-IMAGE ...)
;;;   Checking type of 4294967295 to be (OR NULL PIXEL)
;;; Note:
;;;   in file IMAGE.LISP, position 48638
;;;   at (DEFUN GET-IMAGE ...)
;;;   Checking type of #:LET1709 to be DISPLAY
;;; Note:
;;;   in file IMAGE.LISP, position 48638
;;;   at (DEFUN GET-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file IMAGE.LISP, position 48638
;;;   at (DEFUN GET-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file IMAGE.LISP, position 48638
;;;   at (DEFUN GET-IMAGE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file IMAGE.LISP, position 48638
;;;   at (DEFUN GET-IMAGE ...)
;;;   Checking type of (READ-REPLY .DISPLAY. .PENDING-COMMAND.) to be (OR NULL REPLY-BUFFER)
;;; Note:
;;;   in file IMAGE.LISP, position 48638
;;;   at (DEFUN GET-IMAGE ...)
;;;   Checking type of #:LET1768 to be REPLY-BUFFER
;;; Note:
;;;   in file IMAGE.LISP, position 48638
;;;   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 60309
;;;   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 60309
;;;   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 60309
;;;   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 60309
;;;   at (DEFUN WRITE-PIXARRAY-INTERNAL ...)
;;;   Checking type of (REPLY-IBUF8 .REPLY-BUFFER.) to be BUFFER-BYTES
;;; Note:
;;;   in file IMAGE.LISP, position 60309
;;;   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 60309
;;;   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 60309
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 62863
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G2391) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G2391) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2392 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   ! The variable #:G2393 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G2429) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G2429) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2430 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   ! The variable #:G2431 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2472 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G2472) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2472 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2504 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G2504) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2504 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2541 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G2541) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2541 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2563 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G2563) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2563 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G2776) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G2776) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2777 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   ! The variable #:G2778 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G2814) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G2814) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2815 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   ! The variable #:G2816 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2857 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G2857) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2857 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2889 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G2889) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2889 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2926 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G2926) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2926 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 65352
;;;   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 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G2948 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   at (DEFUN WRITE-XY-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G2948) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 65352
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 66848
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3183) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3183) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3184 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   ! The variable #:G3185 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3221) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3221) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3222 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   ! The variable #:G3223 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3264 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3264) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3264 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3296 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3296) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3296 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3333 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3333) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3333 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 69151
;;;   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 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of #:G3355 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   at (DEFUN WRITE-Z-FORMAT-IMAGE-X ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3355) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 69151
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G3382)) to be PIXARRAY-1
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3503) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3503) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3504 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   ! The variable #:G3505 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3541) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3541) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3542 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   ! The variable #:G3543 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3584 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3584) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3584 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3616 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3616) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3616 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3653 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3653) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3653 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   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 70375
;;;   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 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3675 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3675) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 70375
;;;   at (DEFUN WRITE-IMAGE-XY ...)
;;;   Checking type of #:G3675 to be ARRAY-INDEX
;;; Compiling (DEFUN WRITE-IMAGE-Z ...).
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-SIZE DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:LET3703 to be (MEMBER 1 4 8 16 24 32)
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3820) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3820) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3821 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   ! The variable #:G3822 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3858) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (BUFFER-BOFFSET #:G3858) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3859 to be ARRAY-INDEX
;;; Style warning:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   ! The variable #:G3860 is not used.
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3901 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3901) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3901 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3933 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3933) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3933 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3970 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3970) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3970 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   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 71604
;;;   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 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3992 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of (THE ARRAY-INDEX #:G3992) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 71604
;;;   at (DEFUN WRITE-IMAGE-Z ...)
;;;   Checking type of #:G3992 to be ARRAY-INDEX
;;; Compiling (DEFUN PUT-IMAGE ...).
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE to be IMAGE-X
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE to be IMAGE-X
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE to be IMAGE-X
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE to be IMAGE-X
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE to be IMAGE-X
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE to be IMAGE-X
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (IMAGE-WIDTH IMAGE) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE-WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE-WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE-WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE-WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE-HEIGHT to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE-HEIGHT to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE-HEIGHT to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of IMAGE-HEIGHT to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be IMAGE-DEPTH
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (DRAWABLE-DISPLAY DRAWABLE) to be DISPLAY
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (DISPLAY-BITMAP-FORMAT DISPLAY) to be BITMAP-FORMAT
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (BITMAP-FORMAT-UNIT BITMAP-FORMAT) to be (MEMBER 8 16 32)
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of HEIGHT to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (INDEX- SRC-X LEFT-PAD) to be INT16
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (INDEX+ WIDTH LEFT-PAD) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   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 72949
;;;   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 72949
;;;   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 72949
;;;   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 72949
;;;   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 72949
;;;   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 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (DISPLAY-MAX-REQUEST-LENGTH DISPLAY) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of SRC-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of HEIGHT-REMAINING to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of HEIGHT-REMAINING to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (INDEX-CEILING REQUEST-BYTES 4) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX REQUEST-WORDS) 6)) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (INDEX+ REQUEST-WORDS 6) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (VALUES (+ (THE ARRAY-INDEX REQUEST-WORDS) 6)) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of REQUEST-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of REQUEST-Y to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of (- HEIGHT-REMAINING REQUEST-HEIGHT) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   at (DEFUN PUT-IMAGE ...)
;;;   Checking type of HEIGHT-REMAINING to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 72949
;;;   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 72949
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   at (DEFUN XY-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PLANE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 79981
;;;   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 79981
;;;   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 81794
;;;   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 81794
;;;   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 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of PADDED-X to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   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 81794
;;;   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 81794
;;;   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 81794
;;;   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 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of BITS-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of BITS-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of BITS-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of BITS-PER-LINE to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   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 81794
;;;   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 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 81794
;;;   at (DEFUN Z-FORMAT-IMAGE-X->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 81794
;;;   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 83857
;;;   at (DEFUN IMAGE-X->IMAGE-XY ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 83857
;;;   at (DEFUN IMAGE-X->IMAGE-XY ...)
;;;   Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 83857
;;;   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 83857
;;;   at (DEFUN IMAGE-X->IMAGE-XY ...)
;;;   Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 83857
;;;   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 83857
;;;   at (DEFUN IMAGE-X->IMAGE-XY ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 83857
;;;   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 83857
;;;   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 83857
;;;   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 84634
;;;   at (DEFUN IMAGE-X->IMAGE-Z ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 84634
;;;   at (DEFUN IMAGE-X->IMAGE-Z ...)
;;;   Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 84634
;;;   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 84634
;;;   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 85378
;;;   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 85378
;;;   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 85378
;;;   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 85378
;;;   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 85378
;;;   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 85378
;;;   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 86940
;;;   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 86940
;;;   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 86940
;;;   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 86940
;;;   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 86940
;;;   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 86940
;;;   at (DEFUN IMAGE-XY->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 86940
;;;   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 86940
;;;   at (DEFUN IMAGE-XY->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 86940
;;;   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 86940
;;;   at (DEFUN IMAGE-XY->IMAGE-X ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 86940
;;;   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 86940
;;;   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 86940
;;;   at (DEFUN IMAGE-XY->IMAGE-X ...)
;;;   Checking type of #:G5348 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 86940
;;;   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 86940
;;;   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 86940
;;;   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 88235
;;;   at (DEFUN IMAGE-XY->IMAGE-XY ...)
;;;   Checking type of #:LET5382 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 88235
;;;   at (DEFUN IMAGE-XY->IMAGE-XY ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST5378) to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 88235
;;;   at (DEFUN IMAGE-XY->IMAGE-XY ...)
;;;   Checking type of #:LOOP-LIST-TAIL5380 to be CONS
;;; Note:
;;;   in file IMAGE.LISP, position 88235
;;;   at (DEFUN IMAGE-XY->IMAGE-XY ...)
;;;   Checking type of #:G5383 to be PIXARRAY-1
;;; Compiling (DEFUN IMAGE-XY->IMAGE-Z ...).
;;; Compiling (DEFUN IMAGE-Z->IMAGE-X ...).
;;; Note:
;;;   in file IMAGE.LISP, position 88853
;;;   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 88853
;;;   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 88853
;;;   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 88853
;;;   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 88853
;;;   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 88853
;;;   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 88853
;;;   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 88853
;;;   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 88853
;;;   at (DEFUN IMAGE-Z->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 88853
;;;   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 88853
;;;   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 88853
;;;   at (DEFUN IMAGE-Z->IMAGE-X ...)
;;;   Checking type of (IMAGE-DEPTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 88853
;;;   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 88853
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (IMAGE-WIDTH IMAGE) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (OR WIDTH IMAGE-WIDTH) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (OR HEIGHT IMAGE-HEIGHT) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (1- IMAGE-WIDTH) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (1- IMAGE-HEIGHT) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-WIDTH X) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-WIDTH X) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-WIDTH X) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-WIDTH X) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-WIDTH X) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-WIDTH X) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-WIDTH X) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (MAX (THE FIXNUM (- IMAGE-WIDTH X)) 0) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-WIDTH X) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (MAX (THE FIXNUM (- IMAGE-HEIGHT Y)) 0) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (- IMAGE-HEIGHT Y) to be FIXNUM
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (IMAGE-X-HOT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (IMAGE-X-HOT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   at (DEFUN COPY-IMAGE ...)
;;;   Checking type of (IMAGE-Y-HOT IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 90704
;;;   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 90704
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:LET5597 to be STRING
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (READ-LINE FSTREAM) to be STRING
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (READ-KEYWORD LINE 8 NAME-END) to be STRINGABLE
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5603 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of NAME-END to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of NAME-END to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of IND-END to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of IND-END to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5637 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5642 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of BITS-PER-PIXEL to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of BITS-PER-PIXEL to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   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 92788
;;;   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 92788
;;;   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 92788
;;;   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 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (+ BYTE #:G5726) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (+ BYTE #:G5762) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5773 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (THE ARRAY-INDEX #:G5773) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5773 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of WIDTH to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5806 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (THE ARRAY-INDEX #:G5806) to be (OR NULL CARD16)
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5806 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (GETF PROPERTIES #:G5845 NIL) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (- (THE ARRAY-INDEX (GETF PROPERTIES #:G5845 NIL)) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (GETF PROPERTIES #:G5845 NIL) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5846 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5844 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5846 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   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 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (GETF PROPERTIES #:G5875 NIL) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (- (THE ARRAY-INDEX (GETF PROPERTIES #:G5875 NIL)) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of (GETF PROPERTIES #:G5875 NIL) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5876 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5874 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 92788
;;;   at (DEFUN READ-BITMAP-FILE ...)
;;;   Checking type of #:G5876 to be ARRAY-INDEX
;;; Compiling (DEFUN WRITE-BITMAP-FILE ...).
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (COPY-IMAGE IMAGE :RESULT-TYPE 'IMAGE-X) to be IMAGE
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (IMAGE-PLIST IMAGE) to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (OR NAME (IMAGE-NAME IMAGE) 'IMAGE) to be STRINGABLE
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (IMAGE-X-LEFT-PAD IMAGE) to be CARD8
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   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 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (INDEX+ (IMAGE-WIDTH IMAGE) LEFT-PAD) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   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 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (IMAGE-WIDTH IMAGE) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (IMAGE-HEIGHT IMAGE) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   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 96607
;;;   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 96607
;;;   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 96607
;;;   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 96607
;;;   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 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of 0 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (GETF PLIST #:G5976 NIL) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (+ (THE ARRAY-INDEX (GETF PLIST #:G5976 NIL)) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (GETF PLIST #:G5976 NIL) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of #:G5977 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of #:G5975 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of #:G5977 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   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 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (GETF PLIST #:G6006 NIL) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (+ (THE ARRAY-INDEX (GETF PLIST #:G6006 NIL)) (THE ARRAY-INDEX LEFT-PAD)) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (GETF PLIST #:G6006 NIL) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of #:G6007 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of #:G6005 to be LIST
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of #:G6007 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (ALLOCATE-REPLY-BUFFER LAST) to be REPLY-BUFFER
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (REPLY-IBUF8 .REPLY-BUFFER.) to be BUFFER-BYTES
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   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 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (+ (THE ARRAY-INDEX COUNT) 1) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of #:G6057 to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   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 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of (+ (THE ARRAY-INDEX COUNT) 1) to be ARRAY-INDEX
;;; Note:
;;;   in file IMAGE.LISP, position 96607
;;;   at (DEFUN WRITE-BITMAP-FILE ...)
;;;   Checking type of #:G6069 to be ARRAY-INDEX
;;; Compiling (DEFUN BITMAP-IMAGE ...).
;;; Note:
;;;   in file IMAGE.LISP, position 100007
;;;   at (DEFUN BITMAP-IMAGE ...)
;;;   Checking type of (LENGTH (FIRST PATTERNS)) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 100007
;;;   at (DEFUN BITMAP-IMAGE ...)
;;;   Checking type of (LENGTH PATTERNS) to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 100007
;;;   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 100007
;;;   at (DEFUN BITMAP-IMAGE ...)
;;;   Checking type of 0 to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 100007
;;;   at (DEFUN BITMAP-IMAGE ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G6097)) to be SIMPLE-BIT-VECTOR
;;; Note:
;;;   in file IMAGE.LISP, position 100007
;;;   at (DEFUN BITMAP-IMAGE ...)
;;;   Checking type of 0 to be CARD16
;;; Note:
;;;   in file IMAGE.LISP, position 100007
;;;   at (DEFUN BITMAP-IMAGE ...)
;;;   Checking type of (+ ROW #:G6112) 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 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 3393
;;;   at (DEFUN RESOURCE-KEY ...)
;;;   Checking type of STRINGABLE to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 3393
;;;   at (DEFUN RESOURCE-KEY ...)
;;;   Checking type of STRINGABLE to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 3393
;;;   at (DEFUN RESOURCE-KEY ...)
;;;   Checking type of STRINGABLE to be STRING
;;; Note:
;;;   in file RESOURCE.LISP, position 3393
;;;   at (DEFUN RESOURCE-KEY ...)
;;;   Checking type of STRINGABLE to be STRING
;;; Compiling (DEFUN STRINGABLE-EQUAL ...).
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of A to be STRING
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of B to be STRING
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of A to be STRING
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of B to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of A to be STRING
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of B to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of A to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of B to be STRING
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of A to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of B to be STRING
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   at (DEFUN STRINGABLE-EQUAL ...)
;;;   Checking type of A to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 3849
;;;   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 8596
;;;   at (DEFUN GET-ENTRY-LOOKUP ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G35)) to be RESOURCE-DATABASE
;;; Note:
;;;   in file RESOURCE.LISP, position 8596
;;;   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 9124
;;;   at (DEFUN GET-ENTRY ...)
;;;   Checking type of #:LET39 to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 9124
;;;   at (DEFUN GET-ENTRY ...)
;;;   Checking type of #:LET40 to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 9124
;;;   at (DEFUN GET-ENTRY ...)
;;;   Checking type of #:G46 to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 9124
;;;   at (DEFUN GET-ENTRY ...)
;;;   Checking type of #:G48 to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 9124
;;;   at (DEFUN GET-ENTRY ...)
;;;   Checking type of (CAR NAMES) to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 9124
;;;   at (DEFUN GET-ENTRY ...)
;;;   Checking type of (CAR CLASSES) to be SYMBOL
;;; Compiling (DEFUN GET-SEARCH-RESOURCE ...).
;;; Note:
;;;   in file RESOURCE.LISP, position 10192
;;;   at (DEFUN GET-SEARCH-RESOURCE ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G50)) to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 10192
;;;   at (DEFUN GET-SEARCH-RESOURCE ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G53)) to be RESOURCE-DATABASE
;;; Note:
;;;   in file RESOURCE.LISP, position 10192
;;;   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 11317
;;;   at (DEFUN GET-SEARCH-TABLE ...)
;;;   Checking type of (RESOURCE-DATABASE-TIGHT DATABASE) to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 11317
;;;   at (DEFUN GET-SEARCH-TABLE ...)
;;;   Checking type of (RESOURCE-DATABASE-LOOSE DATABASE) to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 11317
;;;   at (DEFUN GET-SEARCH-TABLE ...)
;;;   Checking type of #:G60 to be CONS
;;; Compiling (DEFUN GET-TABLES-LOOKUP ...).
;;; Note:
;;;   in file RESOURCE.LISP, position 12528
;;;   at (DEFUN GET-TABLES-LOOKUP ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G62)) to be RESOURCE-DATABASE
;;; Note:
;;;   in file RESOURCE.LISP, position 12528
;;;   at (DEFUN GET-TABLES-LOOKUP ...)
;;;   Checking type of #:LET65 to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 12528
;;;   at (DEFUN GET-TABLES-LOOKUP ...)
;;;   Checking type of #:LET66 to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 12528
;;;   at (DEFUN GET-TABLES-LOOKUP ...)
;;;   Checking type of #:G67 to be CONS
;;; Note:
;;;   in file RESOURCE.LISP, position 12528
;;;   at (DEFUN GET-TABLES-LOOKUP ...)
;;;   Checking type of #:G69 to be CONS
;;; Compiling (DEFUN GET-TABLES ...).
;;; Note:
;;;   in file RESOURCE.LISP, position 13411
;;;   at (DEFUN GET-TABLES ...)
;;;   Checking type of #:LET71 to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 13411
;;;   at (DEFUN GET-TABLES ...)
;;;   Checking type of #:LET72 to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 13411
;;;   at (DEFUN GET-TABLES ...)
;;;   Checking type of #:G74 to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 13411
;;;   at (DEFUN GET-TABLES ...)
;;;   Checking type of #:G76 to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 13411
;;;   at (DEFUN GET-TABLES ...)
;;;   Checking type of (CAR NAMES) to be SYMBOL
;;; Note:
;;;   in file RESOURCE.LISP, position 13411
;;;   at (DEFUN GET-TABLES ...)
;;;   Checking type of (CAR CLASSES) to be SYMBOL
;;; Compiling (DEFUN MAP-RESOURCE ...).
;;; Note:
;;;   in file RESOURCE.LISP, position 14354
;;;   at (DEFUN MAP-RESOURCE ...)
;;;   Checking type of #:LET78 to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 14354
;;;   at (DEFUN MAP-RESOURCE ...)
;;;   Checking type of #:LET79 to be LIST
;;; Note:
;;;   in file RESOURCE.LISP, position 14354
;;;   at (DEFUN MAP-RESOURCE ...)
;;;   Checking type of (FIRST (EXT:TRULY-THE CONS #:G80)) to be RESOURCE-DATABASE
;;; Note:
;;;   in file RESOURCE.LISP, position 14354
;;;   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 16968
;;;   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 18989
;;;   at (DEFUN PARSE-RESOURCE ...)
;;;   Checking type of #:LET113 to be ARRAY-INDEX
;;; Note:
;;;   in file RESOURCE.LISP, position 18989
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 5053
;;;   at (DECLARE-EVENT XFREE86-VIDMODE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 5053
;;;   at (DECLARE-EVENT XFREE86-VIDMODE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 5053
;;;   at (DECLARE-EVENT XFREE86-VIDMODE-NOTIFY ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DECLARE-EVENT :XFREE86-VIDMODE-NOTIFY ...).
;;; Note:
;;;   in file XVIDMODE.LISP, position 5053
;;;   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 6641
;;;   at (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 6641
;;;   at (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 6641
;;;   at (DEFUN XFREE86-VIDMODE-QUERY-VERSION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 6641
;;;   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 6641
;;;   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 7177
;;;   at (DEFUN XFREE86-VIDMODE-SET-CLIENT-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 7177
;;;   at (DEFUN XFREE86-VIDMODE-SET-CLIENT-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 7177
;;;   at (DEFUN XFREE86-VIDMODE-SET-CLIENT-VERSION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...).
;;; Note:
;;;   in file XVIDMODE.LISP, position 7439
;;;   at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 7439
;;;   at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 7439
;;;   at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 7439
;;;   at (DEFUN XFREE86-VIDMODE-GET-PERMISSIONS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 7439
;;;   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 7439
;;;   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 7758
;;;   at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...)
;;;   Checking type of (XFREE86-VIDMODE-QUERY-VERSION DISPLAY) to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 7758
;;;   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 7758
;;;   at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 7758
;;;   at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 7758
;;;   at (DEFUN XFREE86-VIDMODE-MOD-MODE-LINE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 7758
;;;   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 8385
;;;   at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...)
;;;   Checking type of #:LET345 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 8385
;;;   at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 8385
;;;   at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 8385
;;;   at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 8385
;;;   at (DEFUN XFREE86-VIDMODE-GET-MODE-LINE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 8385
;;;   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 8385
;;;   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 9969
;;;   at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 9969
;;;   at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 9969
;;;   at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 9969
;;;   at (DEFUN XFREE86-VIDMODE-GET-ALL-MODE-LINES ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 9969
;;;   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 9969
;;;   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 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of (MODE-INFO-PRIVSIZE NEW) to be CARD32
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of (XFREE86-VIDMODE-QUERY-VERSION DPY) to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   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 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of (- (* 2 I) 2) to be FIXNUM
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of #:LET554 to be CARD32
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of #:LET555 to be LIST
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of (SI:CONS-CAR #:LOOP-LIST553) to be CARD32
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST553) to be LIST
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of (+ I #:G568) to be FIXNUM
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Checking type of (+ I #:G570) to be FIXNUM
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   at (DEFUN XFREE86-VIDMODE-ADD-MODE-LINE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 11892
;;;   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 12947
;;;   at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...)
;;;   Checking type of (XFREE86-VIDMODE-QUERY-VERSION DPY) to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 12947
;;;   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 12947
;;;   at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 12947
;;;   at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 12947
;;;   at (DEFUN XFREE86-VIDMODE-DELETE-MODE-LINE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 12947
;;;   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 15998
;;;   at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...)
;;;   Checking type of (XFREE86-VIDMODE-QUERY-VERSION DPY) to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 15998
;;;   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 15998
;;;   at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 15998
;;;   at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 15998
;;;   at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 15998
;;;   at (DEFUN XFREE86-VIDMODE-VALIDATE-MODE-LINE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 15998
;;;   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 15998
;;;   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 16923
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 16923
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 16923
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 16923
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 16923
;;;   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 16923
;;;   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 17469
;;;   at (DEFUN XFREE86-VIDMODE-SET-GAMMA ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 17469
;;;   at (DEFUN XFREE86-VIDMODE-SET-GAMMA ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 17469
;;;   at (DEFUN XFREE86-VIDMODE-SET-GAMMA ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 17469
;;;   at (DEFUN XFREE86-VIDMODE-SET-GAMMA ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...).
;;; Note:
;;;   in file XVIDMODE.LISP, position 17954
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 17954
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 17954
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 17954
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 17954
;;;   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 17954
;;;   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 18820
;;;   at (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 18820
;;;   at (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 18820
;;;   at (DEFUN XFREE86-VIDMODE-SET-GAMMA-RAMP ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 18820
;;;   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 19324
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 19324
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 19324
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 19324
;;;   at (DEFUN XFREE86-VIDMODE-GET-GAMMA-RAMP-SIZE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 19324
;;;   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 19324
;;;   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 19640
;;;   at (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 19640
;;;   at (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 19640
;;;   at (DEFUN XFREE86-VIDMODE-LOCK-MODE-SWITCH ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 19640
;;;   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 20155
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...)
;;;   Checking type of #:LET1100 to be BOOLEAN
;;; Note:
;;;   in file XVIDMODE.LISP, position 20155
;;;   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 20155
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 20155
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 20155
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 20155
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-TO-MODE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...).
;;; Note:
;;;   in file XVIDMODE.LISP, position 21336
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 21336
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 21336
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 21336
;;;   at (DEFUN XFREE86-VIDMODE-SWITCH-MODE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...).
;;; Note:
;;;   in file XVIDMODE.LISP, position 21771
;;;   at (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 21771
;;;   at (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 21771
;;;   at (DEFUN XFREE86-VIDMODE-SELECT-NEXT-MODE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 21771
;;;   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 22080
;;;   at (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 22080
;;;   at (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 22080
;;;   at (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 22080
;;;   at (DEFUN XFREE86-VIDMODE-SELECT-PREV-MODE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN XFREE86-VIDMODE-GET-MONITOR ...).
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   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 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Checking type of #:LET1378 to be REPLY-BUFFER
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 22398
;;;   at (DEFUN XFREE86-VIDMODE-GET-MONITOR ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...).
;;; Note:
;;;   in file XVIDMODE.LISP, position 23862
;;;   at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 23862
;;;   at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 23862
;;;   at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 23862
;;;   at (DEFUN XFREE86-VIDMODE-GET-VIEWPORT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 23862
;;;   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 23862
;;;   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 24892
;;;   at (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 24892
;;;   at (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 24892
;;;   at (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 24892
;;;   at (DEFUN XFREE86-VIDMODE-SET-VIEWPORT ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...).
;;; Note:
;;;   in file XVIDMODE.LISP, position 25353
;;;   at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 25353
;;;   at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XVIDMODE.LISP, position 25353
;;;   at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...)
;;;   Inlining SCREEN-POSITION
;;; Note:
;;;   in file XVIDMODE.LISP, position 25353
;;;   at (DEFUN XFREE86-VIDMODE-GET-DOTCLOCKS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XVIDMODE.LISP, position 25353
;;;   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 25353
;;;   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 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1570 to be CARD32
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1571 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1572 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1573 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1574 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1575 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1576 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1577 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1578 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1579 to be CARD16
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1580 to be CARD32
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1581 to be CARD32
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1582 to be (OR NULL SEQUENCE)
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   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 26308
;;;   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 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of #:LET1724 to be LIST
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   at (DEFUN MODE-INFO->V-CARD16 ...)
;;;   Checking type of (SI:CONS-CAR #:LOOP-LIST1722) to be INT32
;;; Note:
;;;   in file XVIDMODE.LISP, position 26308
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 ...).
;;; Warning:
;;;   in file XRENDER.LISP, position 8037
;;;   at (DEFUN FIND-MATCHING-PICTURE-FORMATS ...)
;;;   ! Unsupported CONS type C::BYTE-SPECIFIER. Replacing it with T.
;;; 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 16363
;;;   at (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 16363
;;;   at (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 16363
;;;   at (DEFUN %RENDER-CHANGE-PICTURE-CLIP-RECTANGLES ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 16363
;;;   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 16892
;;;   at (FOO (# REPEAT ...) ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 16892
;;;   at (FOO (# REPEAT ...) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 16892
;;;   at (FOO (# REPEAT ...) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 16892
;;;   at (FOO (# REPEAT ...) ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (FOO (# REPEAT ...) ...).
;;; Note:
;;;   in file XRENDER.LISP, position 16892
;;;   at (FOO (# REPEAT ...) ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 16892
;;;   at (FOO (# REPEAT ...) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 16892
;;;   at (FOO (# REPEAT ...) ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 16892
;;;   at (FOO (# REPEAT ...) ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-FREE-PICTURE ...).
;;; Note:
;;;   in file XRENDER.LISP, position 23139
;;;   at (DEFUN RENDER-FREE-PICTURE ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 23139
;;;   at (DEFUN RENDER-FREE-PICTURE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23139
;;;   at (DEFUN RENDER-FREE-PICTURE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23139
;;;   at (DEFUN RENDER-FREE-PICTURE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-FREE-GLYPH-SET ...).
;;; Note:
;;;   in file XRENDER.LISP, position 23356
;;;   at (DEFUN RENDER-FREE-GLYPH-SET ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 23356
;;;   at (DEFUN RENDER-FREE-GLYPH-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23356
;;;   at (DEFUN RENDER-FREE-GLYPH-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23356
;;;   at (DEFUN RENDER-FREE-GLYPH-SET ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-QUERY-VERSION ...).
;;; Note:
;;;   in file XRENDER.LISP, position 23586
;;;   at (DEFUN RENDER-QUERY-VERSION ...)
;;;   Checking type of #:LET668 to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 23586
;;;   at (DEFUN RENDER-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23586
;;;   at (DEFUN RENDER-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23586
;;;   at (DEFUN RENDER-QUERY-VERSION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XRENDER.LISP, position 23586
;;;   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 23586
;;;   at (DEFUN RENDER-QUERY-VERSION ...)
;;;   Checking type of #:LET718 to be REPLY-BUFFER
;;; Compiling (DEFUN RENDER-QUERY-PICTURE-FORMATS ...).
;;; Note:
;;;   in file XRENDER.LISP, position 23833
;;;   at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...)
;;;   Checking type of #:LET720 to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 23833
;;;   at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23833
;;;   at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23833
;;;   at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XRENDER.LISP, position 23833
;;;   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 23833
;;;   at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...)
;;;   Checking type of #:LET770 to be REPLY-BUFFER
;;; Note:
;;;   in file XRENDER.LISP, position 23833
;;;   at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 23833
;;;   at (DEFUN RENDER-QUERY-PICTURE-FORMATS ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN RENDER-FILL-RECTANGLE ...).
;;; Note:
;;;   in file XRENDER.LISP, position 25399
;;;   at (DEFUN RENDER-FILL-RECTANGLE ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 25399
;;;   at (DEFUN RENDER-FILL-RECTANGLE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 25399
;;;   at (DEFUN RENDER-FILL-RECTANGLE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 25399
;;;   at (DEFUN RENDER-FILL-RECTANGLE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 25399
;;;   at (DEFUN RENDER-FILL-RECTANGLE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 25399
;;;   at (DEFUN RENDER-FILL-RECTANGLE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-TRIANGLES-1 ...).
;;; Warning:
;;;   in file XRENDER.LISP, position 26052
;;;   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 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 26052
;;;   at (DEFUN RENDER-TRIANGLES-1 ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-SET-PICTURE-TRANSFORM ...).
;;; Note:
;;;   in file XRENDER.LISP, position 27411
;;;   at (DEFUN RENDER-SET-PICTURE-TRANSFORM ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 27411
;;;   at (DEFUN RENDER-SET-PICTURE-TRANSFORM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 27411
;;;   at (DEFUN RENDER-SET-PICTURE-TRANSFORM ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 27411
;;;   at (DEFUN RENDER-SET-PICTURE-TRANSFORM ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-QUERY-FILTERS ...).
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Checking type of #:LET1154 to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   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 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Checking type of #:LET1204 to be REPLY-BUFFER
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 28097
;;;   at (DEFUN RENDER-QUERY-FILTERS ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN RENDER-SET-FILTER ...).
;;; Note:
;;;   in file XRENDER.LISP, position 30639
;;;   at (DEFUN RENDER-SET-FILTER ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 30639
;;;   at (DEFUN RENDER-SET-FILTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 30639
;;;   at (DEFUN RENDER-SET-FILTER ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 30639
;;;   at (DEFUN RENDER-SET-FILTER ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-TRAPEZOIDS-1 ...).
;;; Note:
;;;   in file XRENDER.LISP, position 31281
;;;   at (DEFUN RENDER-TRAPEZOIDS-1 ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 31281
;;;   at (DEFUN RENDER-TRAPEZOIDS-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 31281
;;;   at (DEFUN RENDER-TRAPEZOIDS-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 31281
;;;   at (DEFUN RENDER-TRAPEZOIDS-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 31281
;;;   at (DEFUN RENDER-TRAPEZOIDS-1 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 31281
;;;   at (DEFUN RENDER-TRAPEZOIDS-1 ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-COMPOSITE ...).
;;; Note:
;;;   in file XRENDER.LISP, position 32131
;;;   at (DEFUN RENDER-COMPOSITE ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 32131
;;;   at (DEFUN RENDER-COMPOSITE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 32131
;;;   at (DEFUN RENDER-COMPOSITE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 32131
;;;   at (DEFUN RENDER-COMPOSITE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 32131
;;;   at (DEFUN RENDER-COMPOSITE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 32131
;;;   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 33215
;;;   at (DEFUN RENDER-CREATE-GLYPH-SET ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 33215
;;;   at (DEFUN RENDER-CREATE-GLYPH-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 33215
;;;   at (DEFUN RENDER-CREATE-GLYPH-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 33215
;;;   at (DEFUN RENDER-CREATE-GLYPH-SET ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-REFERENCE-GLYPH-SET ...).
;;; Note:
;;;   in file XRENDER.LISP, position 33794
;;;   at (DEFUN RENDER-REFERENCE-GLYPH-SET ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 33794
;;;   at (DEFUN RENDER-REFERENCE-GLYPH-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 33794
;;;   at (DEFUN RENDER-REFERENCE-GLYPH-SET ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 33794
;;;   at (DEFUN RENDER-REFERENCE-GLYPH-SET ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...).
;;; Note:
;;;   in file XRENDER.LISP, position 34448
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 34448
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 34448
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 34448
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 34448
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 34448
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 34448
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS-8 ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 34448
;;;   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 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of (+ 7 (/ PAYLOADSIZE 4)) to be INTEGER
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 37755
;;;   at (DEFUN RENDER-COMPOSITE-GLYPHS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-ADD-GLYPH ...).
;;; Note:
;;;   in file XRENDER.LISP, position 40918
;;;   at (DEFUN RENDER-ADD-GLYPH ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 40918
;;;   at (DEFUN RENDER-ADD-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 40918
;;;   at (DEFUN RENDER-ADD-GLYPH ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 40918
;;;   at (DEFUN RENDER-ADD-GLYPH ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...).
;;; Note:
;;;   in file XRENDER.LISP, position 42366
;;;   at (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 42366
;;;   at (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 42366
;;;   at (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 42366
;;;   at (DEFUN RENDER-ADD-GLYPH-FROM-PICTURE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-FREE-GLYPHS ...).
;;; Note:
;;;   in file XRENDER.LISP, position 43207
;;;   at (DEFUN RENDER-FREE-GLYPHS ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 43207
;;;   at (DEFUN RENDER-FREE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 43207
;;;   at (DEFUN RENDER-FREE-GLYPHS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 43207
;;;   at (DEFUN RENDER-FREE-GLYPHS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Compiling (DEFUN RENDER-CREATE-CURSOR ...).
;;; Note:
;;;   in file XRENDER.LISP, position 50177
;;;   at (DEFUN RENDER-CREATE-CURSOR ...)
;;;   Checking type of DISPLAY to be DISPLAY
;;; Note:
;;;   in file XRENDER.LISP, position 50177
;;;   at (DEFUN RENDER-CREATE-CURSOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 50177
;;;   at (DEFUN RENDER-CREATE-CURSOR ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XRENDER.LISP, position 50177
;;;   at (DEFUN RENDER-CREATE-CURSOR ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; End of Pass 1.
;;; Warning:
;;;   in file xrender.lisp, position 8037
;;;   at (DEFUN FIND-MATCHING-PICTURE-FORMATS ...)
;;;   ! Unsupported CONS type C::BYTE-SPECIFIER. Replacing it with T.
;;; 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 #:G2604.
;;; Emitting code for #:G2639.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 #:LET76 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 #:LET126 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 #:LET128 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 #:LET188 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 #:LET393 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 #:LET448 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 #:LET452 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 #:LET507 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 #:LET518 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 #:LET568 to be XLIB::REPLY-BUFFER
;;; Compiling (DEFUN MAKE-CURRENT ...).
;;; Note:
;;;   in file GLX.LISP, position 13732
;;;   at (DEFUN MAKE-CURRENT ...)
;;;   Checking type of #:LET581 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 #:LET646 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 #:LET735 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 #:LET790 to be XLIB::REPLY-BUFFER
;;; Compiling (DEFUN CHOOSE-VISUAL ...).
;;; Note:
;;;   in file GLX.LISP, position 17986
;;;   at (DEFUN CHOOSE-VISUAL ...)
;;;   Checking type of #:LET817 to be LIST
;;; Note:
;;;   in file GLX.LISP, position 17986
;;;   at (DEFUN CHOOSE-VISUAL ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST813) 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 #:G797.
;;; 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 #:LET399 to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (DEFUN BYTE-WIDTH-CALCULATION ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST394) to be LIST
;;; Compiling (DEFUN COMPOSITE-ARGS ...).
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (DEFUN COMPOSITE-ARGS ...)
;;;   Checking type of #:LET418 to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (DEFUN COMPOSITE-ARGS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST411) to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (DEFUN COMPOSITE-ARGS ...)
;;;   Checking type of #:LOOP-LIST-TAIL413 to be CONS
;;; Compiling (DEFUN MAKE-SETTER-FORMS ...).
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (DEFUN MAKE-SETTER-FORMS ...)
;;;   Checking type of #:LET432 to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (DEFUN MAKE-SETTER-FORMS ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST425) to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (DEFUN MAKE-SETTER-FORMS ...)
;;;   Checking type of #:LOOP-LIST-TAIL427 to be CONS
;;; Compiling (DEFMACRO DEFINE-RENDERING-COMMAND ...).
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LET510 to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST505) to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LET517 to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST513) to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LOOP-LIST-TAIL515 to be CONS
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:G511 to be CONS
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LOOP-LIST-TAIL507 to be CONS
;;; 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 #:LET529 to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST525) to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LOOP-LIST-TAIL527 to be CONS
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LET535 to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST531) to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LOOP-LIST-TAIL533 to be CONS
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LET542 to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of (SI:CONS-CDR #:LOOP-LIST538) to be LIST
;;; Note:
;;;   in file GL.LISP, position 78239
;;;   at (FSET 'DEFINE-RENDERING-COMMAND ...)
;;;   Checking type of #:LOOP-LIST-TAIL540 to be CONS
;;; Compiling (DEFUN GET-STRING ...).
;;; Note:
;;;   in file GL.LISP, position 84431
;;;   at (DEFUN GET-STRING ...)
;;;   Checking type of #:LET547 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 #:LET607 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 #:LET2687 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 #:LET2742 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 #:LET2802 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 #:LET2862 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 #:LET2922 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 #:LET2977 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 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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1538
;;;   at (DEFUN SCREEN-SAVER-QUERY-VERSION ...)
;;;   Checking type of #:LET0 to be DISPLAY
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1538
;;;   at (DEFUN SCREEN-SAVER-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1538
;;;   at (DEFUN SCREEN-SAVER-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1538
;;;   at (DEFUN SCREEN-SAVER-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1538
;;;   at (DEFUN SCREEN-SAVER-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1538
;;;   at (DEFUN SCREEN-SAVER-QUERY-VERSION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1538
;;;   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 1538
;;;   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 1935
;;;   at (DEFUN SCREEN-SAVER-QUERY-INFO ...)
;;;   Checking type of #:LET66 to be DISPLAY
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1935
;;;   at (DEFUN SCREEN-SAVER-QUERY-INFO ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1935
;;;   at (DEFUN SCREEN-SAVER-QUERY-INFO ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1935
;;;   at (DEFUN SCREEN-SAVER-QUERY-INFO ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1935
;;;   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 1935
;;;   at (DEFUN SCREEN-SAVER-QUERY-INFO ...)
;;;   Checking type of #:LET116 to be REPLY-BUFFER
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1935
;;;   at (DEFUN SCREEN-SAVER-QUERY-INFO ...)
;;;   Inlining AREF-CARD8
;;; Note:
;;;   in file SCREENSAVER.LISP, position 1935
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 1591
;;;   at (DEFUN XINERAMA-QUERY-VERSION ...)
;;;   Checking type of #:LET25 to be DISPLAY
;;; Note:
;;;   in file XINERAMA.LISP, position 1591
;;;   at (DEFUN XINERAMA-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XINERAMA.LISP, position 1591
;;;   at (DEFUN XINERAMA-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XINERAMA.LISP, position 1591
;;;   at (DEFUN XINERAMA-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XINERAMA.LISP, position 1591
;;;   at (DEFUN XINERAMA-QUERY-VERSION ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XINERAMA.LISP, position 1591
;;;   at (DEFUN XINERAMA-QUERY-VERSION ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XINERAMA.LISP, position 1591
;;;   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 1591
;;;   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 1929
;;;   at (DEFUN XINERAMA-IS-ACTIVE ...)
;;;   Checking type of #:LET91 to be DISPLAY
;;; Note:
;;;   in file XINERAMA.LISP, position 1929
;;;   at (DEFUN XINERAMA-IS-ACTIVE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XINERAMA.LISP, position 1929
;;;   at (DEFUN XINERAMA-IS-ACTIVE ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XINERAMA.LISP, position 1929
;;;   at (DEFUN XINERAMA-IS-ACTIVE ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XINERAMA.LISP, position 1929
;;;   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 1929
;;;   at (DEFUN XINERAMA-IS-ACTIVE ...)
;;;   Checking type of #:LET141 to be XLIB::REPLY-BUFFER
;;; Note:
;;;   in file XINERAMA.LISP, position 1929
;;;   at (DEFUN XINERAMA-IS-ACTIVE ...)
;;;   Inlining AREF-CARD8
;;; Compiling (DEFUN XINERAMA-QUERY-SCREENS ...).
;;; Note:
;;;   in file XINERAMA.LISP, position 2206
;;;   at (DEFUN XINERAMA-QUERY-SCREENS ...)
;;;   Checking type of #:LET145 to be DISPLAY
;;; Note:
;;;   in file XINERAMA.LISP, position 2206
;;;   at (DEFUN XINERAMA-QUERY-SCREENS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XINERAMA.LISP, position 2206
;;;   at (DEFUN XINERAMA-QUERY-SCREENS ...)
;;;   Inlining ASET-CARD8
;;; Note:
;;;   in file XINERAMA.LISP, position 2206
;;;   at (DEFUN XINERAMA-QUERY-SCREENS ...)
;;;   Inlining BUFFER-NEW-REQUEST-NUMBER
;;; Note:
;;;   in file XINERAMA.LISP, position 2206
;;;   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 2206
;;;   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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c clx/module.c -o clx/module.o 
;;; Finished compiling BUILD:CLX;MODULE.LISP.
;;;
;;; Note:
;;;   Library initialization function is main_lib_CLX
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit4fn0d6.c -o eclinit4fn0d6.o 
;;; Note:
;;;   Invoking external command:
;;;   ar cr libclx.a eclinit4fn0d6.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/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinit0LT16q.c -o eclinit0LT16q.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o clx.fas -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinit0LT16q.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 -lpthread -ldl -lm 
;;; Note:
;;;   Invoking external command:
;;;   gcc -I. -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fPIC -D_THREAD_SAFE -Dlinux -I/<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c -c eclinitHYSdgs.c -o eclinitHYSdgs.o 
;;; Note:
;;;   Invoking external command:
;;;   gcc -o bin/ecl -L/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/build/eclinitHYSdgs.o -L./ libecl.so -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") sed -e 's,@libdir\\@,/usr/lib/,' \
    -e 's,@includedir\\@,/usr/include/,' \
    -e 's,~A,/usr/lib/,' bin/ecl-config.pre > bin/ecl-config
cd /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../.git && ctags -o tags -R --langmap=c:+.d ../src || true
/bin/bash: line 0: cd: /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../.git: No such file or directory
if test "x" != "x"; then \
srcfiles=`find /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/c /<<BUILDDIR>>/ecl-15.3.7+dfsg1/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 '/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build'
make[1]: Leaving directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1'
   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_installdirs -a
dh_installdirs: Compatibility levels before 9 are deprecated (level 7 in use)
   dh_auto_install -a
dh_auto_install: Compatibility levels before 9 are deprecated (level 7 in use)
	make -j1 install DESTDIR=/<<BUILDDIR>>/ecl-15.3.7\+dfsg1/debian/ecl AM_UPDATE_INFO_DIR=no
make[1]: Entering directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1'
cd build; make install
make[2]: Entering directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build'
# Here we would use the option -s but the install program in sourceforge-solaris
# is broken.
/bin/bash /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/gc/mkinstalldirs /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/bin/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ \
  /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl
mkdir -p -- /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include/ /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl
for i in bin/ecl; do \
  /usr/bin/install -c $i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/bin/; \
done
if [ -d encodings ]; then \
  /bin/bash /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/gc/mkinstalldirs /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7//encodings; \
  for i in ./encodings/*; do \
    /usr/bin/install -c -m 644 $i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7//encodings; \
  done \
fi
mkdir -p -- /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7//encodings
sed '/-CUT-/,$d' ./ecl/config.h > ./ecl/config-install.h
/bin/bash /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/gc/mkinstalldirs /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl
for i in `(cd ecl && find . -type d)`; do \
  k="/<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl/$i"; \
  test -d "$k" || /bin/bash /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/gc/mkinstalldirs $k; \
done
mkdir -p -- /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl/./gc
mkdir -p -- /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl/./gc/private
mkdir -p -- /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl/./impl
for i in `(cd ecl && find . -name '*.h')`; do echo $i; \
  /usr/bin/install -c -m 644 ecl/$i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl/$i; \
done
./configpre.h
./config.h
./bytecodes.h
./cache.h
./cons.h
./cs.h
./ecl-cmp.h
./ecl-inl.h
./ecl.h
./external.h
./internal.h
./legacy.h
./number.h
./object.h
./page.h
./stacks.h
./unify.h
./impl/math_fenv.h
./impl/math_dispatch2.h
./impl/math_dispatch.h
./impl/math_fenv_msvc.h
./config-install.h
rm -f -f /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl/config.h
mv /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl/config-install.h /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/include//ecl/config.h
/usr/bin/install -c bin/ecl-config /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/bin/
for i in build-stamp help.doc TAGS ; do \
  /usr/bin/install -c -m 644 $i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7/; \
done
for i in libecl.so ; do \
  if test -s $i ; then \
   if echo $i | grep dll; then \
    /usr/bin/install -c $i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/bin/; \
   fi; \
   /usr/bin/install -c $i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/; \
  fi \
done
if [ "xlibecl.so" != "x" -a -f "libecl.so" ]; then \
  ( cd /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ && rm -f -f libecl.so.15.3.7 libecl.so.15.3 libecl.so.15 && \
    mv libecl.so libecl.so.15.3.7 && \
    ln -s libecl.so.15.3.7 libecl.so.15.3 && \
    ln -s libecl.so.15.3.7 libecl.so.15 && \
    ln -s libecl.so.15.3.7 libecl.so ) \
fi
/usr/bin/install -c c/dpp /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7/
/usr/bin/install -c ecl_min /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7/
for i in `cat modules`; do \
  case $i in \
    *.fas) /usr/bin/install -c $i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7/;; \
    *) /usr/bin/install -c -m 644 $i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7/;; \
  esac \
done
for i in Copyright LGPL; do \
  /usr/bin/install -c -m 644 /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/../$i /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/lib/ecl-15.3.7/; \
done
/bin/bash /<<BUILDDIR>>/ecl-15.3.7+dfsg1/src/gc/mkinstalldirs /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/share/man/man1
/usr/bin/install -c -m 644 doc/ecl.man /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/share/man/man1/ecl.1
/usr/bin/install -c -m 644 doc/ecl-config.man /<<BUILDDIR>>/ecl-15.3.7+dfsg1/debian/ecl/usr/share/man/man1/ecl-config.1
make[2]: Leaving directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1/build'
make[1]: Leaving directory '/<<BUILDDIR>>/ecl-15.3.7+dfsg1'
   dh_installdocs -a
   dh_installchangelogs -a
dh_installchangelogs: Compatibility levels before 9 are deprecated (level 7 in use)
   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
dpkg-deb: building package 'ecl-dbgsym' in '../ecl-dbgsym_15.3.7+dfsg1-2+deb9u1_armhf.deb'.
dpkg-deb: building package 'ecl' in '../ecl_15.3.7+dfsg1-2+deb9u1_armhf.deb'.
 dpkg-genbuildinfo --build=any
 dpkg-genchanges --build=any -mRaspbian wandboard test autobuilder <root@raspbian.org> >../ecl_15.3.7+dfsg1-2+deb9u1_armhf.changes
dpkg-genchanges: info: binary-only arch-specific upload (source code and arch-indep packages not included)
 dpkg-source --after-build ecl-15.3.7+dfsg1
dpkg-buildpackage: info: binary-only upload (no source included)
--------------------------------------------------------------------------------
Build finished at 2017-10-07T13:28:49Z

Finished
--------

I: Built successfully

+------------------------------------------------------------------------------+
| Post Build Chroot                                                            |
+------------------------------------------------------------------------------+


+------------------------------------------------------------------------------+
| Changes                                                                      |
+------------------------------------------------------------------------------+


ecl_15.3.7+dfsg1-2+deb9u1_armhf.changes:
----------------------------------------

Format: 1.8
Date: Thu, 14 Sep 2017 14:33:03 +0200
Source: ecl
Binary: ecl
Architecture: armhf
Version: 15.3.7+dfsg1-2+deb9u1
Distribution: stretch-staging
Urgency: medium
Maintainer: Raspbian wandboard test autobuilder <root@raspbian.org>
Changed-By: Sébastien Villemot <sebastien@debian.org>
Description:
 ecl        - Embeddable Common-Lisp: has an interpreter and can compile to C
Closes: 873091
Changes:
 ecl (15.3.7+dfsg1-2+deb9u1) stretch; urgency=medium
 .
   * Team upload.
   * Add dependency on libffi-dev for ecl (Closes: #873091).
Checksums-Sha1:
 de35da69aad922030a6e893b065110e6c6290572 7310102 ecl-dbgsym_15.3.7+dfsg1-2+deb9u1_armhf.deb
 2c375a0b89ea423aca79d93a284065e9c52426e0 5112 ecl_15.3.7+dfsg1-2+deb9u1_armhf.buildinfo
 1898bd87c46e4618b94175f6e3236ea32b8acc5b 2640260 ecl_15.3.7+dfsg1-2+deb9u1_armhf.deb
Checksums-Sha256:
 3be39ef5f86688825cb1c37c69696e3385583c084214ea0b9f3d4337cf4f20bd 7310102 ecl-dbgsym_15.3.7+dfsg1-2+deb9u1_armhf.deb
 60ad5652d1598d8a9521bbffebc0f742032065090a4c3be39b2d4a421d905250 5112 ecl_15.3.7+dfsg1-2+deb9u1_armhf.buildinfo
 035fc5487282abc3f751d30ae47da1121a90f9526604599fca44833324dc28c7 2640260 ecl_15.3.7+dfsg1-2+deb9u1_armhf.deb
Files:
 96066b96dd389c5c597dba130a039c2b 7310102 debug extra ecl-dbgsym_15.3.7+dfsg1-2+deb9u1_armhf.deb
 b176956a0225071438c8ef1625c38610 5112 devel optional ecl_15.3.7+dfsg1-2+deb9u1_armhf.buildinfo
 09ddd8efdbe9bdc0ee1bfaa6b4527dcc 2640260 devel optional ecl_15.3.7+dfsg1-2+deb9u1_armhf.deb

+------------------------------------------------------------------------------+
| Package contents                                                             |
+------------------------------------------------------------------------------+


ecl-dbgsym_15.3.7+dfsg1-2+deb9u1_armhf.deb
------------------------------------------

 new debian package, version 2.0.
 size 7310102 bytes: control archive=1470 bytes.
    1156 bytes,    13 lines      control              
    2014 bytes,    19 lines      md5sums              
 Package: ecl-dbgsym
 Source: ecl
 Version: 15.3.7+dfsg1-2+deb9u1
 Auto-Built-Package: debug-symbols
 Architecture: armhf
 Maintainer: Debian Common Lisp Team <pkg-common-lisp-devel@lists.alioth.debian.org>
 Installed-Size: 8001
 Depends: ecl (= 15.3.7+dfsg1-2+deb9u1)
 Section: debug
 Priority: extra
 Homepage: http://ecls.sourceforge.net/
 Description: Debug symbols for ecl
 Build-Ids: 080c3b59c24bcc4b5d5dcc77f10f241712735d7d 226d89c0644c746fe90fdef6c8ce1485bcaa4180 403c1d34860b9616c8d246f4e73aadfd0214bf34 47d20a2f2b7839fdd12ae8d4a2a2915601cd9a8f 48a3d144e23a3c05360d1f6f7e6b5a6e727f54c5 642a1e4524453724c73816a3bfdbc34c87b43775 71942302f5bf694425f96ea96880ae77732d1f5b 8382689b098498edaab6b25a037c3a1b3eea5262 88def7ca23155f47a7f2a8a1818f7ea7b5c5f926 9b8cd4b2c5879b59c8addfb669ce5cf7121be163 9bf2ebb1e9f0f643f842594c630b03b7443ed3fd ae0a8c990b021ce37b54fc21a55b8bc3c5f482a2 baed7a1b1fe637acaee207f22bcedd63b7683de7 bdcb1b07ac781755c342bf5ad79468dabe664842 be377e4d1d7a9a42ea7af93a556d046bf095b870 e3dc1100d1a6be8cde6bdef5a0356adbc409d54c ecdfe127b33700b81bb28fc6e737ec32ad51f612 f31050040e8f5dd98b6b3c3268a012ce7322d2f2 f54bad5835503477d62186102512ee65c8b497be

drwxr-xr-x root/root         0 2017-09-14 12:33 ./
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/08/
-rw-r--r-- root/root     30284 2017-09-14 12:33 ./usr/lib/debug/.build-id/08/0c3b59c24bcc4b5d5dcc77f10f241712735d7d.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/22/
-rw-r--r-- root/root     30256 2017-09-14 12:33 ./usr/lib/debug/.build-id/22/6d89c0644c746fe90fdef6c8ce1485bcaa4180.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/40/
-rw-r--r-- root/root   1000056 2017-09-14 12:33 ./usr/lib/debug/.build-id/40/3c1d34860b9616c8d246f4e73aadfd0214bf34.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/47/
-rw-r--r-- root/root     82784 2017-09-14 12:33 ./usr/lib/debug/.build-id/47/d20a2f2b7839fdd12ae8d4a2a2915601cd9a8f.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/48/
-rw-r--r-- root/root   1150376 2017-09-14 12:33 ./usr/lib/debug/.build-id/48/a3d144e23a3c05360d1f6f7e6b5a6e727f54c5.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/64/
-rw-r--r-- root/root   2524664 2017-09-14 12:33 ./usr/lib/debug/.build-id/64/2a1e4524453724c73816a3bfdbc34c87b43775.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/71/
-rw-r--r-- root/root   2308568 2017-09-14 12:33 ./usr/lib/debug/.build-id/71/942302f5bf694425f96ea96880ae77732d1f5b.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/83/
-rw-r--r-- root/root     44432 2017-09-14 12:33 ./usr/lib/debug/.build-id/83/82689b098498edaab6b25a037c3a1b3eea5262.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/88/
-rw-r--r-- root/root     36076 2017-09-14 12:33 ./usr/lib/debug/.build-id/88/def7ca23155f47a7f2a8a1818f7ea7b5c5f926.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/9b/
-rw-r--r-- root/root     50672 2017-09-14 12:33 ./usr/lib/debug/.build-id/9b/8cd4b2c5879b59c8addfb669ce5cf7121be163.debug
-rw-r--r-- root/root    554012 2017-09-14 12:33 ./usr/lib/debug/.build-id/9b/f2ebb1e9f0f643f842594c630b03b7443ed3fd.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/ae/
-rw-r--r-- root/root     17316 2017-09-14 12:33 ./usr/lib/debug/.build-id/ae/0a8c990b021ce37b54fc21a55b8bc3c5f482a2.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/ba/
-rw-r--r-- root/root     31700 2017-09-14 12:33 ./usr/lib/debug/.build-id/ba/ed7a1b1fe637acaee207f22bcedd63b7683de7.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/bd/
-rw-r--r-- root/root     23696 2017-09-14 12:33 ./usr/lib/debug/.build-id/bd/cb1b07ac781755c342bf5ad79468dabe664842.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/be/
-rw-r--r-- root/root    127672 2017-09-14 12:33 ./usr/lib/debug/.build-id/be/377e4d1d7a9a42ea7af93a556d046bf095b870.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/e3/
-rw-r--r-- root/root     15380 2017-09-14 12:33 ./usr/lib/debug/.build-id/e3/dc1100d1a6be8cde6bdef5a0356adbc409d54c.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/ec/
-rw-r--r-- root/root     17428 2017-09-14 12:33 ./usr/lib/debug/.build-id/ec/dfe127b33700b81bb28fc6e737ec32ad51f612.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/f3/
-rw-r--r-- root/root     37436 2017-09-14 12:33 ./usr/lib/debug/.build-id/f3/1050040e8f5dd98b6b3c3268a012ce7322d2f2.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/debug/.build-id/f5/
-rw-r--r-- root/root     72188 2017-09-14 12:33 ./usr/lib/debug/.build-id/f5/4bad5835503477d62186102512ee65c8b497be.debug
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/doc/
lrwxrwxrwx root/root         0 2017-09-14 12:33 ./usr/share/doc/ecl-dbgsym -> ecl


ecl_15.3.7+dfsg1-2+deb9u1_armhf.deb
-----------------------------------

 new debian package, version 2.0.
 size 2640260 bytes: control archive=7692 bytes.
    1282 bytes,    29 lines      control              
   16665 bytes,   237 lines      md5sums              
     939 bytes,    36 lines   *  postrm               #!/bin/sh
      16 bytes,     1 lines      shlibs               
      60 bytes,     2 lines      triggers             
 Package: ecl
 Version: 15.3.7+dfsg1-2+deb9u1
 Architecture: armhf
 Maintainer: Debian Common Lisp Team <pkg-common-lisp-devel@lists.alioth.debian.org>
 Installed-Size: 13587
 Depends: libc6 (>= 2.4), libffi6 (>= 3.0.4), libgc1c2 (>= 1:7.2d), libgmp10, libffi-dev, 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-09-14 12:33 ./
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/bin/
-rwxr-xr-x root/root      5656 2017-09-14 12:33 ./usr/bin/ecl
-rwxr-xr-x root/root       604 2017-09-14 12:33 ./usr/bin/ecl-config
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/include/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/include/ecl/
-rw-r--r-- root/root      6688 2017-09-14 12:33 ./usr/include/ecl/bytecodes.h
-rw-r--r-- root/root      1146 2017-09-14 12:33 ./usr/include/ecl/cache.h
-rw-r--r-- root/root      7309 2017-09-14 12:33 ./usr/include/ecl/config.h
-rw-r--r-- root/root     14034 2017-09-14 12:33 ./usr/include/ecl/configpre.h
-rw-r--r-- root/root     12829 2017-09-14 12:33 ./usr/include/ecl/cons.h
-rw-r--r-- root/root      5577 2017-09-14 12:33 ./usr/include/ecl/cs.h
-rw-r--r-- root/root      1395 2017-09-14 12:33 ./usr/include/ecl/ecl-cmp.h
-rw-r--r-- root/root      7020 2017-09-14 12:33 ./usr/include/ecl/ecl-inl.h
-rw-r--r-- root/root      2404 2017-09-14 12:33 ./usr/include/ecl/ecl.h
-rw-r--r-- root/root    117771 2017-09-14 12:33 ./usr/include/ecl/external.h
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/include/ecl/gc/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/include/ecl/gc/private/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/include/ecl/impl/
-rw-r--r-- root/root      4608 2017-09-14 12:33 ./usr/include/ecl/impl/math_dispatch.h
-rw-r--r-- root/root      5288 2017-09-14 12:33 ./usr/include/ecl/impl/math_dispatch2.h
-rw-r--r-- root/root      3270 2017-09-14 12:33 ./usr/include/ecl/impl/math_fenv.h
-rw-r--r-- root/root      1508 2017-09-14 12:33 ./usr/include/ecl/impl/math_fenv_msvc.h
-rw-r--r-- root/root     21194 2017-09-14 12:33 ./usr/include/ecl/internal.h
-rw-r--r-- root/root      7206 2017-09-14 12:33 ./usr/include/ecl/legacy.h
-rw-r--r-- root/root      4132 2017-09-14 12:33 ./usr/include/ecl/number.h
-rw-r--r-- root/root     32319 2017-09-14 12:33 ./usr/include/ecl/object.h
-rw-r--r-- root/root      3384 2017-09-14 12:33 ./usr/include/ecl/page.h
-rw-r--r-- root/root     16826 2017-09-14 12:33 ./usr/include/ecl/stacks.h
-rw-r--r-- root/root      1123 2017-09-14 12:33 ./usr/include/ecl/unify.h
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/
-rw-r--r-- root/root      1576 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/Copyright
-rw-r--r-- root/root     25265 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/LGPL
-rw-r--r-- root/root         0 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/TAGS
-rwxr-xr-x root/root    637452 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/asdf.fas
-rw-r--r-- root/root       813 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/build-stamp
-rw-r--r-- root/root       151 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/clx.asd
-rwxr-xr-x root/root   2026084 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/clx.fas
-rw-r--r-- root/root       151 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/cmp.asd
-rwxr-xr-x root/root    740252 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/cmp.fas
-rw-r--r-- root/root       167 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/deflate.asd
-rwxr-xr-x root/root     59096 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/deflate.fas
-rw-r--r-- root/root       175 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/defsystem.asd
-rwxr-xr-x root/root    120876 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/defsystem.fas
-rwxr-xr-x root/root     87640 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/dpp
-rw-r--r-- root/root       167 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl-cdb.asd
-rwxr-xr-x root/root     18100 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl-cdb.fas
-rw-r--r-- root/root       171 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl-curl.asd
-rwxr-xr-x root/root     18076 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl-curl.fas
-rw-r--r-- root/root       171 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl-help.asd
-rwxr-xr-x root/root     22244 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl-help.fas
-rw-r--r-- root/root       191 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl-quicklisp.asd
-rwxr-xr-x root/root      9760 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl-quicklisp.fas
-rwxr-xr-x root/root   1132332 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ecl_min
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/
-rw-r--r-- root/root        64 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/arabic
-rw-r--r-- root/root        36 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ascii
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/asmo-708
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/atarist.bin
-rw-r--r-- root/root       862 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp-856.bin
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp819
-rw-r--r-- root/root        62 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp850
-rw-r--r-- root/root        62 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp862
-rw-r--r-- root/root        62 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp866
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp932
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp936
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp949
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cp950
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/cyrillic
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp437.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp737.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp775.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp850.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp852.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp855.bin
-rw-r--r-- root/root      1014 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp857.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp860.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp861.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp862.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp863.bin
-rw-r--r-- root/root      1002 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp864.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp865.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp866.bin
-rw-r--r-- root/root       990 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp869.bin
-rw-r--r-- root/root       902 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/dos-cp874.bin
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ecma-114
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ecma-118
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/greek
-rw-r--r-- root/root        64 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/greek8
-rw-r--r-- root/root        64 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/hebrew
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm437
-rw-r--r-- root/root        64 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm819
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm850
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm852
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm855
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm857
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm860
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm861
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm862
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm863
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm864
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm865
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm866
-rw-r--r-- root/root        63 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ibm869
-rw-r--r-- root/root      1882 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-2022-jp
-rw-r--r-- root/root      1991 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-2022-jp-1
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-1.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-10.bin
-rw-r--r-- root/root       994 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-11.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-13.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-14.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-15.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-16.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-2.bin
-rw-r--r-- root/root       998 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-3.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-4.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-5.bin
-rw-r--r-- root/root       846 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-6.bin
-rw-r--r-- root/root      1014 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-7.bin
-rw-r--r-- root/root       882 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-8.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso-8859-9.bin
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-1
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-10
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-13
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-14
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-15
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-2
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-3
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-4
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-5
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-6
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-7
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-8
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/iso8859-9
-rw-r--r-- root/root       634 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/jisx0201.bin
-rw-r--r-- root/root     27518 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/jisx0208.bin
-rw-r--r-- root/root     24270 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/jisx0212.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/koi8-r.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/koi8-u.bin
-rw-r--r-- root/root        59 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/koi8r
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-1
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-2
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-3
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-4
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-5
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-6
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-7
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-8
-rw-r--r-- root/root        66 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin-9
-rw-r--r-- root/root        64 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin2
-rw-r--r-- root/root        64 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin3
-rw-r--r-- root/root        64 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin4
-rw-r--r-- root/root        64 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin5
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin6
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin7
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin8
-rw-r--r-- root/root        65 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/latin9
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ms-ansi
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ms-arab
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ms-cyrl
-rw-r--r-- root/root        67 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ms-ee
-rw-r--r-- root/root        70 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ms-greek
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ms-hebr
-rw-r--r-- root/root        69 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ms-turk
-rw-r--r-- root/root     28150 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/shift-jis.bin
-rw-r--r-- root/root      9880 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/tools.lisp
-rw-r--r-- root/root        32 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ucs2
-rw-r--r-- root/root        36 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ucs2be
-rw-r--r-- root/root        36 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ucs2le
-rw-r--r-- root/root        32 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ucs4
-rw-r--r-- root/root        36 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ucs4be
-rw-r--r-- root/root        36 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/ucs4le
-rw-r--r-- root/root        35 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/unicode
-rw-r--r-- root/root        34 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf-16
-rw-r--r-- root/root        38 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf-16be
-rw-r--r-- root/root        38 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf-16le
-rw-r--r-- root/root        34 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf-32
-rw-r--r-- root/root        38 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf-32be
-rw-r--r-- root/root        38 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf-32le
-rw-r--r-- root/root        33 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf16
-rw-r--r-- root/root        33 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf32
-rw-r--r-- root/root        32 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/utf8
-rw-r--r-- root/root        72 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/winbaltrim
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1250
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1251
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1252
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1253
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1254
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1255
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1256
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1257
-rw-r--r-- root/root        74 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-1258
-rw-r--r-- root/root        72 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-932
-rw-r--r-- root/root        72 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-936
-rw-r--r-- root/root        72 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-949
-rw-r--r-- root/root        72 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-950
-rw-r--r-- root/root      1006 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1250.bin
-rw-r--r-- root/root      1022 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1251.bin
-rw-r--r-- root/root      1006 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1252.bin
-rw-r--r-- root/root       958 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1253.bin
-rw-r--r-- root/root       998 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1254.bin
-rw-r--r-- root/root       934 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1255.bin
-rw-r--r-- root/root      1026 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1256.bin
-rw-r--r-- root/root       978 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1257.bin
-rw-r--r-- root/root       990 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp1258.bin
-rw-r--r-- root/root     31662 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp932.bin
-rw-r--r-- root/root     87682 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp936.bin
-rw-r--r-- root/root     68706 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp949.bin
-rw-r--r-- root/root     54526 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/encodings/windows-cp950.bin
-rw-r--r-- root/root    694518 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/help.doc
-rw-r--r-- root/root    807570 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libasdf.a
-rw-r--r-- root/root   2670192 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libclx.a
-rw-r--r-- root/root   1079902 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libcmp.a
-rw-r--r-- root/root     70556 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libdeflate.a
-rw-r--r-- root/root    147780 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libdefsystem.a
-rw-r--r-- root/root     17216 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libecl-cdb.a
-rw-r--r-- root/root     15734 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libecl-curl.a
-rw-r--r-- root/root     22680 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libecl-help.a
-rw-r--r-- root/root      8324 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libecl-quicklisp.a
-rw-r--r-- root/root     40040 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libprofile.a
-rw-r--r-- root/root     13322 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libql-minitar.a
-rw-r--r-- root/root     21634 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/librt.a
-rw-r--r-- root/root      3376 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libsb-bsd-sockets.a
-rw-r--r-- root/root     14272 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libserve-event.a
-rw-r--r-- root/root     68242 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/libsockets.a
-rw-r--r-- root/root       177 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/prebuilt-asdf.asd
-rw-r--r-- root/root       167 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/profile.asd
-rwxr-xr-x root/root     38652 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/profile.fas
-rw-r--r-- root/root       179 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ql-minitar.asd
-rwxr-xr-x root/root     13928 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/ql-minitar.fas
-rw-r--r-- root/root       147 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/rt.asd
-rwxr-xr-x root/root     22248 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/rt.fas
-rw-r--r-- root/root       203 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/sb-bsd-sockets.asd
-rwxr-xr-x root/root      5536 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/sb-bsd-sockets.fas
-rw-r--r-- root/root       183 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/serve-event.asd
-rwxr-xr-x root/root     13944 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/serve-event.fas
-rw-r--r-- root/root       167 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/sockets.asd
-rwxr-xr-x root/root     59236 2017-09-14 12:33 ./usr/lib/ecl-15.3.7/sockets.fas
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/lib/ecl/
lrwxrwxrwx root/root         0 2017-09-14 12:33 ./usr/lib/libecl.so -> libecl.so.15.3.7
lrwxrwxrwx root/root         0 2017-09-14 12:33 ./usr/lib/libecl.so.15 -> libecl.so.15.3.7
lrwxrwxrwx root/root         0 2017-09-14 12:33 ./usr/lib/libecl.so.15.3 -> libecl.so.15.3.7
-rw-r--r-- root/root   2279492 2017-09-14 12:33 ./usr/lib/libecl.so.15.3.7
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/doc/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/doc/ecl/
-rw-r--r-- root/root       199 2017-09-14 11:44 ./usr/share/doc/ecl/NEWS.Debian.gz
-rw-r--r-- root/root       318 2017-09-14 11:44 ./usr/share/doc/ecl/README.Debian
-rw-r--r-- root/root      3748 2017-09-14 12:33 ./usr/share/doc/ecl/changelog.Debian.gz
-rw-r--r-- root/root      2794 2017-09-14 11:44 ./usr/share/doc/ecl/copyright
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/lintian/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/lintian/overrides/
-rw-r--r-- root/root       129 2017-09-14 12:32 ./usr/share/lintian/overrides/ecl
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/man/
drwxr-xr-x root/root         0 2017-09-14 12:33 ./usr/share/man/man1/
-rw-r--r-- root/root       380 2017-09-14 12:33 ./usr/share/man/man1/ecl-config.1.gz
-rw-r--r-- root/root      1531 2017-09-14 12:33 ./usr/share/man/man1/ecl.1.gz


+------------------------------------------------------------------------------+
| Post Build                                                                   |
+------------------------------------------------------------------------------+


+------------------------------------------------------------------------------+
| Cleanup                                                                      |
+------------------------------------------------------------------------------+

Purging /<<BUILDDIR>>
Not cleaning session: cloned chroot in use

+------------------------------------------------------------------------------+
| Summary                                                                      |
+------------------------------------------------------------------------------+

Build Architecture: armhf
Build-Space: 170880
Build-Time: 3289
Distribution: stretch-staging
Host Architecture: armhf
Install-Time: 381
Job: ecl_15.3.7+dfsg1-2+deb9u1
Machine Architecture: armhf
Package: ecl
Package-Time: 3745
Source-Version: 15.3.7+dfsg1-2+deb9u1
Space: 170880
Status: successful
Version: 15.3.7+dfsg1-2+deb9u1
--------------------------------------------------------------------------------
Finished at 2017-10-07T13:28:49Z
Build needed 01:02:25, 170880k disc space